improved for EOF handling

1989-11-17 11:40:48 +00:00 · 1989-11-17 11:40:48 +00:00 · 6c40cad879
commit 6c40cad879
parent af6b40a9a3
1 changed files with 1 additions and 0 deletions
--- 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";
 		}