diff options
| author | krasimir <krasimir@chalmers.se> | 2010-04-23 20:46:14 +0000 |
|---|---|---|
| committer | krasimir <krasimir@chalmers.se> | 2010-04-23 20:46:14 +0000 |
| commit | 9253ee6010aee34b9349d21e17c76bf7123331ef (patch) | |
| tree | bc3933feacda87a6ce94d7999e8416865e687140 /testsuite/runtime | |
| parent | cc4d5d1d394dc561eca4f794e06d4912244c9906 (diff) | |
fix parsing of literals
Diffstat (limited to 'testsuite/runtime')
| -rw-r--r-- | testsuite/runtime/parser/Literals.gf | 2 | ||||
| -rw-r--r-- | testsuite/runtime/parser/LiteralsCnc.gf | 1 |
2 files changed, 3 insertions, 0 deletions
diff --git a/testsuite/runtime/parser/Literals.gf b/testsuite/runtime/parser/Literals.gf index a32940e79..0962c0356 100644 --- a/testsuite/runtime/parser/Literals.gf +++ b/testsuite/runtime/parser/Literals.gf @@ -4,5 +4,7 @@ abstract Literals = { fun IsString : String -> S ;
IsInteger : Int -> S ;
IsFloat : Float -> S ;
+
+ IsEq : Int -> S ;
}
\ No newline at end of file diff --git a/testsuite/runtime/parser/LiteralsCnc.gf b/testsuite/runtime/parser/LiteralsCnc.gf index d91a222c8..48da0119e 100644 --- a/testsuite/runtime/parser/LiteralsCnc.gf +++ b/testsuite/runtime/parser/LiteralsCnc.gf @@ -5,5 +5,6 @@ lincat S = Str ; lin IsString x = x.s ++ "is string" ;
lin IsInteger x = x.s ++ "is integer" ;
lin IsFloat x = x.s ++ "is float" ;
+lin IsEq x = x.s ++ "=" ++ x.s ;
}
\ No newline at end of file |