error locations for wrong parameters

2018-11-21 14:57:28 +01:00
parent 00e10f3536
commit 82d12a7386
3 changed files with 33 additions and 41 deletions
@@ -1,17 +1,4 @@
-;; (when 1 (breakpoint))
-
-;; (if (eval 1)
-;;     (apply prog ((breakpoint)))
-;;   nil))
-
-;; (if (eval 1)
-;;     (eval (pair prog ((breakpoint)))))
-;;   nil))
-
-
 (defun ! (n)
-  (if (< n 2)
+  (ifs (< n 2)
      1
    (* n (! (- n 1)))))
-
-(erros "alskdj")