home *** CD-ROM | disk | FTP | other *** search
/ Columbia Kermit / kermit.zip / hp1000 / kerdbg.ftni < prev    next >
Text File  |  2020-01-01  |  475b  |  11 lines
  1. c     Goes with rev 1.96c or later; edited  1:00 PM  Thu., 12  Jun., 1986
  2.       integer*2 dbCB(144)                 ! Debug-file control-block
  3.       integer*2 dbLv                      ! Debugging level
  4.       integer*2 states,packets,all        ! debugging level (binary) codes
  5.       parameter (states  = 1)
  6.       parameter (packets = 2)
  7.       parameter (all     = 3)
  8.       character dbNm*64                   ! Debugging log-file name
  9.       common /kerdbg/ dbCB,dbLv,dbNm
  10.  
  11.