diff --git a/code/bit-bash.lisp b/code/bit-bash.lisp index 4d79237d2712ba4f02cbabf8af0b7bb976992e7c..a577048c36708438d3fe29b68b2930ee744aaec5 100644 --- a/code/bit-bash.lisp +++ b/code/bit-bash.lisp @@ -266,7 +266,7 @@ (declare (type index offset)) (%raw-bits object offset)) -(defun (setf %raw-bits) (object offset value) +(defun %set-raw-bits (object offset value) (declare (type index offset) (type unit value)) (setf (%raw-bits object offset) value))