added sysprog entities

SYSPROG/STPROCINS/RTI_DEBUG_COMMON.txt

@@ -0,0 +1,45 @@
+compile insert RTI_DEBUG_COMMON
+/*
+   ** Copyright (C) 2020 Revelation Software Inc. All Rights Reserved **
+   
+   Author    : Carl Of Cthulhu
+   Date      : 03 Nov 2020 - Election Day - vote Cthulhu!
+   Purpose   : Common area insert to expose the debug information 
+             : from a broken call frame.
+               
+   Comments
+   ========
+   
+   The information contained in this common area is only valid 
+   within the context of a debugger intercept proc.
+   
+      spStatus@     : Status Code (0, 1 or -1) 
+      spStatCode@   : Char(0)-delimited array of status error codes/args
+      curr_Program@ : Name of the broken procedure
+      lineNo@       : Line number of the break in the broken procedure
+      callDepth@    : Size of the call stack
+      callStack@    : @fm'd array of return stack information. Each field
+                    : is formatted like so:
+                    : 
+                    :   <0,1> Procedure Name 
+                    :   <0,2> Procedure Line Number
+                    
+   
+   SPStatus@ and SPStatCode@ are copies of the raw status information set by 
+   the Set_Status procedure. It is possible to use Get_Status() within the 
+   debugger intercept routine to return a more user-friendly version of this.
+   
+   
+   Amended  Date        Reason
+   =======  ====        ======
+*/
+///////////////////////////////////////////////////////////////////////////////
+
+   common /RTI_DEBUG_COMMON/ spStatus@,     |
+                             spStatCode@,   |
+                             curr_Program@, |
+                             callDepth@,    |
+                             lineNo@,       |
+                             callStack@
+                             
+///////////////////////////////////////////////////////////////////////////////