Diagnostics for MZGARB - MZGAR1

CALL MZGARB (IXGARB,IXWIPE)

#ZFATAL>ZFATAL termination

  case 1 :  the store numbers of IXGARB and IXWIPE do not agree

The following numbers are given in /QUEST/

for case 1 :

 IQUEST(11) = store number of IXGARB
 IQUEST(12) = store number of IXWIPE

CALL MZGAR1

This is called from various parts of the system to force an automatic garbage collection for lack of space; NQRESV contains the amount of space available, a negative value indicates how much space has still to be found.

#ZFATAL>ZFATAL termination

  case 1 :  not enough space can be found for a long range division

The following numbers are given in /QUEST/

for case 1 :

 IQUEST(11) = NQRESV, the amount of free space available,
                      a negative number in this context
 IQUEST(12) = current store number
 IQUEST(13) = current division number (which may not be meaningful)

#ZTELL>ZTELL exit

      CALL ZTELL (99,1)   not enough space for a short-range division
                          IQUEST(11:13) as above