haskell-nix/hnix-store
1
1
Fork 0
mirror of https://github.com/haskell-nix/hnix-store.git synced 2024-09-11 18:05:56 +03:00
Code Issues Projects Releases Wiki Activity

remote: neaten readme

Browse Source
This commit is contained in:
sorki 2023-12-09 16:42:36 +01:00
parent 5e909dbbd5
commit 4562922d7e
1 changed files with 4 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
hnix-store-remote/README.md
View File

@ -14,17 +14,14 @@ via `nix-daemon`.
```haskell ```haskell
{-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE OverloadedStrings #-}
import Control.Monad (void)
import Control.Monad.IO.Class (liftIO)
import System.Nix.StorePath (mkStorePathName) import System.Nix.StorePath (mkStorePathName)
import System.Nix.Store.Remote import System.Nix.Store.Remote
main :: IO () main :: IO ()
main = do main = do
void $ runStore $ do runStore $ do
syncWithGC syncWithGC
roots <- findRoots roots <- findRoots
liftIO $ print roots
res <- case mkStorePathName "hnix-store" of res <- case mkStorePathName "hnix-store" of
Left e -> error (show e) Left e -> error (show e)
@ -33,5 +30,7 @@ main = do
(StoreText name "Hello World!") (StoreText name "Hello World!")
mempty mempty
RepairMode_DontRepair RepairMode_DontRepair
liftIO $ print res
pure (roots, res)
>>= print
``` ```