Better message on tokenization error.

git-svn-id: http://lm-sensors.org/svn/lm-sensors/trunk@1867 7894878c-1315-0410-8ee3-d5d059ff63e0
This commit is contained in:
Jean Delvare committed 2003-07-07 11:36:17 +00:00
1 parent 66d5b66267
commit 9ab12ef229
1 file changed
+2 -2
+2 -2
View File
@@ -149,10 +149,10 @@ sub scan_kernel_chip
last if $line =~ m/;/;
}
while (shift @tokens ne '{') { die "Tokenization in $chip" unless @tokens }
while (shift @tokens ne '{') { die "Tokenization failed in $chip" unless @tokens }
for (;;)
{
while (shift @tokens ne '{') { die "Tokenization in $chip" unless @tokens }
while (shift @tokens ne '{') { die "Tokenization failed in $chip" unless @tokens }
my $val = shift @tokens;
last if $val eq '0';
die "Parse error: ',' expected after '$val' within $chip"