Oops! Regression.

This commit is contained in:
Simon Forman
2019-08-12 19:25:13 -07:00
parent dd42c7c0bc
commit b25ef2d5f7
+2 -2
View File
@@ -43,8 +43,8 @@ line(-1, [eof]) :- !. % break on EOF
line(X, [X|Line]) :- get_code(Y), !, line(Y, Line).
chars([Ch|Rest]) --> char(Ch), !, chars(Rest).
chars([]) --> [].
chars([Ch|Rest]) --> char(Ch), chars(Rest).
chars([Ch]) --> char(Ch).
char(Ch) --> [Ch], { Ch \== 0'[, Ch \== 0'], between(33, 126, Ch) }.