Skip to content
Snippets Groups Projects
Commit 16048f43 authored by wlott's avatar wlott
Browse files

Added filler for scavenger-hook-p.

parent afd2d556
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/sparc/type-vops.lisp,v 1.5 1991/08/04 11:36:53 wlott Exp $ ;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/sparc/type-vops.lisp,v 1.6 1991/08/04 11:38:08 wlott Exp $
;;; ;;;
;;; This file contains the VM definition of type testing and checking VOPs ;;; This file contains the VM definition of type testing and checking VOPs
;;; for the SPARC. ;;; for the SPARC.
...@@ -158,6 +158,9 @@ ...@@ -158,6 +158,9 @@
(def-type-vops weak-pointer-p check-weak-pointer weak-pointer (def-type-vops weak-pointer-p check-weak-pointer weak-pointer
object-not-weak-pointer-error vm:weak-pointer-type) object-not-weak-pointer-error vm:weak-pointer-type)
(def-type-vops scavenger-hook-p nil nil nil
0)
(def-type-vops code-component-p nil nil nil (def-type-vops code-component-p nil nil nil
vm:code-header-type) vm:code-header-type)
......
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