msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

added tests for literals in the abstract syntax

Browse Source
This commit is contained in:
krasimir
2010-02-01 08:58:46 +00:00
parent 2d3de22b17
commit 1cd4a500f5
3 changed files with 26 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
testsuite/compiler/typecheck/abstract/LitAbs.gf Normal file
View File

@@ -0,0 +1,15 @@
abstract LitAbs = {
cat CStr String ;
CInt Int ;
CFloat Float ;
data empty : CStr "" ;
null : CStr [] ;
other : CStr "other" ;
data zero : CInt 0 ;
data pi : CFloat 3.14 ;
}

6
testsuite/compiler/typecheck/abstract/LitAbs.gfs Normal file
View File

@@ -0,0 +1,6 @@
i -src testsuite/compiler/typecheck/abstract/LitAbs.gf
ai null
ai empty
ai other
ai zero
ai pi

5
testsuite/compiler/typecheck/abstract/LitAbs.gfs.gold Normal file
View File

@@ -0,0 +1,5 @@
data null : CStr ""
data empty : CStr ""
data other : CStr "other"