[Erbot-cvs] Changes to erbot/erbc3.el

[Michael W . Olson]

Index: erbot/erbc3.el
diff -u erbot/erbc3.el:1.27 erbot/erbc3.el:1.28
--- erbot/erbc3.el:1.27 Fri Aug 12 00:36:17 2005
+++ erbot/erbc3.el      Wed Nov  9 01:19:45 2005
@@ -191,15 +191,19 @@
                            (cons 
                             (first body)
                             (cons
-                             '(sit-for 0)
-                             (cdr body))))))
+                             `(erblisp-check-args ,@args)
+                             (cons
+                              '(sit-for 0)
+                              (cdr body)))))))
 
          (cons 'defun 
                (cons fcn 
                      (cons args 
-                           (cons 
-                            '(sit-for 0)
-                            body)))))
+                           (cons
+                            `(erblisp-check-args ,@args)
+                            (cons 
+                             '(sit-for 0)
+                             body))))))
       
       fcn))
     (fsi-pf-load)