diff options
Diffstat (limited to 'lux-lua')
| -rw-r--r-- | lux-lua/project.lux | 4 | ||||
| -rw-r--r-- | lux-lua/source/program.lux | 12 |
2 files changed, 8 insertions, 8 deletions
diff --git a/lux-lua/project.lux b/lux-lua/project.lux index 855257f3f..4d0c10a35 100644 --- a/lux-lua/project.lux +++ b/lux-lua/project.lux @@ -1,5 +1,5 @@ {"" - {#identity ["com.github.luxlang" "lux-lua" "0.6.0-SNAPSHOT"] + [#identity ["com.github.luxlang" "lux-lua" "0.6.0-SNAPSHOT"] #deploy_repositories {"snapshots" "https://oss.sonatype.org/content/repositories/snapshots/" "releases" "https://oss.sonatype.org/service/local/staging/deploy/maven2/"} @@ -13,4 +13,4 @@ ["net.sandius.rembulan" "rembulan-stdlib" "0.1-SNAPSHOT" "jar"] ["net.sandius.rembulan" "rembulan-compiler" "0.1-SNAPSHOT" "jar"]] - #program "program"}} + #program "program"]} diff --git a/lux-lua/source/program.lux b/lux-lua/source/program.lux index 0f153241d..a8e8c4e93 100644 --- a/lux-lua/source/program.lux +++ b/lux-lua/source/program.lux @@ -781,24 +781,24 @@ (do io.monad [[baggage host] ..host] (in [baggage - {#platform.&file_system (file.async file.default) + [#platform.&file_system (file.async file.default) #platform.host host #platform.phase lua.generate #platform.runtime runtime.generate #platform.phase_wrapper ..phase_wrapper - #platform.write (|>> _.code (\ utf8.codec encoded))}])))] + #platform.write (|>> _.code (\ utf8.codec encoded))]])))] (for {@.old <jvm> @.jvm <jvm> @.lua (def: platform (IO (Platform [Register _.Label] _.Expression _.Statement)) (do io.monad [host ..host] - (in {#platform.&file_system (file.async file.default) + (in [#platform.&file_system (file.async file.default) #platform.host host #platform.phase lua.generate #platform.runtime runtime.generate #platform.phase_wrapper ..phase_wrapper - #platform.write (|>> _.code (\ utf8.codec encoded))})))})) + #platform.write (|>> _.code (\ utf8.codec encoded))])))})) (def: (program context program) (Program _.Expression _.Statement) @@ -819,10 +819,10 @@ @.lua platform})) ..platform] (exec (do async.monad - [_ (/.compiler {#/static.host @.lua + [_ (/.compiler [#/static.host @.lua #/static.host_module_extension extension #/static.target (/cli.target service) - #/static.artifact_extension extension} + #/static.artifact_extension extension] (for {@.old (..expander baggage) @.jvm (..expander baggage) @.lua ..expander}) |