From 59284178b5fb72345834e2a0cd34b8d7d9567981 Mon Sep 17 00:00:00 2001
From: ram <ram>
Date: Mon, 5 Mar 1990 12:02:19 +0000
Subject: [PATCH] Fixed description of compiled debug location representation a
 bit.  It seems we need to dump the number of locations per block so that we
 can know when the next block starts...

---
 code/debug-info.lisp | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/code/debug-info.lisp b/code/debug-info.lisp
index a647dcb56..e5c49b079 100644
--- a/code/debug-info.lisp
+++ b/code/debug-info.lisp
@@ -181,12 +181,14 @@
 ;;;    number of successors + bit flags (single byte)
 ;;;        elsewhere-p
 ;;;    ...ordinal number of each successor in the function's blocks vector...
-;;;    kind of location (single byte)
+;;;    number of locations in this block
+;;;    kind of first location (single byte)
 ;;;    delta from previous PC (or from 0 if first location in function.)
 ;;;    [offset of first top-level form, if no function TLF-NUMBER]
 ;;;    form number of first source form
 ;;;    first live mask (length in bytes determined by number of VARIABLES)
-;;;    ...more <PC, top-level form offset, form-number, live-set> tuples...
+;;;    ...more <kind, delta, top-level form offset, form-number, live-set>
+;;;       tuples...
 
 
 (defconstant compiled-debug-block-nsucc-byte (byte 2 0))
-- 
GitLab