diff options
author | Eduardo Julian | 2021-08-08 17:56:15 -0400 |
---|---|---|
committer | Eduardo Julian | 2021-08-08 17:56:15 -0400 |
commit | f621a133e6e0a516c0586270fea8eaffb4829d82 (patch) | |
tree | 399396ee2f6a10df10cea9b78c51c76679b70e59 /stdlib/source/library/lux/world/shell.lux | |
parent | 17e7566be51df5e428a6b10e6469201a8a9468da (diff) |
No more #export magic syntax.
Diffstat (limited to 'stdlib/source/library/lux/world/shell.lux')
-rw-r--r-- | stdlib/source/library/lux/world/shell.lux | 22 |
1 files changed, 11 insertions, 11 deletions
diff --git a/stdlib/source/library/lux/world/shell.lux b/stdlib/source/library/lux/world/shell.lux index 696a0a730..b8fae1871 100644 --- a/stdlib/source/library/lux/world/shell.lux +++ b/stdlib/source/library/lux/world/shell.lux @@ -33,11 +33,11 @@ [// [file (#+ Path)]]) -(type: #export Exit +(type: .public Exit Int) (template [<code> <name>] - [(def: #export <name> + [(def: .public <name> Exit <code>)] @@ -45,7 +45,7 @@ [+1 error] ) -(interface: #export (Process !) +(interface: .public (Process !) (: (-> [] (! (Try Text))) read) (: (-> [] (! (Try Text))) @@ -72,17 +72,17 @@ [await] ))))) -(type: #export Command +(type: .public Command Text) -(type: #export Argument +(type: .public Argument Text) -(interface: #export (Shell !) +(interface: .public (Shell !) (: (-> [Environment Path Command (List Argument)] (! (Try (Process !)))) execute)) -(def: #export (async shell) +(def: .public (async shell) (-> (Shell IO) (Shell Async)) (implementation (def: (execute input) @@ -224,7 +224,7 @@ (destroy [] #io #try void) (waitFor [] #io #try int)]) - (exception: #export no_more_output) + (exception: .public no_more_output) (def: (default_process process) (-> java/lang/Process (IO (Try (Process IO)))) @@ -286,7 +286,7 @@ (|>> java/lang/String::toLowerCase (text.starts_with? "windows")) (java/lang/System::getProperty "os.name"))) - (implementation: #export default + (implementation: .public default (Shell IO) (def: (execute [environment working_directory command arguments]) @@ -306,7 +306,7 @@ @.jvm (as_is <jvm>)} (as_is))) -(interface: #export (Mock s) +(interface: .public (Mock s) (: (-> s (Try [s Text])) on_read) (: (-> s (Try [s Text])) @@ -361,7 +361,7 @@ (#try.Failure error) (in (#try.Failure error))))))) -(implementation: #export (mock mock init) +(implementation: .public (mock mock init) (All [s] (-> (-> [Environment Path Command (List Argument)] (Try (Mock s))) |