Adds File system library.

coalton-lang · May 9, 2024 · 4cd1d57 · 4cd1d57
1 parent 52f90fb
commit 4cd1d57
Show file tree

Hide file tree

Showing 8 changed files with 915 additions and 12 deletions.
diff --git a/coalton.asd b/coalton.asd
@@ -182,6 +182,7 @@
                (:file "monad/free")
                (:file "seq")
                (:file "system")
+               (:file "file")
                (:file "prelude")))
 
 (when (member (getenv "COALTON_PORTABLE_BIGFLOAT") '("1" "true" "t") :test 'equalp)
@@ -341,4 +342,5 @@
                (:file "seq-tests")
                (:file "unused-variables")
                (:file "pattern-matching-tests")
-               (:file "looping-native-tests")))
+               (:file "looping-native-tests")
+               (:file "file-tests")))
diff --git a/library/classes.lisp b/library/classes.lisp
@@ -35,6 +35,7 @@
    #:Into
    #:TryInto
    #:Iso
+   #:Signalable
    #:error
    #:Unwrappable #:unwrap-or-else #:with-default #:unwrap #:expect #:as-optional
    #:default #:defaulting-unwrap))
@@ -284,7 +285,7 @@
   ;;
   ;; Unwrappable for fallible unboxing
   ;;
-
+  
   (define-class (Unwrappable :container)
     "Containers which can be unwrapped to get access to their contents.