ASMB,R,Q,C * NAME: SAM.. * SOURCE: 92070-18138 * RELOC: 92070-1X138 * 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 SAM..,0 92070-1X138 REV.1941 790807 * ENT $ALC,$RTN,$MAX,$.SAM ENT $SMLS * ENT $$SAM MUST NOT BE DEFINED * ENT REIO,ZEIO * * REIO RPL 101712B 'JSB EXEC' OP CODE ZEIO RPL 101712B 'JSB EXEC' OP CODE * $MAX NOP * $SMLS DEF SMEM DUMMY BLOCK ADDRESS(DON'T MESS!) * SMEM OCT -1 DUMMY BLOCK LENGTH (NOT USED) PNTR OCT 77777 DUMMY BLOCK END (DON'T MESS!) * $ALC NOP ISZ $ALC CCA CLB JMP $ALC,I * $RTN NOP ISZ $RTN ISZ $RTN JMP $RTN,I * $.SAM DEC -1 DUMMY MODULE * END