rf-web/vendor/bundle/gems/rouge-3.12.0/lib/rouge/demos/m68k

17 lines
303 B
Plaintext
Raw Normal View History

2019-10-21 08:18:17 +00:00
initialize: ; go into super user mode
clr.l -(a7)
move.w #32,-(a7)
trap #1
addq.l #6,a7
move.l d0,oldstack
rts
restore: ; go back into user mode
move.l oldstack,-(a7)
move.w #32,-(a7)
trap #1
addq.l #6,a7
rts
oldstack dc.l 0