Changeset 14759

Timestamp:

Apr 29, 2011, 3:00:06 PM (14 years ago)

Author:

Gary Byers

Message:

Treat unary - as subtraction from 0, maybe turn that to negation in the backend.

File:

• trunk/source/compiler/nx1.lisp (modified) (1 diff)

trunk/source/compiler/nx1.lisp

@@ -699 +699 @@
       (make-acode (%nx1-operator %%ineg)(nx1-form num))
       (make-acode (%nx1-operator %ineg) (nx1-form num)))
-    (make-acode (%nx1-operator minus1) (nx1-form num))))
+    (nx1-form `(- 0 ,num))))
+