diff --git a/lang/cem/cemcom/make.tokcase b/lang/cem/cemcom/make.tokcase index f121c3ec4..56d104ae2 100755 --- a/lang/cem/cemcom/make.tokcase +++ b/lang/cem/cemcom/make.tokcase @@ -23,6 +23,7 @@ s/.*{\(.*\),.*\(".*"\).*$/ case \1 :\ cat <<'--EOT--' default: + if (tok <= 0) return "end of file"; if (tok < 040 || tok >= 0177) { return "bad token"; }