GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-22 19:22:50 -06:00
Code Issues Packages Projects Releases Wiki Activity

Unicode. Batch transl into HTML.

Browse Source
This commit is contained in:
aarne
2004-01-28 12:42:20 +00:00
parent 1b002dec90
commit 1ca54cca20
12 changed files with 84 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/GF.hs
View File

@@ -24,7 +24,7 @@ main = do
let (os,fs) = getOptions "-" xs
java = oElem forJava os
isNew = oElem newParser os ---- temporary hack to have two parallel GUIs
putStrLn $ if java then encodeUTF8 welcomeMsg else welcomeMsg
putStrLnFlush $ if java then encodeUTF8 welcomeMsg else welcomeMsg
st <- case fs of
_ -> useIOE emptyShellState $ foldM (shellStateFromFiles os) emptyShellState fs
--- _ -> return emptyShellState