diff options
Diffstat (limited to 'src/algebra')
| -rw-r--r-- | src/algebra/ChangeLog | 4 | ||||
| -rw-r--r-- | src/algebra/mkfunc.spad.pamphlet | 2 |
2 files changed, 5 insertions, 1 deletions
diff --git a/src/algebra/ChangeLog b/src/algebra/ChangeLog index cbb2b4fc..3e0ecfe4 100644 --- a/src/algebra/ChangeLog +++ b/src/algebra/ChangeLog @@ -1,3 +1,7 @@ +2007-10-22 Gabriel Dos Reis <gdr@cs.tamu.edu> + + * mkfunc.spad.pamphlet (InputForm$interpret): Use objNew. + 2007-10-18 Gabriel Dos Reis <gdr@cs.tamu.edu> Fix SF/1790912 diff --git a/src/algebra/mkfunc.spad.pamphlet b/src/algebra/mkfunc.spad.pamphlet index 7b1ad3ee..770cfd42 100644 --- a/src/algebra/mkfunc.spad.pamphlet +++ b/src/algebra/mkfunc.spad.pamphlet @@ -98,7 +98,7 @@ InputForm(): interpret x == v := interpret(x)$Lisp - mkObj(unwrap(objVal(v)$Lisp)$Lisp, objMode(v)$Lisp)$Lisp + objNew(unwrap(objVal(v)$Lisp)$Lisp, objMode(v)$Lisp)$Lisp convert(x:DoubleFloat):% == zero? x => 0 |