EXPORT MEM, TM, IOM

; note: NOT re-entrant!

MEM:
        move.l  (sp)+,savsp
        trap #8
        move.l  savsp,-(sp)
        rts

TM:
        move.l  (sp)+,savsp
        trap #9
        move.l  savsp,-(sp)
        rts

IOM:
        move.l  (sp)+,savsp
        trap #10
        move.l  savsp,-(sp)
        rts

savsp:  dc.l 0