Changeset 7849

Timestamp:

Dec 7, 2007, 5:09:55 PM (17 years ago)

Author:

Gary Byers

Message:

GF code-vector templates increment gf.hash by 1 every time they're
called.

File:

• branches/working-0711/ccl/level-0/X86/x86-clos.lisp (modified) (3 diffs)

branches/working-0711/ccl/level-0/X86/x86-clos.lisp

@@ -165 +165 @@
       (:fixed-constants (class-wrapper slots dispatch-table dcode hash))
       (:code-size x8664::gf-code-size)
+      (addq ($ x8664::fixnumone) (@ 'hash (% fn)))
       (movq (@ (% rsp)) (% ra0))
       (save-frame-variable-arg-count)
@@ -190 +191 @@
   (:fixed-constants (class-wrapper slots dispatch-table dcode hash))
   (:code-size x8664::gf-code-size)
+  (addq ($ x8664::fixnumone) (@ 'hash (% fn)))
   (check-nargs 1)
   (movq (@ 'dispatch-table (% fn)) (% arg_y))
@@ -198 +200 @@
   (:fixed-constants (class-wrapper slots dispatch-table dcode hash))
   (:code-size x8664::gf-code-size)
+  (addq ($ x8664::fixnumone) (@ 'hash (% fn)))
   (check-nargs 2)
   (movq (@ 'dispatch-table (% fn)) (% arg_x))