diff options
Diffstat (limited to 'stdlib/source/library/lux/meta/compiler/language/lux/translation.lux')
| -rw-r--r-- | stdlib/source/library/lux/meta/compiler/language/lux/translation.lux | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/stdlib/source/library/lux/meta/compiler/language/lux/translation.lux b/stdlib/source/library/lux/meta/compiler/language/lux/translation.lux index 0bf955402..9e14a005b 100644 --- a/stdlib/source/library/lux/meta/compiler/language/lux/translation.lux +++ b/stdlib/source/library/lux/meta/compiler/language/lux/translation.lux @@ -61,7 +61,7 @@ (type .public (Host expression declaration) (Interface - (is (-> unit.ID [(Maybe unit.ID) expression] + (is (-> [(Maybe unit.ID) expression] (Try Any)) evaluate) (is (-> declaration @@ -219,12 +219,12 @@ (Operation anchor expression declaration descriptor.Module)) (phase.read (the #module))) -(def .public (evaluate! label code) +(def .public (evaluate! code) (All (_ anchor expression declaration) - (-> unit.ID [(Maybe unit.ID) expression] + (-> [(Maybe unit.ID) expression] (Operation anchor expression declaration Any))) (function (_ state) - (when (of (the #host state) evaluate label code) + (when (of (the #host state) evaluate code) {try.#Success output} {try.#Success [state output]} |