From: Josh E. <jo...@el...> - 2008-08-30 06:49:16
|
Testing for features in the cross compiler instead of the host would be a good idea here: --- src/code/target-alieneval.lisp +++ src/code/target-alieneval.lisp @@ -180,10 +180,10 @@ `(symbol-macrolet ((&auxiliary-type-definitions& ,(append *new-auxiliary-types* (auxiliary-type-definitions env)))) - #+(or x86 x86-64) + #!+(or x86 x86-64) (let ((sb!vm::*alien-stack* sb!vm::*alien-stack*)) ,@body) - #-(or x86 x86-64) + #!-(or x86 x86-64) ,@body))) ;;;; runtime C values that don't correspond directly to Lisp types |