better error message

This commit is contained in:
ehouse 2003-12-10 06:00:56 +00:00
parent 9949b2cadb
commit ee8919d362

View file

@ -415,7 +415,7 @@ sub parseAndSort() {
die "word too long" if @word > 15; die "word too long" if @word > 15;
} }
} elsif ($gKillIfMissing) { } elsif ($gKillIfMissing) {
die "char $byt (", $byt+0, ") not in map file $gTableFile\n"; die "$0: chr $byt (", $byt+0, ") not in map file $gTableFile\n";
} else { } else {
$dropWord = 1; $dropWord = 1;
splice @word; # lose anything we already have splice @word; # lose anything we already have