エラー文字列が空のとき、変数にNULLではなく'\0'を設定するよう変更
[YACASL2.git] / as / cmd / IN / in.casl
1 ;;; IN IBUF,ILEN
2 MAIN    START
3 LOOP    IN      IBUF,ILEN
4 FIN     RET
5 IBUF    DS      20
6 ILEN    DS      1
7         END