plugins-multistage 0.6 → 0.6.1

raw patch · 2 files changed

+3/−1 lines, 2 files

Files

• plugins-multistage.cabal +1/−1
• src/System/Plugins/MultiStage.hs +2/−0

@@ -1,5 +1,5 @@ name:           plugins-multistage-version:        0.6+version:        0.6.1 synopsis:       Dynamic linking for embedded DSLs with staged compilation description:    Dynamic compilation, linking and loading of functions in                 staged languages.

@@ -144,10 +144,12 @@     [ declareImport conf factory csig     , sigD bname $ appT [t|Ptr|] csig     , funD bname [clause [] (builder conf name) []]+    , pragInlD bname NoInline FunLike AllPhases     , sigD rname csig     , funD rname [clause [] (normalB [|$(varE factory) $ castPtrToFunPtr $(varE bname)|]) []]     , sigD wname hsig     , funD wname [clause (map varP as) (worker rname as) []]+    , pragInlD wname NoInline FunLike AllPhases     ]   where     base    = prefix ++ nameBase name ++ suffix