diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/GFC.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/GFC.hs b/src/GFC.hs index ef6968da3..8af23d6e1 100644 --- a/src/GFC.hs +++ b/src/GFC.hs @@ -24,7 +24,7 @@ mainGFC opts fs = case () of _ | null fs -> fail $ "No input files." _ | all (extensionIs ".cf") fs -> compileCFFiles opts fs - _ | all (extensionIs ".gf") fs -> compileSourceFiles opts fs + _ | all (\f -> extensionIs ".gf" f || extensionIs ".gfo" f) fs -> compileSourceFiles opts fs _ | all (extensionIs ".pgf") fs -> unionPGFFiles opts fs _ -> fail $ "Don't know what to do with these input files: " ++ show fs where extensionIs ext = (== ext) . takeExtension |