Format via purs-tidy (#42)

* Format code

* Enforce formatting in CI

* Add changelog entry

Author: JordanMartinez

.github/workflows/ci.yml

@@ -15,6 +15,7 @@ jobs:
       - uses: purescript-contrib/setup-purescript@main
         with:
           purescript: "unstable"
+          purs-tidy: "latest"
 
       - uses: actions/setup-node@v3
         with:
@@ -33,3 +34,8 @@ jobs:
         run: |
           bower install
           npm run-script test --if-present
+
+      - name: Check formatting
+        run: |
+          purs-tidy check src test
+  

CHANGELOG.md

@@ -13,6 +13,7 @@ Bugfixes:
 Other improvements:
 - Bumped CI's node version to `lts/*` (#41 by @JordanMartinez)
 - Updated CI `actions/checkout` and `actions/setup-nodee` to `v3` (#41 by @JordanMartinez)
+- Format codebase & enforce formatting in CI via purs-tidy (#42 by @JordanMartinez)
 
 ## [v9.0.0](https://github.com/purescript-node/purescript-node-child-process/releases/tag/v9.0.0) - 2022-04-29
 

src/Node/ChildProcess.purs

@@ -88,7 +88,7 @@ type ChildProcessRec =
   , pid :: Pid
   , connected :: Boolean
   , kill :: String -> Unit
-  , send :: forall r. Fn2 { | r} Handle Boolean
+  , send :: forall r. Fn2 { | r } Handle Boolean
   , disconnect :: Effect Unit
   }
 
@@ -110,8 +110,8 @@ stderr = unsafeFromNullable (missingStream "stderr") <<< _.stderr <<< runChildPr
 missingStream :: String -> String
 missingStream str =
   "Node.ChildProcess: stream not available: " <> str <> "\nThis is probably "
-  <> "because you passed something other than Pipe to the stdio option when "
-  <> "you spawned it."
+    <> "because you passed something other than Pipe to the stdio option when "
+    <> "you spawned it."
 
 foreign import unsafeFromNullable :: forall a. String -> Nullable a -> a
 
@@ -491,7 +491,7 @@ data StdIOBehaviour
 
 -- | Create pipes for each of the three standard IO streams.
 pipe :: Array (Maybe StdIOBehaviour)
-pipe = map Just [Pipe, Pipe, Pipe]
+pipe = map Just [ Pipe, Pipe, Pipe ]
 
 -- | Share `stdin` with `stdin`, `stdout` with `stdout`,
 -- | and `stderr` with `stderr`.
@@ -506,8 +506,7 @@ foreign import process :: forall props. { | props }
 
 -- | Ignore all streams.
 ignore :: Array (Maybe StdIOBehaviour)
-ignore = map Just [Ignore, Ignore, Ignore]
-
+ignore = map Just [ Ignore, Ignore, Ignore ]
 
 -- Helpers
 

test/Main.purs

@@ -22,7 +22,7 @@ main = do
     log "nonexistent executable: all good."
 
   log "doesn't perform effects too early"
-  spawn "ls" ["-la"] defaultSpawnOptions >>= \ls -> do
+  spawn "ls" [ "-la" ] defaultSpawnOptions >>= \ls -> do
     let _ = kill SIGTERM ls
     onExit ls \exit ->
       case exit of
@@ -32,7 +32,7 @@ main = do
           log ("Bad exit: expected `Normally 0`, got: " <> show exit)
 
   log "kills processes"
-  spawn "ls" ["-la"] defaultSpawnOptions >>= \ls -> do
+  spawn "ls" [ "-la" ] defaultSpawnOptions >>= \ls -> do
     _ <- kill SIGTERM ls
     onExit ls \exit ->
       case exit of
@@ -46,9 +46,9 @@ main = do
 
 spawnLs :: Effect Unit
 spawnLs = do
-  ls <- spawn "ls" ["-la"] defaultSpawnOptions
+  ls <- spawn "ls" [ "-la" ] defaultSpawnOptions
   onExit ls \exit ->
-      log $ "ls exited: " <> show exit
+    log $ "ls exited: " <> show exit
   onData (stdout ls) (Buffer.toString UTF8 >=> log)
 
 nonExistentExecutable :: Effect Unit -> Effect Unit
@@ -65,6 +65,6 @@ execLs = do
 
 execSyncEcho :: String -> Effect Unit
 execSyncEcho str = do
-  resBuf <- execSync "cat" (defaultExecSyncOptions {input = Just str})
+  resBuf <- execSync "cat" (defaultExecSyncOptions { input = Just str })
   res <- Buffer.toString NE.UTF8 resBuf
   log res