Changeset 27285 in project

Timestamp:

08/22/12 05:47:37 (9 years ago)

Author:

Ivan Raikov

Message:

nemo: more informative error message on missing symbol

Location:

release/4/nemo/trunk

Files:

• nemo-core.scm (modified) (2 diffs)
• nemo.setup (modified) (1 diff)

release/4/nemo/trunk/nemo-core.scm

@@ -385 +385 @@
     (lambda (s loc . rest)
       (let-optionals rest ((lbs '()))
+
         (if (and (not (hash-table-exists? nemo-env s)) 
                  (not (member s lbs)))
@@ -404 +405 @@
                                   " called with incorrect number of arguments: "
                                   args)))))
-          (nemo:error 'arity-check: "symbol " s " is not defined")
+          (nemo:error 'arity-check: "symbol " s "(" loc ")" " is not defined")
           )))
 

release/4/nemo/trunk/nemo.setup

@@ -13 +13 @@
 
        ((dynld-name "nemo-core") ("nemo-core.scm" "expr.grm.scm")
-        (compile -no-trace -O2 -d0 -s nemo-core.scm -j nemo-core))
+        (compile -no-trace -O -d2 -s nemo-core.scm -j nemo-core))
 
        ((dynld-name "nemo-core.import") ("nemo-core.import.scm")