ilyakooo0/Idris-dev
1
0
Fork 0
mirror of https://github.com/ilyakooo0/Idris-dev.git synced 2024-11-15 01:25:05 +03:00
Code Issues Projects Releases Wiki Activity

New test

Browse Source
This commit is contained in:
Edwin Brady 2011-12-21 09:11:49 +00:00
parent 397542cd3e
commit 2342656792
3 changed files with 26 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
test/test005/expected Normal file
View File

@ -0,0 +1,6 @@
8
sO
(abc, 123)
(abc, 123)
([1, 2], [3, 4, 5])
([1, 2], [3, 4, 5])

4
test/test005/run Executable file
View File

@ -0,0 +1,4 @@
#!/bin/bash
idris test005.idr -o test005
./test005
rm -f test005 test005.ibc

16
test/test005/test005.idr Normal file
View File

@ -0,0 +1,16 @@
module main;
tstr : String;
tstr = "abc123";
tlist : List Int;
tlist = [1, 2, 3, 4, 5];
main : IO ();
main = do { print (abs (-8));
print (abs (S O));
print (span isAlpha tstr);
print (break isDigit tstr);
print (span (\x => x < 3) tlist);
print (break (\x => x > 2) tlist);
};