- ;; the stack should be 16-byte aligned on Darwin
- #!-darwin (inst push object)
- #!+darwin (progn (inst mov prev-stack-pointer esp-tn)
- (inst sub esp-tn n-word-bytes)
- (inst and esp-tn -16)
- (storew object esp-tn))
+ #!-darwin
+ (inst push object)
+ #!+darwin
+ (progn
+ ;; the stack should be 16-byte aligned on Darwin
+ (inst mov prev-stack-pointer esp-tn)
+ (inst sub esp-tn n-word-bytes)
+ (align-stack-pointer esp-tn)
+ (storew object esp-tn))