diff options
Diffstat (limited to '')
| -rw-r--r-- | stdlib/source/library/lux/meta/compiler/language/lux/phase/extension/generation/scheme/common.lux | 13 |
1 files changed, 0 insertions, 13 deletions
diff --git a/stdlib/source/library/lux/meta/compiler/language/lux/phase/extension/generation/scheme/common.lux b/stdlib/source/library/lux/meta/compiler/language/lux/phase/extension/generation/scheme/common.lux index 9eec19a4a..894906ea0 100644 --- a/stdlib/source/library/lux/meta/compiler/language/lux/phase/extension/generation/scheme/common.lux +++ b/stdlib/source/library/lux/meta/compiler/language/lux/phase/extension/generation/scheme/common.lux @@ -39,19 +39,6 @@ [/// ["[1]" phase]]]]]) -(def .public (custom [parser handler]) - (All (_ s) - (-> [(Parser s) - (-> Text (Generator s))] - Handler)) - (function (_ extension_name phase archive input) - (when (<s>.result parser input) - {try.#Success input'} - (handler extension_name phase archive input') - - {try.#Failure error} - (/////.except extension.invalid_syntax [extension_name %synthesis input])))) - (def !unary (template (_ function) (|>> list _.apply (|> (_.constant function))))) |