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

Remove n=

Browse Source
This commit is contained in:
aarne
2004-01-30 13:20:03 +00:00
parent 22dcbef870
commit 45d0484894
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/GF/Translate/GFT.hs
View File

@@ -27,7 +27,7 @@ main = do
---- interact (doTranslate grs cat) ---- interact (doTranslate grs cat)
s <- getLine s <- getLine
putStrLnFlush $ doTranslate grs cat s putStrLnFlush $ doTranslate grs cat $ drop 2 s
doTranslate grs cat s = doTranslate grs cat s =
let ss = [l +++ ":" +++ s | (l,s) <- zip (map (prIdent . cncId) grs) let ss = [l +++ ":" +++ s | (l,s) <- zip (map (prIdent . cncId) grs)