The TPU$HANDLER routine is the DECTPU condition handler.

    The DECTPU condition handler invokes the $PUTMSG system service,
    passing it the address of TPU$MESSAGE.

    Format

      TPU$HANDLER  signal_vector ,mechanism_vector