X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fmips%2Fmove.lisp;h=65368c3d42a20e56b0e9d502e0923bf88a4dcde4;hb=bc9235363fc93155dbdbba04755b4fa89fc00ea8;hp=3854874c675490dc12414e33e1d5d922df26ff5d;hpb=3d1044ebd697fd4831eb5998a5f245fe596c9606;p=sbcl.git diff --git a/src/compiler/mips/move.lisp b/src/compiler/mips/move.lisp index 3854874..65368c3 100644 --- a/src/compiler/mips/move.lisp +++ b/src/compiler/mips/move.lisp @@ -239,7 +239,7 @@ (inst sll y x 2) (pseudo-atomic - (pa-flag :extra (pad-data-block (+ bignum-digits-offset 2))) + (pa-flag :extra (pad-data-block (+ bignum-digits-offset 2))) (inst or y alloc-tn other-pointer-lowtag) (inst slt temp x zero-tn) (inst sll temp n-widetag-bits)