IO Streams in Standard Library

coalton.asd

@@ -102,6 +102,7 @@
                (:file "ordmap")
                (:file "seq")
                (:file "system")
+               (:file "stream")
                (:file "file")
                (:file "prelude")))
 
@@ -238,7 +239,8 @@
                #:coalton/testing
                #:fiasco
                #:quil-coalton/tests
-               #:thih-coalton/tests)
+               #:thih-coalton/tests
+               #:flexi-streams)
   :perform (asdf:test-op (o s)
                          (unless (symbol-call :coalton-tests :run-coalton-tests)
                            (error "Tests failed")))
@@ -292,6 +294,7 @@
                (:file "inliner-tests")
                (:file "inliner-tests-1") ; must come after inliner-tests
                (:file "deriver-tests")
+               (:file "stream-tests")
                (:file "file-tests")
                (:file "experimental-tests")
                (:file "exceptions")

library/prelude.lisp

@@ -247,6 +247,7 @@
    (#:optionalt #:coalton-library/monad/optionalt)
    (#:iter #:coalton-library/iterator)
    (#:sys #:coalton-library/system)
+   (#:stream #:coalton-library/stream)
    (#:file #:coalton-library/file)
    (#:experimental #:coalton-library/experimental)
    (#:loops #:coalton-library/experimental/loops)))