From 7825a1a1c54d6922c709bed7de3f23f049e0046e Mon Sep 17 00:00:00 2001 From: aarne Date: Wed, 19 Sep 2007 13:49:12 +0000 Subject: adapted GFCC2FCFG to other uses of GFCC, made it to default parser --- src/GF/Compile/ShellState.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/GF/Compile/ShellState.hs') diff --git a/src/GF/Compile/ShellState.hs b/src/GF/Compile/ShellState.hs index 80956d8ff..57c0d1e88 100644 --- a/src/GF/Compile/ShellState.hs +++ b/src/GF/Compile/ShellState.hs @@ -260,7 +260,7 @@ updateShellState opts ign mcnc sh ((_,sgr,gr,eenv),rts) = do let fromGFC = snd . snd . Cnv.convertGFC opts (mcfgs, cfgs) = unzip $ map (curry fromGFC cgr) concrs - fcfgs = FCnv.convertGrammar (C2GFCC.mkCanon2gfcc cgr) + fcfgs = FCnv.convertGrammar (C2GFCC.mkCanon2gfccNoUTF8 cgr) pInfos = zipWith3 Prs.buildPInfo mcfgs (map snd fcfgs) cfgs -- cgit v1.2.3