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

float parsing fixed

Browse Source
This commit is contained in:
aarne
2005-12-11 17:48:55 +00:00
parent 0818aa7dc6
commit c2dde4e80f
9 changed files with 52 additions and 31 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/GF/Grammar/Values.hs
View File

@@ -83,7 +83,7 @@ cString :: Ident
cString = identC "String"
isPredefCat :: Ident -> Bool
isPredefCat c = elem c [cInt,cString]
isPredefCat c = elem c [cInt,cString,cFloat]
eType :: Exp
eType = Sort "Type"