X-Git-Url: http://j8takagi.net/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=test%2Fsystem%2Fcasl2%2Flib_inl%2Finl.casl;fp=test%2Fsystem%2Fcasl2%2Flib_inl%2Finl.casl;h=0000000000000000000000000000000000000000;hb=03832f246ce06d0dae29f96c087b94c7086bb993;hp=28c6a9c5c4620a5c6e5164d0004aee5918adb2a6;hpb=a28d93cdaa900cf83060694519946f6ecc823936;p=YACASL2.git

diff --git a/test/system/casl2/lib_inl/inl.casl b/test/system/casl2/lib_inl/inl.casl
deleted file mode 100644
index 28c6a9c..0000000
--- a/test/system/casl2/lib_inl/inl.casl
+++ /dev/null
@@ -1,25 +0,0 @@
-;;; casl2 inl.casl ../casl2lib/inl.casl ../casl2lib/outl.casl
-MAIN    START
-LOOP    CALL    INL             ; GR1に数値、GR0に文字列の長さ
-        JOV     OV
-        AND     GR0,GR0
-        JZE     FIN
-        CPL     GR0,=#FFFF
-        JZE     NAN
-        CALL    OUTL
-        JUMP    LOOP
-OV      CPL     GR0,=#FFFF
-        JZE     LENOV
-        OUT     OVMSG,MLEN1
-        JUMP    LOOP
-NAN     OUT     NANMSG,MLEN2
-        JUMP    LOOP
-LENOV   OUT     LENOVMSG,MLEN3
-FIN     RET
-OVMSG   DC      'Over 65535'
-MLEN1   DC      10
-NANMSG  DC      'Not A Number'
-MLEN2   DC      12
-LENOVMSG DC     'Str too long. Stop'
-MLEN3   DC      18
-        END