From e53c1a090eb9cfac3cb23d10d981648d02518ed1 Mon Sep 17 00:00:00 2001 From: Eduardo Julian Date: Fri, 13 Aug 2021 04:18:57 -0400 Subject: Made program: specify its bindings the same way as syntax:. --- lux-php/source/program.lux | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'lux-php') diff --git a/lux-php/source/program.lux b/lux-php/source/program.lux index 25fc3fefa..dc3d270a7 100644 --- a/lux-php/source/program.lux +++ b/lux-php/source/program.lux @@ -230,7 +230,7 @@ ... Methods (program/StructureValue [] (getValue self) java/lang/Object - (:assume value)) + (:expected value)) (php/runtime/Memory [] (toString self) @@ -446,7 +446,7 @@ (def: (call_macro inputs lux macro) (-> (List Code) Lux php/runtime/memory/ObjectMemory (Try (Try [Lux (List Code)]))) - (<| :assume + (<| :expected (do try.monad [output (php/runtime/lang/Closure::call ..default_environment (|> (ffi.array php/runtime/Memory 3) @@ -550,13 +550,13 @@ @.php (def: (extender handler) Extender - (:assume handler))}) + (:expected handler))}) (def: (declare_success! _) (-> Any (Promise Any)) (promise.future (\ world/program.default exit +0))) -(`` (program: [{service /cli.service}] +(`` (program: [service /cli.service] (let [extension ".php"] (do io.monad [platform ..platform] -- cgit v1.2.3