ibm:vm370-lib:macro:compswt.macro_src
Table of Contents
COMPSWT Source
References
- Fixes Applied : 0
- This Source Date : Saturday, December 9, 1978
- Last Fix ID : [Unmodified]
Source Listing
- COMPSWT.MACRO.txt
- MACRO 00001000
- &LBL COMPSWT &SWITCH 00002000
- LCLB &ON,&OFF 00003000
- &ON SETB ('&SWITCH' EQ 'ON') 00004000
- &OFF SETB ('&SWITCH' EQ 'OFF') 00005000
- AIF (&ON).SWTON 00006000
- AIF (&OFF).SWTOFF 00007000
- MNOTE 8,'COMPSWT ARG NOT ''ON'' OR ''OFF''' 00008000
- MEXIT 00009000
- .SWTOFF ANOP 00010000
- &LBL SVC 203 00011000
- DC X'04',X'0F' 00012000
- MEXIT 00013000
- .SWTON ANOP 00014000
- &LBL SVC 203 00015000
- DC X'03',X'0F' 00016000
- MEND 00017000
ibm/vm370-lib/macro/compswt.macro_src.txt · Last modified: 2023/08/06 13:38 by Site Administrator