blob: e9fc485be2adde229f91c1d84e6b26acd504462d [file] [log] [blame]
--- msggen.pl 2003-02-19 10:57:37.000000000 -0800
+++ msggen.pl 2003-02-19 10:58:06.000000000 -0800
@@ -61,7 +61,7 @@
else {
$field[0] =~ /^[IWQXE][0-9]$/ || &error("invalid first field");;
$type[$num] = substr($field[0], 0, 1);
- $argc = int(substr($field[0], 1, 1));
+ $argc = substr($field[0], 1, 1);
}
$nargs[$num] = $argc;
$field[1] =~ /^[a-zA-Z_][a-zA-Z0-9_]+$/ || &error("invalid tag");