diff options
Diffstat (limited to 'examples/speech/pt-identify.lali')
| -rwxr-xr-x | examples/speech/pt-identify.lali | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/examples/speech/pt-identify.lali b/examples/speech/pt-identify.lali index bef74ef..7dd69b6 100755 --- a/examples/speech/pt-identify.lali +++ b/examples/speech/pt-identify.lali @@ -12,7 +12,7 @@ (defun assoc (number lst) (fill - ((dif number (car (car lst))) (car lst)) + ((diff number (car (car lst))) (car lst)) ((algo lst) f) (f (assoc number (cdr lst))))) @@ -35,7 +35,7 @@ (set 'it-quest (assoc target-question question)) (princ (car (cdr it-quest))) (princ "\b?") - (not (dif (read) (car (cdr (cdr it-quest))))))) + (not (diff (read) (car (cdr (cdr it-quest))))))) (defun loop () (fill |