Changeset 363

Timestamp:

Jan 22, 2004, 2:52:11 AM (21 years ago)

Author:

Gary Byers

Message:

MAKE-VINSN zeros the GPRS-SET & FPRS-SET fields when pulling a vinsn off
of the freelist.

File:

• trunk/ccl/compiler/vinsn.lisp (modified) (1 diff)

trunk/ccl/compiler/vinsn.lisp

@@ -91 +91 @@
         (setf (vinsn-template vinsn) template
               (vinsn-variable-parts vinsn) nil
-              (vinsn-annotation vinsn) nil)
+              (vinsn-annotation vinsn) nil
+              (vinsn-gprs-set vinsn) 0
+              (vinsn-fprs-set vinsn) 0)
         vinsn)
       (%make-vinsn template))))