Skip to content
Snippets Groups Projects
Commit 0432423c authored by wlott's avatar wlott
Browse files

Changed pointer-sap-{ref,set} to sap-system-{ref,set} to be consistent with

the rest of the system.
parent 3b01e2e3
No related branches found
No related tags found
No related merge requests found
...@@ -7,7 +7,7 @@ ...@@ -7,7 +7,7 @@
;;; Scott Fahlman (FAHLMAN@CMUC). ;;; Scott Fahlman (FAHLMAN@CMUC).
;;; ********************************************************************** ;;; **********************************************************************
;;; ;;;
;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/system.lisp,v 1.3 1990/03/06 19:59:02 ch Exp $ ;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/system.lisp,v 1.4 1990/03/06 22:11:28 wlott Exp $
;;; ;;;
;;; MIPS VM definitions of various system hacking operations. ;;; MIPS VM definitions of various system hacking operations.
;;; ;;;
...@@ -228,11 +228,11 @@ ...@@ -228,11 +228,11 @@
(define-vop (pointer-sap-ref sap-ref) (define-vop (sap-system-ref sap-ref)
(:results (result :scs (descriptor-reg sap-reg))) (:results (result :scs (descriptor-reg sap-reg)))
(:variant :pointer nil)) (:variant :pointer nil))
(define-vop (pointer-sap-set sap-set) (define-vop (sap-system-set sap-set)
(:arg-types sap fixnum sap) (:arg-types sap fixnum sap)
(:variant :pointer)) (:variant :pointer))
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment