diff options
| author | Justin Ethier <justin.ethier@gmail.com> | 2016-07-03 22:13:32 -0400 |
|---|---|---|
| committer | Justin Ethier <justin.ethier@gmail.com> | 2016-07-03 22:13:32 -0400 |
| commit | 347e18ff7e682c0ba06c1d6fd8f4f1ba5497ecb1 (patch) | |
| tree | d90880edb6411c000bc7dad93e416e335e603de4 | |
| parent | b12b72db08fa18115766116aee488cd6fa32ab86 (diff) | |
Fixed compilation issues in FFI.hsv3.19.3
| -rw-r--r-- | ChangeLog.markdown | 7 | ||||
| -rw-r--r-- | hs-src/Language/Scheme/FFI.hs | 4 | ||||
| -rw-r--r-- | husk-scheme.cabal | 2 |
3 files changed, 10 insertions, 3 deletions
diff --git a/ChangeLog.markdown b/ChangeLog.markdown index 6fda46ec..431e5737 100644 --- a/ChangeLog.markdown +++ b/ChangeLog.markdown @@ -1,3 +1,10 @@ +v3.19.3 +-------- + +Big Fixes: + +- Fixed compilation errors in `FFI.hs`. + v3.19.2 -------- diff --git a/hs-src/Language/Scheme/FFI.hs b/hs-src/Language/Scheme/FFI.hs index b72f992c..aecfe660 100644 --- a/hs-src/Language/Scheme/FFI.hs +++ b/hs-src/Language/Scheme/FFI.hs @@ -38,7 +38,7 @@ evalfuncLoadFFI :: [LispVal] -> IOThrowsError LispVal - TODO: pass a list of functions to import. Need to make sure this is done in an efficient way - (IE, result as a list that can be processed) -} -evalfuncLoadFFI [(Continuation env _ _ _), String targetSrcFile, +evalfuncLoadFFI [(Continuation env _ _ _ _), String targetSrcFile, String moduleName, String externalFuncName, String internalFuncName] = do @@ -83,7 +83,7 @@ FUTURE: should be able to load multiple functions in one shot (?). -} defineVar env internalFuncName (IOFunc result) -- >>= continueEval env cont -- Overload that loads code from a compiled module -evalfuncLoadFFI [(Continuation env _ _ _), String moduleName, String externalFuncName, String internalFuncName] = do +evalfuncLoadFFI [(Continuation env _ _ _ _), String moduleName, String externalFuncName, String internalFuncName] = do result <- liftIO $ defaultRunGhc $ do dynflags <- GHC.getSessionDynFlags _ <- GHC.setSessionDynFlags dynflags diff --git a/husk-scheme.cabal b/husk-scheme.cabal index 1bca85f0..1bac63c7 100644 --- a/husk-scheme.cabal +++ b/husk-scheme.cabal @@ -1,5 +1,5 @@ Name: husk-scheme -Version: 3.19.2 +Version: 3.19.3 Synopsis: R5RS Scheme interpreter, compiler, and library. Description: <<https://github.com/justinethier/husk-scheme/raw/master/docs/husk-scheme.png>> |