Merge branch 'master' into cmd-casl
[YACASL2.git] / as / cmd / SRA / sra.casl
1 ;;; SRA r,adr
2 MAIN    START
3         LAD     GR1,#6000
4         SRA     GR1,13
5         RET
6         END