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

Merged non-descriptor changes:

 revision 1.13.1.2
 date: 90/04/13 13:07:19;  author: ram;  state: Exp;  lines added/del: 7/3
 CONT -> FP.  Added c-d-f-NFP.  Rediscovered the DEBUG-SOURCE-COMMENT.
 ----------------------------
 revision 1.13.1.1
 date: 90/03/27 13:14:52;  author: ram;  state: Exp;  lines added/del: 3/0
 Added DEBUG-SOURCE-COMMENT.
parent 9f7d0026
No related branches found
No related tags found
No related merge requests found
......@@ -296,9 +296,13 @@
;; elected not to store a vector to save space.
(returns :fixed :type (or (simple-array * (*)) (member :standard :fixed)))
;;
;; SC-Offsets describing where the return PC and return CONT are kept.
;; SC-Offsets describing where the return PC and return FP are kept.
(return-pc nil :type sc-offset)
(old-cont nil :type sc-offset)
(old-fp nil :type sc-offset)
;;
;; SC-Offset for the number stack FP in this function, or NIL if no NFP
;; allocated.
(nfp nil :type (or sc-offset null))
;;
;; The earliest PC in this function at which the environment is properly
;; initialized (arguments moved from passing locations, etc.)
......@@ -320,6 +324,9 @@
;; descriptive string.
(name nil :type (or pathname list simple-string))
;;
;; File comment for this file, if any.
(comment nil :type (or simple-string null))
;;
;; The universal time that the source was written, or NIL if unavailable.
(created nil :type (or unsigned-byte null))
;;
......
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