Changeset 8373

Timestamp:

Jan 29, 2008, 6:54:24 PM (17 years ago)

Author:

R. Matthew Emerson

Message:

Keep using 16-bit nargs on x8664. (Will merge with trunk later,
and pick up 32-bit nargs at that point.)

File:

• branches/ia32/lisp-kernel/x86-macros.s (modified) (1 diff)

branches/ia32/lisp-kernel/x86-macros.s

@@ -417 +417 @@
         jump_fn()
 ])      
-        
+
+ifdef([X8632],[
 define([set_nargs],[
         movl [$]$1<<fixnumshift,%nargs
-])
+])],[
+define([set_nargs],[
+        movw [$]$1<<fixnumshift,%nargs
+])])
+
 
 /* $1 = ndigits.  Assumes 4-byte digits           */