X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Fcompiler%2Fgeneric%2Futils.lisp;h=cd08569462c53f88e070d32667c125d00fdf9a64;hb=89eb73c035f05ae53b1148ef8a83e1d4030b2dd8;hp=3e1f6c7e3dbc759ac062cbb66c4c18f739373f93;hpb=6fb6e66f531dfb6140ec3e0cc8f84f6ecd1927ca;p=sbcl.git

diff --git a/src/compiler/generic/utils.lisp b/src/compiler/generic/utils.lisp
index 3e1f6c7..cd08569 100644
--- a/src/compiler/generic/utils.lisp
+++ b/src/compiler/generic/utils.lisp
@@ -61,4 +61,4 @@
        (pad-data-block (1- symbol-size))
        (- list-pointer-lowtag)
        (* static-function-index (pad-data-block fdefn-size))
-       (* fdefn-raw-addr-slot word-bytes))))
+       (* fdefn-raw-addr-slot n-word-bytes))))