YACAL2: CASL2処理系
[YACASL2.git] / as / ptn3.casl
1 PTN3   START
2        LD      GR2,=#0001
3        SLL     GR2,0,GR1
4        RET
5        END