Strings for IO driver errors

This commit is contained in:
2026-05-18 18:28:24 -05:00
parent 593aa96193
commit 2e13583de3
6 changed files with 69 additions and 102 deletions

View File

@@ -74,7 +74,7 @@ succ = y (self :
t))
ok = value rest : pair true (pair value rest)
err = code rest : pair false (pair code rest)
err = msg rest : pair false (pair msg rest)
matchResult = (errCase okCase result :
matchPair