BPX4MSS (mvssigsetup) example

The following code allows the invoker to catch signals. For the callable service, see mvssigsetup (BPX1MSS, BPX4MSS) — Set up MVS signals. AMODE 31 callers use BPX1MSS (mvssigsetup) example.

                                              
* Each bit of the mask represents a signal 1-64.                        
         MVC   INTMASK(8),=XL8'F000000000000000'    Default sig 1-4     
         MVC   TERMMASK(8),=XL8'F000000000000000'   Terminate sig 1-4   
         LA    R15,BUFFERA                                              
         STG   R15,USERWORD                                             
         SPACE ,                                                        
         CALL  BPX4MSS,              Register MVS signals, this task   +
               (=AD(SIRTN),          Input: Signal interrupt routine   +
               USERWORD,             Input: User data                  +
               INTMASK,              Input: Default override signals   +
               TERMMASK,             Input: Default terminate signals  +
               RETVAL,               Return value: 0 or -1             +
               RETCODE,              Return code                       +
               RSNCODE),             Reason code                       +
               MF=(E,PLIST)          ----------------------------------