diff options
Diffstat (limited to '')
4 files changed, 8 insertions, 8 deletions
diff --git a/stdlib/source/library/lux/target/jvm/bytecode.lux b/stdlib/source/library/lux/target/jvm/bytecode.lux index 0d94ae9f1..ba09af5bb 100644 --- a/stdlib/source/library/lux/target/jvm/bytecode.lux +++ b/stdlib/source/library/lux/target/jvm/bytecode.lux @@ -162,13 +162,13 @@ (: (Monad Try)) try.monad)) -(def: #export fail +(def: #export failure (-> Text Bytecode) (|>> #try.Failure function.constant)) (def: #export (throw exception value) (All [e] (-> (exception.Exception e) e Bytecode)) - (..fail (exception.construct exception value))) + (..failure (exception.construct exception value))) (def: #export (resolve environment bytecode) (All [a] (-> Environment (Bytecode a) (Resource [Environment (Row Exception) Instruction a]))) @@ -907,7 +907,7 @@ [>default (\ ! map ..big_jump (..jump @from @default)) >cases (|> @cases (monad.map ! (|>> (..jump @from) (\ ! map ..big_jump))) - (\ ! map (|>> (list.zip/2 (list\map product.left cases)))))] + (\ ! map (|>> (list.zipped/2 (list\map product.left cases)))))] (wrap [..no_exceptions (bytecode >default >cases)])) #.None diff --git a/stdlib/source/library/lux/target/jvm/encoding/name.lux b/stdlib/source/library/lux/target/jvm/encoding/name.lux index 5a1982d3e..02507ceb6 100644 --- a/stdlib/source/library/lux/target/jvm/encoding/name.lux +++ b/stdlib/source/library/lux/target/jvm/encoding/name.lux @@ -31,10 +31,10 @@ (text.replace_all ..internal_separator ..external_separator)))) -(def: #export sanitize +(def: #export safe (-> Text External) (|>> ..internal ..external)) (def: #export (qualify package class) (-> Text External External) - (format (..sanitize package) ..external_separator class)) + (format (..safe package) ..external_separator class)) diff --git a/stdlib/source/library/lux/target/jvm/reflection.lux b/stdlib/source/library/lux/target/jvm/reflection.lux index 50bb2b974..5745ecd89 100644 --- a/stdlib/source/library/lux/target/jvm/reflection.lux +++ b/stdlib/source/library/lux/target/jvm/reflection.lux @@ -303,8 +303,8 @@ (if (text\= class_name name) (if (n.= num_class_params num_type_params) (|> params - (list.zip/2 (list\map (|>> java/lang/reflect/TypeVariable::getName) - class_params)) + (list.zipped/2 (list\map (|>> java/lang/reflect/TypeVariable::getName) + class_params)) (list\fold (function (_ [name paramT] mapping) (dictionary.put name paramT mapping)) /lux.fresh) diff --git a/stdlib/source/library/lux/target/jvm/type/lux.lux b/stdlib/source/library/lux/target/jvm/type/lux.lux index b4abe4093..ea9df2259 100644 --- a/stdlib/source/library/lux/target/jvm/type/lux.lux +++ b/stdlib/source/library/lux/target/jvm/type/lux.lux @@ -233,4 +233,4 @@ check (#try.Failure error) - (check.fail error))) + (check.failure error))) |