From 3576df48f7d981f67dbf9bc1b245b18d990db977 Mon Sep 17 00:00:00 2001
From: "Quinn \"heddwch\" Evans" <yoshizuki@gmail.com>
Date: Mon, 10 Sep 2018 14:48:55 -0600
Subject: [PATCH] Make PRINT-CONFIG more informative about program structure.

---
 PRINTCNF.COB | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/PRINTCNF.COB b/PRINTCNF.COB
index 41c6dd7..bf6e54a 100644
--- a/PRINTCNF.COB
+++ b/PRINTCNF.COB
@@ -109,7 +109,8 @@
            READ PROGRAM-CODE RECORD
                AT END MOVE 10 TO STATE.
            IF NOT DONE THEN
-               DISPLAY PROGRAM-IP, ".", INSTRUCTION-RECORD
+               DISPLAY PROGRAM-IP, ".", INSTRUCTION-RECORD, ".",
+                       PREV-IP, ".", NEXT-IP
                IF NEXT-IP OF PROGRAM-RECORD IS EQUAL TO 0 THEN
                    MOVE 10 TO STATE
                ELSE