xc-jp / casper

casper

Extremely simple content-addressable storage.

main = do
  store <- initStore "./store"
  runCasperT $ do
    addr :: Address [Int] <- write [1,2,3]
    ...
    read addr >>= liftIO . print