packages feed

arbb-vm 0.1.1.8 → 0.1.1.14

raw patch · 3 files changed

+38/−3 lines, 3 files

Files

Intel/ArbbVM.chs view
@@ -49,6 +49,8 @@                       endIf,                                              mapToHost, +                      setHeapSize, setDecompDegree, setNumThreads,+ -- REMOVE THIS EVENTUALLY                       fromContext  -------------------------@@ -825,3 +827,26 @@   +-- ----------------------------------------------------------------------+-- Aux functions ++setNumThreads c w = setNumThreads' c w >>= throwIfErrorIO0 +setDecompDegree c w = setDecompDegree' c w >>= throwIfErrorIO0 +setHeapSize w1 w2 = setHeapSize' w1 w2 >>= throwIfErrorIO0++{# fun unsafe arbb_set_num_threads as setNumThreads' +   { fromContext `Context'   ,+     cIntConv    `Word'      ,+     alloca-     `ErrorDetails' peekErrorDet* } -> `Error' cToEnum #} ++ +{# fun unsafe arbb_set_decomp_degree as setDecompDegree'+   { fromContext `Context'  , +     cIntConv    `Word'     , +     alloca-     `ErrorDetails' peekErrorDet* } -> `Error' cToEnum #} ++{# fun unsafe arbb_set_heap_size as setHeapSize' +   { cIntConv    `Word64'   ,+     cIntConv    `Word64'   , +     alloca-     `ErrorDetails' peekErrorDet* } -> `Error' cToEnum #} + 
Intel/ArbbVM/Convenience.hs view
@@ -46,7 +46,6 @@    freeBinding_,    getNestedType_,  -    withArray_, print_,     doarith_, SimpleArith(V),@@ -55,7 +54,14 @@    liftIO, liftMs,     -- These should probably be internal only:-   getCtx, getFun+   getCtx, getFun,+++   -- low level +   +   setNumThreads_, setDecompDegree_+   +  ) where @@ -411,6 +417,10 @@  createDenseBinding_ = lift4 createDenseBinding freeBinding_        = lift1 freeBinding++-- +setDecompDegree_ = lift1 setDecompDegree+setNumThreads_ = lift1 setNumThreads  ---------------------------------------- -- These are easy ones, no Context or Function argument:
arbb-vm.cabal view
@@ -1,5 +1,5 @@ Name:           arbb-vm-Version:        0.1.1.8+Version:        0.1.1.14  License:                BSD3 License-file:           LICENSE