GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-10 11:42:51 -06:00
Code Issues Packages Projects Releases Wiki Activity

restored Int size and last ; added lib/prelude to be the last in any grammar path

Browse Source
This commit is contained in:
aarne
2007-12-16 22:24:36 +00:00
parent 49b3ffb7a0
commit 7551c70db6
8 changed files with 28 additions and 28 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
src/GF/Compile/CheckGrammar.hs
View File

@@ -340,10 +340,7 @@ computeLType gr t = do
Q m c | elem c [cPredef,cPredefAbs] -> return ty
Q m c | elem c [zIdent "Int"] ->
return $ defLinType
---- let ints k = App (Q (IC "Predef") (IC "Ints")) (EInt k) in
---- RecType [
---- (LIdent "last",ints 9),(LIdent "s", typeStr), (LIdent "size",ints 1)]
return $ linTypeInt
Q m c | elem c [zIdent "Float",zIdent "String"] -> return defLinType ----
Q m ident -> checkIn ("module" +++ prt m) $ do