.title excvec .link "sys$system:sys.stb"/se .psect $CODE quad,pic,con,lcl,shr,exe,nowrt .entry excvec,^m<> movL #CTL$AQ_EXCVEC,r0 movl 24(r0),@4(ap) movl 28(r0),@8(ap) movL #CTL$AL_FINALEXC,r0 movl 12(r0),@12(ap) ret .end