mirror of
https://github.com/lm-sensors/lm-sensors.git
synced 2026-11-11 16:40:16 +00:00
Give the filename when tokenization fails.
git-svn-id: http://lm-sensors.org/svn/lm-sensors/trunk@1851 7894878c-1315-0410-8ee3-d5d059ff63e0
This commit is contained in:
1 parent
0c11d8eeed
commit
88c186174d
1 file changed
+2
-2
@@ -149,10 +149,10 @@ sub scan_kernel_chip
|
||||
last if $line =~ m/;/;
|
||||
}
|
||||
|
||||
while (shift @tokens ne '{') { die unless @tokens }
|
||||
while (shift @tokens ne '{') { die "Tokenization in $chip" unless @tokens }
|
||||
for (;;)
|
||||
{
|
||||
while (shift @tokens ne '{') { die unless @tokens }
|
||||
while (shift @tokens ne '{') { die "Tokenization in $chip" unless @tokens }
|
||||
my $val = shift @tokens;
|
||||
last if $val eq '0';
|
||||
die "Parse error: ',' expected after '$val' within $chip"
|
||||
|
||||
Reference in new issue
Block a user