.title TSX+ Initialization for clients .mcall .serr .psect c$code inicli:: mov #sfpa,r0 ;.sfpa emt 375 .serr ;all errors are soft rts pc .psect c$data sfpa: .byte 0,30 ;.sfpa .word 1 .end