ASMB,Q,C * NAME: CLA.. * SOURCE: 92071-18268 * RELOC: 92071-1X268 * PGMR: HLC * * * **************************************************************** * * (C) COPYRIGHT HEWLETT-PACKARD COMPANY 1980. 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 CLA..,0 92071-1X268 REV.2041 790807 * * * * THIS IS THE DUMMY MODULE FOR THE CLASS I/O OPTION * * ENT $I.CL,$C.CL,$G.CL,$F.CL ENT REIO,ZEIO,$.CLA * ENT $$CLA MUST NOT BE DEFINED * EXT $OPXX SPC 3 $I.CL EQU * **ABORT PGM IF CLASS I/O REQUEST** $C.CL EQU * **CAN'T GET HERE** NOP $G.CL EQU * **ABORT PROGRAM ON CLASS GET REQUEST** JMP $OPXX GO ABORT IT SPC 3 * DUMMY CLASS FLUSH $F.CL NOP ISZ $F.CL JMP $F.CL,I SIMPLY RETURN * REIO RPL 101712B 'JSB EXEC' OP CODE ZEIO RPL 101712B 'JSB EXEC' OP CODE * $.CLA DEC -1 DUMMY MODULE END