Light testing

docs/api/process.rst

@@ -7,4 +7,5 @@ basilisp.process
 
 .. autonamespace:: basilisp.process
    :members:
-   :undoc-members:
+   :undoc-members:
+   :exclude-members: FileWrapper, SubprocessRedirectable, ->FileWrapper, is-file-like?, is-path-like?

src/basilisp/process.lpy

@@ -232,8 +232,7 @@
 
 (defn exec
   "Execute a command as by :lpy:fn:`start` and, upon successful return, return the
-  captured value of the process ``stdout`` (which may be a string or bytes depending
-  on whether the process was opened in text or binary mode).
+  captured value of the process ``stdout`` as by :lpy:fn:`basilisp.core/slurp`.
 
   If ``opts`` are specified, they should be provided as a map in the first argument
   position. ``opts`` are exactly the same as those in :lpy:fn:`start`.
@@ -293,7 +292,7 @@
   The following keyword/value arguments are optional:
 
    :keyword ``:input``: a string or bytes object (depending on whether the process
-       was opened in text or bniary mode); if omitted, do not send anything
+       was opened in text or binary mode); if omitted, do not send anything
    :keyword ``timeout``: an optional timeout"
   [process & kwargs]
   (let [kwargs (apply hash-map kwargs)]

tests/basilisp/test_process.lpy

@@ -0,0 +1,37 @@
+(ns tests.basilisp.test-process
+  (:import pathlib)
+  (:require
+   [basilisp.process :as process]
+   [basilisp.test :as test :refer [deftest is are testing]]
+   [basilisp.test.fixtures :as fixtures :refer [*tempdir*]]))
+
+(test/use-fixtures :each fixtures/tempdir)
+
+(deftest is-file-like?-test
+  (are [v] (true? (process/is-file-like? v))
+    -1
+    0
+    1)
+
+  (with-open [f (python/open (pathlib/Path *tempdir* "is-file-like.txt") ** :mode "w")]
+    (is (true? (process/is-file-like? f))))
+
+  (are [v] (false? (process/is-file-like? v))
+    "i'm a path-like"
+    #b "i'm a path-like"
+    (pathlib/Path "/home/chris")))
+
+(deftest is-path-like?-test
+  (are [v] (true? (process/is-path-like? v))
+    "i'm a path-like"
+    #b "i'm a path-like"
+    (pathlib/Path "/home/chris"))
+
+  (with-open [f (python/open (pathlib/Path *tempdir* "is-path-like.txt") ** :mode "w")]
+    (is (false? (process/is-path-like? f))))
+
+  (are [v] (false? (process/is-path-like? v))
+    nil
+    32
+    32.1
+    (python/object)))