X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=tests%2Fforeign-stack-alignment.impure.lisp;h=c678e22ea56c75ee0768d5939198fab0fcf7f539;hb=da8cb4801a3ab35070f380e22aea3d260f9df8aa;hp=0cd42cc4cf573264dc53182837beec78ee7427df;hpb=3c901eea59aeb4716a7288c943f30c4282af41de;p=sbcl.git diff --git a/tests/foreign-stack-alignment.impure.lisp b/tests/foreign-stack-alignment.impure.lisp index 0cd42cc..c678e22 100644 --- a/tests/foreign-stack-alignment.impure.lisp +++ b/tests/foreign-stack-alignment.impure.lisp @@ -35,7 +35,8 @@ #+(and ppc linux) 8 #+x86-64 16 #+mips 8 - #+x86 4 + #+(and x86 (not darwin)) 4 + #+(and x86 darwin) 16 #-(or x86 x86-64 mips (and ppc (or darwin linux))) (error "Unknown platform")) ;;;; Build the offset-tool as regular excutable, and run it with @@ -74,4 +75,7 @@ (assert (= *good-offset* (trampoline (alien-lambda int () (stack-alignment-offset *required-alignment*)))))) +(delete-file "stack-alignment-offset") +(delete-file "stack-alignment-offset.so") + ;;;; success!