diff options
| author | hallgren <hallgren@chalmers.se> | 2014-10-22 15:45:52 +0000 |
|---|---|---|
| committer | hallgren <hallgren@chalmers.se> | 2014-10-22 15:45:52 +0000 |
| commit | 6ee67cd04ffbce375d7f10e74a5d9eb742d6428d (patch) | |
| tree | fa90c0a4d72b30bbe486db51b2ebab81c0767fe9 /src/compiler/GF/Command/Importing.hs | |
| parent | 00922153aa1f94754847f60a959f3849dfc4771b (diff) | |
Various small changes for improved documentation
Diffstat (limited to 'src/compiler/GF/Command/Importing.hs')
| -rw-r--r-- | src/compiler/GF/Command/Importing.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/compiler/GF/Command/Importing.hs b/src/compiler/GF/Command/Importing.hs index 4c5d796c5..e2284aa58 100644 --- a/src/compiler/GF/Command/Importing.hs +++ b/src/compiler/GF/Command/Importing.hs @@ -48,7 +48,7 @@ importSource :: SourceGrammar -> Options -> [FilePath] -> IO SourceGrammar importSource src0 opts files = do src <- appIOE $ batchCompile opts files case src of - Ok (_,_,gr) -> return gr + Ok (_,(_,gr)) -> return gr Bad msg -> do putStrLn msg return src0 |