From b722a48cca28decde7a58a252361a35e43f80750 Mon Sep 17 00:00:00 2001 From: wlott <wlott> Date: Fri, 9 Nov 1990 23:09:52 +0000 Subject: [PATCH] Changed a %primitive 8bit-system-ref to a system:sap-ref-8. --- hemlock/linimage.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/hemlock/linimage.lisp b/hemlock/linimage.lisp index ee4b6e935..bf04b9431 100644 --- a/hemlock/linimage.lisp +++ b/hemlock/linimage.lisp @@ -193,7 +193,7 @@ (defmacro u-vec-get-rep (u-vec index) `(svref *print-representation-vector* - (%primitive 8bit-system-ref ,u-vec ,index))) + (system:sap-ref-8 ,u-vec ,index))) ;;; display-losing-chars -- Internal ;;; -- GitLab