diff options
Diffstat (limited to '')
| -rw-r--r-- | lux-php/source/program.lux | 12 |
1 files changed, 2 insertions, 10 deletions
diff --git a/lux-php/source/program.lux b/lux-php/source/program.lux index 14a1646a0..a13039760 100644 --- a/lux-php/source/program.lux +++ b/lux-php/source/program.lux @@ -555,14 +555,6 @@ (-> Any (Promise Any)) (promise.future (\ world/program.default exit +0))) -(def: (scope body) - (-> _.Statement _.Statement) - (let [@program (_.constant "lux_program")] - ($_ _.then - (_.define_function @program (list) body) - (_.; (_.apply/* (list) @program)) - ))) - (`` (program: [{service /cli.service}] (let [extension ".php"] (do io.monad @@ -581,10 +573,10 @@ [(& Nat _.Label) _.Expression _.Statement] ..extender service - [(packager.package (_.manual "") + [(packager.package (_.manual "<?php") _.code _.then - ..scope) + (|>>)) (format (/cli.target service) (\ file.default separator) "program" |