vendor/bundle/ruby/3.4.0/gems/rouge-4.7.0/lib/rouge/demos/m68k


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

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