X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fx86-assem.S;h=37fcafaf9faa648e959e2d98af0c442db66ad88b;hb=d25e3478acccec70402ff32554669a982be8e281;hp=04c6031fa2a471b88c50dd53c02f02c5be97cac7;hpb=2973941cf214a5ea274cd0381a651ce0e1a7fab2;p=sbcl.git diff --git a/src/runtime/x86-assem.S b/src/runtime/x86-assem.S index 04c6031..37fcafa 100644 --- a/src/runtime/x86-assem.S +++ b/src/runtime/x86-assem.S @@ -272,11 +272,10 @@ Ldone: #endif /* Alloc new frame. */ - mov %esp,%ebx # The current sp marks start of new frame. - push %ebp # dummy for return address + push %ebp # Dummy for return address push %ebp # fp in save location S1 + mov %esp,%ebp # The current sp marks start of new frame. sub $4,%esp # Ensure 3 slots are allocated, two above. - mov %ebx,%ebp # Switch to new frame. call *CLOSURE_FUN_OFFSET(%eax)