diff options
Diffstat (limited to '')
-rw-r--r-- | new-luxc/source/luxc/lang/translation/r/procedure/common.jvm.lux | 10 | ||||
-rw-r--r-- | new-luxc/source/luxc/lang/translation/ruby/procedure/common.jvm.lux | 15 |
2 files changed, 0 insertions, 25 deletions
diff --git a/new-luxc/source/luxc/lang/translation/r/procedure/common.jvm.lux b/new-luxc/source/luxc/lang/translation/r/procedure/common.jvm.lux index 9d4fdce2a..ea85aef1e 100644 --- a/new-luxc/source/luxc/lang/translation/r/procedure/common.jvm.lux +++ b/new-luxc/source/luxc/lang/translation/r/procedure/common.jvm.lux @@ -319,14 +319,6 @@ Binary (runtimeT.text//char subjectO paramO)) -(def: (text//replace-all [textO patternO replacementO]) - Trinary - (r.apply (list patternO replacementO textO) (r.global "gsub"))) - -(def: (text//replace-once [textO patternO replacementO]) - Trinary - (r.apply (list patternO replacementO textO) (r.global "sub"))) - (def: (text//clip [subjectO paramO extraO]) Trinary (runtimeT.text//clip subjectO paramO extraO)) @@ -345,8 +337,6 @@ (install "index" (trinary text//index)) (install "size" (unary (|>> (apply1 (r.global "nchar")) runtimeT.int//from-float))) (install "hash" (unary runtimeT.text//hash)) - (install "replace-once" (trinary text//replace-once)) - (install "replace-all" (trinary text//replace-all)) (install "char" (binary text//char)) (install "clip" (trinary text//clip)) ))) diff --git a/new-luxc/source/luxc/lang/translation/ruby/procedure/common.jvm.lux b/new-luxc/source/luxc/lang/translation/ruby/procedure/common.jvm.lux index 1b90e322a..7ea0df048 100644 --- a/new-luxc/source/luxc/lang/translation/ruby/procedure/common.jvm.lux +++ b/new-luxc/source/luxc/lang/translation/ruby/procedure/common.jvm.lux @@ -347,23 +347,10 @@ Binary (|> subjectO (ruby.+ paramO))) -(def: (text//contains? [subjectO paramO]) - Binary - (ruby.send "include?" (list paramO) subjectO)) - (def: (text//char [subjectO paramO]) Binary (runtimeT.text//char subjectO paramO)) -(do-template [<name> <method>] - [(def: (<name> [subjectO paramO extraO]) - Trinary - (ruby.send <method> (list paramO extraO) subjectO))] - - [text//replace-all "gsub"] - [text//replace-once "sub"] - ) - (def: (text//clip [subjectO paramO extraO]) Trinary (runtimeT.text//clip subjectO paramO extraO)) @@ -382,8 +369,6 @@ (install "index" (trinary text//index)) (install "size" (unary text//size)) (install "hash" (unary text//hash)) - (install "replace-once" (trinary text//replace-once)) - (install "replace-all" (trinary text//replace-all)) (install "char" (binary text//char)) (install "clip" (trinary text//clip)) ))) |