mgsloan · December 10, 2015 01:48
diff --git a/Bar.hs b/Bar.hs
 module Bar where

 bar = answer * 20
diff --git a/Foo.hs b/Foo.hs
 import Language.Haskell.Interpreter

 foo :: IO (Either InterpreterError String)
 foo = runInterpreter $ do
  reset
  loadModules ["Bar", "Prelude"]
  setTopLevelModules ["Bar"]
  eval "bar"
diff --git a/Prelude.hs b/Prelude.hs
 {-# LANGUAGE PackageImports #-}

 module Prelude (module P, answer) where

 import "base" Prelude as P

 answer = 42
	import Language.Haskell.Interpreter

	foo :: IO (Either InterpreterError String)
	foo = runInterpreter $ do
	reset
	loadModules ["Bar", "Prelude"]
	setTopLevelModules ["Bar"]
	eval "bar"
	{-# LANGUAGE PackageImports #-}

	module Prelude (module P, answer) where

	import "base" Prelude as P

	answer = 42