Changeset 13230

Timestamp:

Nov 24, 2009, 2:53:03 PM (10 years ago)

Author:

gb

Message:

Copy the # of optional args to the low byte of imm0 before processing
&optionals in .SPdestbind. (Fixes ticket:630).

File:

• trunk/source/lisp-kernel/x86-spentry32.s (modified) (2 diffs)

trunk/source/lisp-kernel/x86-spentry32.s

@@ -2934 +2934 @@
         __(movd %mm1,%imm0)
 local_label(opt):
-        __(testb %imm0_bh,%imm0_bh)
+        __(movb %imm0_bh,%imm0_b)
+        __(testb %imm0_b,%imm0_b)
         __(je local_label(rest_keys))
         __(btl $initopt_bit,%imm0)
@@ -2959 +2960 @@
         __(movb $fulltagmask,%imm0_bh)
         __(andb %arg_reg_b,%imm0_bh)
-        __(compare_reg_to_nil(%arg_z))
+        __(compare_reg_to_nil(%arg_reg))
         __(je local_label(default_hard_opt))
         __(cmpb $fulltag_cons,%imm0_bh)