Xerox 900 series - Page 81

76
MONARCH LOADER (cont. )
81 ~ ______________ ~ ..
S QSYSTP
U
8 Read 1 record from library (l)
R
Is l a level 1 MONARCH lD record?
No
Is l a level 2 MONARCH ID record?
S
U
B
R
Yes
Any unsatisfied label or
900 Series POP references?
Yes
Set LOADM and PRGTST
Read 1
record (R) from loader
input medium
Is R a MONARCH lD record?
No
Is word count in R S 31?
Yes
Is word count in R ~ 2?
Yes
CT,
WDCT -- word count - 2
NRP
No
READ SUBROUTINE
NOTE T End of
MONARCH library
was detected
Purge loader's symbol table, etc.