From 58b300c443621117b0685f237f3fd19d447e5131 Mon Sep 17 00:00:00 2001 From: whiteline Date: Thu, 29 Jun 2023 12:05:32 +0200 Subject: [PATCH] finally --- lisp.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp.scm b/lisp.scm index f36b6f6..fe36dd7 100644 --- a/lisp.scm +++ b/lisp.scm @@ -88,8 +88,8 @@ (_ (lisp-exit "malformed atom expression"))))) (eq . ,(lambda function-args (match function-args - ((a b) (let ((ea (eval a)) - (eb (eval b))) + ((a b) (let ((ea (lisp-eval a)) + (eb (lisp-eval b))) (equal? ea eb))) (_ (lisp-exit "malformed eq expression"))))) (set . ,(lambda function-args