diff options
| author | Eduardo Julian | 2022-07-09 14:35:38 -0400 |
|---|---|---|
| committer | Eduardo Julian | 2022-07-09 14:35:38 -0400 |
| commit | 7db42ab1b9d3c764772ca63c74bf44bb2b8b8325 (patch) | |
| tree | bd1c865dea0902790f3e462cec4f9bc8d8ae428f /lux-ruby | |
| parent | fc2737b5226eda69c12bc593e83e22ed54e4d3af (diff) | |
First-class programs instead of having a "lux program" extension.
Diffstat (limited to 'lux-ruby')
| -rw-r--r-- | lux-ruby/source/program.lux | 43 |
1 files changed, 22 insertions, 21 deletions
diff --git a/lux-ruby/source/program.lux b/lux-ruby/source/program.lux index 35aada877..df8ed9b66 100644 --- a/lux-ruby/source/program.lux +++ b/lux-ruby/source/program.lux @@ -1,7 +1,7 @@ (.require [library [lux (.except) - [program (.only program:)] + [program (.only program)] ["[0]" debug] ["[0]" ffi (.only import)] [abstract @@ -987,23 +987,24 @@ (-> Any platform.Custom) (undefined)) -(program: [service cli.service] - (exec - (do async.monad - [_ (/.compiler ..lux_compiler - (context.ruby (cli.target service)) - ..expander - analysis.bundle - ..platform - generation.bundle - (function.constant extension/bundle.empty) - ..program - [Register _.Expression _.Statement] - ..extender - service - [packager.package - (format (cli.target service) - (at file.default separator) - "program")])] - (..declare_success! [])) - (io.io []))) +(def _ + (program [service cli.service] + (exec + (do async.monad + [_ (/.compiler ..lux_compiler + (context.ruby (cli.target service)) + ..expander + analysis.bundle + ..platform + generation.bundle + (function.constant extension/bundle.empty) + ..program + [Register _.Expression _.Statement] + ..extender + service + [packager.package + (format (cli.target service) + (at file.default separator) + "program")])] + (..declare_success! [])) + (io.io [])))) |