(SYSLIB) Programming Reference Manual - Public Support Login ...

PREPRM, PREPRO, PREPF$, and POSTPR$
14.1.4.2. REPRM$–Reusable Processor Preprocessor Routine
REPRM$ reads INFOR from the INFOR CLIST processor call statement; INFOR$ must
be set to zero. The other functions of REPRM$ are the same as for PREPRM, except
the reentry feature of REPRM.
Initial Conditions
The calling program must establish an INFOR CLIST. On completing SIR$, S4 of
PARTBL+13 must be zero.
PARTBL must be externally defined and at least 27 words long.
Calling Sequence
LA A0,expected-CLIST-index-or-zero
LMJ X11,REPRM$
absolute-eof return
wrong-CLIST-index return
error return
normal return
Returns
error
normal
Identical to those for PREPRM$.
absolute-eof
Indicates that an EOF condition has been encountered that cannot be bypassed; that
is, a nontransparent control statement or @ENDX was encountered. In that case,
the processor cannot reuse itself and must terminate.
wrong-CLIST-index
Is optional for processors that have more than one item in their INFOR CLIST and
only need to analyze one specific command automatically; this is specified by its
CLIST index given in register A0 prior to calling REPRM$. This return is never taken
if register A0 is zero on entry to REPRM$.
After the wrong-CLIST-index return, X11 points to a reentry location when the
preprocessor routine continues. (Note that the CLIST index is found in S3 of
INFOR$+1.)
Use the following instructions to reenter REPRM$:
LMJ X11,0,X11
error return
normal return
The two returns are the same as PREPRM$.
7833 1733–004 14–9