use get_single_char/1
This commit is contained in:
@@ -146,7 +146,7 @@
|
|||||||
).
|
).
|
||||||
|
|
||||||
'$read_input'(ThreadedGoals, NewVarList) :-
|
'$read_input'(ThreadedGoals, NewVarList) :-
|
||||||
'$get_single_char'(C),
|
get_single_char(C),
|
||||||
( C == w ->
|
( C == w ->
|
||||||
nl,
|
nl,
|
||||||
write(' '),
|
write(' '),
|
||||||
|
|||||||
Reference in New Issue
Block a user