d7fab44b500561e0258c7a2ad5e761764aa6a814
[YACASL2.git] / as / cmd / ST / st1.casl
1 ;;; ST r,adr,x
2 MAIN    START
3         LD      GR1,A
4         LAD     GR2,A
5         ST      GR1,1,GR2
6         RET
7 A       DC      5
8 B       DS      1
9         END