.os_word_21
 LDRB    R14, [R1, #0]			;get the parameter
 TEQ     R14, #0			;Define pointer?
 BNE     vector_handler_forward		;NO

 BL      check_taskID			;is the task supported?
 BNE     vector_handler_forward		;NO, call directly

 LDR     R14, emulate_RISCOS
 CMP     R14, #&350 << 8		;below RO3.50?
 BHS     vector_handler_forward		;NO, pass to RISCOS

 STMFD   R13!, {R0-R2}			;preserve R0-R2
 BL      pre_SWI_veneer			;call SWI that follows
 SWI     XOS_Word
 BL      post_SWI_veneer

 MOV     R0, #19
 SWI     XOS_Byte			;PRM1-652 force a VSync
 BL      dontexit_SWI_veneer		;return to entry CPU mode
EXITSWI "R0-R2"
