1
0
forked from GitHub/gf-core

changed names of resource-1.3; added a note on homepage on release

This commit is contained in:
aarne
2008-06-25 16:54:35 +00:00
parent 7d721eb16e
commit c5c6d13546
1729 changed files with 113 additions and 32 deletions

View File

@@ -0,0 +1,23 @@
module Main where
import GSyntax
import SemBase
import Logic
import GF.GFCC.API
main :: IO ()
main = do
gr <- file2grammar "base.gfcc"
loop gr
loop :: MultiGrammar -> IO ()
loop gr = do
s <- getLine
let t:_ = parse gr "BaseEng" "S" s
putStrLn $ showTree t
let p = iS $ fg t
putStrLn $ show p
let v = valProp exModel [] p
putStrLn $ show v
loop gr