ASMB,R,Q,C * NAME: SWA.. * SOURCE: 92070-18159 * RELOC: 92070-1X159 * PGMR: HLC * * * **************************************************************** * * (C) COPYRIGHT HEWLETT-PACKARD COMPANY 1979. ALL RIGHTS * * * RESERVED. NO PART OF THIS PROGRAM MAY BE PHOTOCOPIED, * * * REPRODUCED OR TRANSLATED TO ANOTHER PROGRAM LANGUAGE WITHOUT * * * THE PRIOR WRITTEN CONSENT OF HEWLETT-PACKARD COMPANY. * * **************************************************************** * * NAM SWA..,0 92070-1X159 REV.1941 790807 ENT $DREL,$SWAP,$XEQ3,$.SWA ENT $SWLU,REIO,ZEIO * ENT $$SWA MUST NOT BE DEFINED * EXT $XEQ1 * REIO RPL 101712B 'JSB EXEC' OP CODE ZEIO RPL 101712B 'JSB EXEC' OP CODE * $XEQ3 EQU * $SWAP JMP $XEQ1 * * $DREL NOP JMP *-1,I * $SWLU DEC -1 INDICATES DUMMY MODULE $.SWA DEC -1 DUMMY MODULE END