X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fassembly%2Fx86%2Fassem-rtns.lisp;h=9efecb9f28c4cbdaf7416d9cfd83019946b75e5c;hb=440baf2d4f88579609615c6cbf598c336fb07445;hp=1c23f0a79d906a1bd353bdb125c135bbcb72ef22;hpb=37b93fe46f304244d1c69c06b82a22252e393630;p=sbcl.git diff --git a/src/assembly/x86/assem-rtns.lisp b/src/assembly/x86/assem-rtns.lisp index 1c23f0a..9efecb9 100644 --- a/src/assembly/x86/assem-rtns.lisp +++ b/src/assembly/x86/assem-rtns.lisp @@ -338,7 +338,7 @@ (inst push 0) (inst push 0) (inst push ecx-tn) - (inst call (make-fixup "RtlUnwind@16" :foreign))) + (inst call (make-fixup "RtlUnwind" :foreign))) ;; We want no VOP for this one and for it to only happen on Win32 ;; targets. Hence the following disaster.