diff options
Diffstat (limited to 'src/GF/Compile/API.hs')
| -rw-r--r-- | src/GF/Compile/API.hs | 21 |
1 files changed, 0 insertions, 21 deletions
diff --git a/src/GF/Compile/API.hs b/src/GF/Compile/API.hs deleted file mode 100644 index 242a9e87a..000000000 --- a/src/GF/Compile/API.hs +++ /dev/null @@ -1,21 +0,0 @@ -module GF.Compile.API (batchCompile, compileToGFCC) where - -import GF.Devel.Compile -import GF.Devel.GrammarToGFCC -import GF.GFCC.OptimizeGFCC -import GF.GFCC.CheckGFCC -import GF.GFCC.DataGFCC -import GF.Infra.Option -import GF.Devel.UseIO - --- | Compiles a number of source files and builds a 'GFCC' structure for them. -compileToGFCC :: Options -> [FilePath] -> IOE GFCC -compileToGFCC opts fs = - do gr <- batchCompile opts fs - let name = justModuleName (last fs) - gc1 <- putPointE opts "linking ... " $ - let (abs,gc0) = mkCanon2gfcc opts name gr - in ioeIO $ checkGFCCio gc0 - let opt = if oElem (iOpt "noopt") opts then id else optGFCC - par = if oElem (iOpt "noparse") opts then id else addParsers - return (par (opt gc1)) |