less noisy file errors

This commit is contained in:
2025-10-10 10:36:22 -07:00
parent 2a5e5ae4f5
commit b014e8d3e6

View File

@@ -10,8 +10,7 @@ pfunc readFile uses (MkIORes Left Right) : (fn : String) -> IO (Either String St
let content = fs.readFileSync(fn, 'utf8') let content = fs.readFileSync(fn, 'utf8')
result = Prelude_Right(null, null, content) result = Prelude_Right(null, null, content)
} catch (e) { } catch (e) {
let err = ""+e result = Prelude_Left(null, null, e+'')
result = Prelude_Left(null, null, e)
} }
return Prelude_MkIORes(null, result, w) return Prelude_MkIORes(null, result, w)
}` }`
@@ -24,8 +23,7 @@ pfunc writeFile uses (MkIORes MkUnit) : String → String → IO (Either String
fs.writeFileSync(fn, content, 'utf8') fs.writeFileSync(fn, content, 'utf8')
result = Prelude_Right(null, null, Prelude_MkUnit) result = Prelude_Right(null, null, Prelude_MkUnit)
} catch (e) { } catch (e) {
let err = ""+e result = Prelude_Left(null, null, e+"")
result = Prelude_Left(null, null, e)
} }
return Prelude_MkIORes(null, result, w) return Prelude_MkIORes(null, result, w)
}` }`