Skip to content
Snippets Groups Projects
Commit 68354497 authored by ram's avatar ram
Browse files

Added :call-site and :single-value-return code location kinds.

parent 92877e99
No related branches found
No related tags found
No related merge requests found
...@@ -7,7 +7,7 @@ ...@@ -7,7 +7,7 @@
;;; Scott Fahlman or slisp-group@cs.cmu.edu. ;;; Scott Fahlman or slisp-group@cs.cmu.edu.
;;; ;;;
(ext:file-comment (ext:file-comment
"$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/debug-info.lisp,v 1.22 1991/03/12 17:18:10 ram Exp $") "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/debug-info.lisp,v 1.23 1991/07/08 16:30:47 ram Exp $")
;;; ;;;
;;; ********************************************************************** ;;; **********************************************************************
;;; ;;;
...@@ -232,7 +232,7 @@ ...@@ -232,7 +232,7 @@
(defconstant compiled-code-location-kind-byte (byte 3 0)) (defconstant compiled-code-location-kind-byte (byte 3 0))
(defconstant compiled-code-location-kinds (defconstant compiled-code-location-kinds
'#(:unknown-return :known-return :internal-error :non-local-exit '#(:unknown-return :known-return :internal-error :non-local-exit
:block-start)) :block-start :call-site :single-value-return))
......
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