diff options
| author | dos-reis <gdr@axiomatics.org> | 2011-06-22 12:52:47 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2011-06-22 12:52:47 +0000 |
| commit | 044ec4f17ae0098af6dba5a02787d39a7558e1e1 (patch) | |
| tree | f2768795feb93691dc073ca3e01f865606fb8a55 | |
| parent | 507f80f13241b81d794003f4f9117bc145fdfdf1 (diff) | |
| download | open-axiom-044ec4f17ae0098af6dba5a02787d39a7558e1e1.tar.gz | |
* interp/spaderror.lisp (trapNumericErrors): Fix typo.
| -rw-r--r-- | src/ChangeLog | 4 | ||||
| -rw-r--r-- | src/interp/spaderror.lisp | 6 |
2 files changed, 7 insertions, 3 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index d9f908ed..66a108af 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,5 +1,9 @@ 2011-06-22 Gabriel Dos Reis <gdr@cs.tamu.edu> + * interp/spaderror.lisp (trapNumericErrors): Fix typo. + +2011-06-22 Gabriel Dos Reis <gdr@cs.tamu.edu> + * interp/g-opt.boot ($VMsideEffectFreeOperators): Include FUNCALL. ($simpleVMoperators): Include SPADCALL. diff --git a/src/interp/spaderror.lisp b/src/interp/spaderror.lisp index 2967dc27..3a07ad21 100644 --- a/src/interp/spaderror.lisp +++ b/src/interp/spaderror.lisp @@ -54,9 +54,9 @@ #+:gcl (defmacro |trapNumericErrors| (form) `(let ((|$oldBreakMode| |$BreakMode|) - (|$BreakMode| '|trapNumerics|)) - (val)) - (catch '|trapNumerics| ,form)) + (|$BreakMode| '|trapNumerics|) + (val)) + (catch '|trapNumerics| ,form))) #-:gcl (defmacro |trapNumericErrors| (form) |