Use double-quoted string for codes.

This commit is contained in:
Simon Forman 2019-08-10 22:21:57 -07:00
parent f6705f3fa0
commit 6bc1b5ec8b
1 changed files with 1 additions and 3 deletions

View File

@ -30,8 +30,7 @@ joy_term(N) --> num(N), !.
joy_term(J) --> "[", !, joy_parse(J), "]".
joy_term(C) --> symbol(C).
symbol(C) --> chars(Chars), !, {Chars \= [61, 61], atom_codes(C, Chars)}.
symbol(C) --> chars(Chars), !, {Chars \= "==", atom_codes(C, Chars)}.
% Line is the next new-line delimited line from standard input stream as
@ -69,4 +68,3 @@ digits([]) --> [].
digit(C) --> [C], { nonvar(C), C =< 57, C >= 48 }.