-32768〜32767の数値を出力するアセンブラプログラムouti.caslを修正し、テストを追加
[YACASL2.git] / as / ptn2.casl
1 PTN2    START
2         PUSH    0,GR1
3         LAD     GR2,16
4         SUBL    GR2,GR1
5         LD      GR1,GR2
6         LD      GR2,=#FFFF
7         SRL     GR2,0,GR1
8         POP     GR1
9         RET
10         END