Table of Contents

FSENTR Source

References

Source Listing

FSENTR.MACRO.txt 
  1.          MACRO                                                          00001000
  2. &LABEL   FSENTR &RGSV                                                   00002000
  3.          USING *,R15                                                    00003000
  4. &LABEL   L     R15,AFVS -- A(FVS) INTO R15                              00004000
  5.          USING FVSECT,R15                                               00005000
  6.          STM   R0,R14,&RGSV -- SAVE R0 THRU 14                          00006000
  7.          DROP  R15                                                      00007000
  8.          LR    R13,R15 -- REFERENCE 'FVS' INFO                          00008000
  9.          USING FVSECT,R13                                               00009000
  10.          BALR  R12,0 -- OUR OWN ADDRESSABILITY                          00010000
  11.          USING *,R12                                                    00011000
  12.          MEND                                                           00012000