BPX1PTI (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 64 callers use BPX4PTI (pthread_testintr) example.
                                              
         CALL  BPX1PTI,              Cause an interrupt point to occur +
               (RETVAL,              Return value: 0 or -1             +
               RETCODE,              Return code                       +
               RSNCODE),             Reason code                       +
               VL,MF=(E,PLIST)       ----------------------------------