BPX4PTI (pthread_testintr) example

The following code causes a cancelation point. For the callable service, see pthread_testintr (BPX1PTI, BPX4PTI) — Cause a cancellation point to occur. AMODE 31 callers use BPX1PTI (pthread_testintr) example.
                                              
         CALL  BPX4PTI,              Cause an interrupt point to occur +
               (RETVAL,              Return value: 0 or -1             +
               RETCODE,              Return code                       +
               RSNCODE),             Reason code                       +
               MF=(E,PLIST)          ----------------------------------