Supporting GHC7 (Krzysztof Skrzętnicki).

This commit is contained in:
Kazu Yamamoto 2010-11-17 12:27:23 +09:00
parent 11f1341fe5
commit 71ebb82eb2
1 changed files with 6 additions and 0 deletions

View File

@ -1,7 +1,13 @@
{-# LANGUAGE CPP #-}
module Lang where
import DynFlags
import Types
listLanguages :: Options -> IO String
#if __GLASGOW_HASKELL__ >= 700
listLanguages opt = return $ convert opt supportedLanguagesAndExtensions
#else
listLanguages opt = return $ convert opt supportedLanguages
#endif