addModuleClassPath :: HscEnv -> [FilePath] -> IO ()
addModuleClassPath hsc_env cp = do
  debugTraceMsg (hsc_dflags hsc_env) 3 $ text ( "Adding module classpath: " ++ (show cp) )
  when (not (null cp)) $
    iservCmd hsc_env (AddModuleClassPath cp)
addModuleClassPath :: HscEnv -> [FilePath] -> IO ()
addModuleClassPath hsc_env cp = do
  debugTraceMsg (hsc_dflags hsc_env) 3 $ text ( "Adding module classpath: " ++ (show cp) )
  when (not (null cp)) $
    iservCmd hsc_env (AddModuleClassPath cp)
addModuleClassPath hsc_env cp = do
  debugTraceMsg (hsc_dflags hsc_env) 3 $ text ( "Adding module classpath: " ++ (show cp) )
  when (not (null cp)) $
    iservCmd hsc_env (AddModuleClassPath cp)