diff options
Diffstat (limited to 'stdlib/source/lux/world/console.lux')
-rw-r--r-- | stdlib/source/lux/world/console.lux | 9 |
1 files changed, 3 insertions, 6 deletions
diff --git a/stdlib/source/lux/world/console.lux b/stdlib/source/lux/world/console.lux index dedf3603f..8f58b0266 100644 --- a/stdlib/source/lux/world/console.lux +++ b/stdlib/source/lux/world/console.lux @@ -6,7 +6,6 @@ [concurrency ["." promise (#+ Promise)]] [security - ["." integrity (#+ Dirty)] [capability (#+ Capability)]]] [data ["." error (#+ Error)] @@ -27,7 +26,7 @@ ) (type: #export (Can-Read ! o) - (Capability [] (! (Error (Dirty o))))) + (Capability [] (! (Error o)))) (type: #export (Can-Write ! i) (Capability i (! (Error Any)))) @@ -87,12 +86,10 @@ (def: (read _) (|> jvm-input InputStream::read - (:: (error.with-error io.functor) map (|>> .nat integrity.taint)))) + (:: (error.with-error io.functor) map .nat))) (def: (read-line _) - (|> jvm-console - java/io/Console::readLine - (:: (error.with-error io.functor) map integrity.taint))) + (java/io/Console::readLine jvm-console)) (def: (write message) (PrintStream::print message jvm-output)) |