aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/lux/tool
diff options
context:
space:
mode:
authorEduardo Julian2019-07-25 00:45:51 -0400
committerEduardo Julian2019-07-25 00:45:51 -0400
commit78fd01f7e6688448bbd710336d4d7b1c35ae058a (patch)
treec318b6dc47a20dfabf51c9d920fa8e8fd7cdd6f1 /stdlib/source/lux/tool
parent6425e4cfe470b54d76bb316cbdb6fdb21dd63130 (diff)
No more "i/"-prefixed functions.
Diffstat (limited to 'stdlib/source/lux/tool')
-rw-r--r--stdlib/source/lux/tool/compiler/phase/generation/php/case.lux4
-rw-r--r--stdlib/source/lux/tool/compiler/phase/generation/python/case.lux4
-rw-r--r--stdlib/source/lux/tool/compiler/phase/generation/ruby/case.lux4
-rw-r--r--stdlib/source/lux/tool/compiler/synthesis.lux3
4 files changed, 11 insertions, 4 deletions
diff --git a/stdlib/source/lux/tool/compiler/phase/generation/php/case.lux b/stdlib/source/lux/tool/compiler/phase/generation/php/case.lux
index abd31b7f2..fedfff63f 100644
--- a/stdlib/source/lux/tool/compiler/phase/generation/php/case.lux
+++ b/stdlib/source/lux/tool/compiler/phase/generation/php/case.lux
@@ -8,6 +8,8 @@
["." product]
["." text
["%" format (#+ format)]]
+ [number
+ ["i" int]]
[collection
["." list ("#@." functor fold)]
["." set]]]
@@ -104,7 +106,7 @@
(-> Nat Statement)
(_.; (_.array-splice/3 [@cursor
(_.int +0)
- (_.int (i/* -1 (.int pops)))])))
+ (_.int (i.* -1 (.int pops)))])))
(template [<name> <flag> <prep>]
[(def: (<name> simple? idx)
diff --git a/stdlib/source/lux/tool/compiler/phase/generation/python/case.lux b/stdlib/source/lux/tool/compiler/phase/generation/python/case.lux
index 80a142b37..9589e3336 100644
--- a/stdlib/source/lux/tool/compiler/phase/generation/python/case.lux
+++ b/stdlib/source/lux/tool/compiler/phase/generation/python/case.lux
@@ -7,6 +7,8 @@
[data
["." text
["%" format (#+ format)]]
+ [number
+ ["i" int]]
[collection
["." list ("#@." functor fold)]
["." set]]]
@@ -100,7 +102,7 @@
(def: (multi-pop! pops)
(-> Nat (Statement Any))
- (_.delete (_.slice-from (_.int (i/* -1 (.int pops))) @cursor)))
+ (_.delete (_.slice-from (_.int (i.* -1 (.int pops))) @cursor)))
(template [<name> <flag> <prep>]
[(def: (<name> simple? idx)
diff --git a/stdlib/source/lux/tool/compiler/phase/generation/ruby/case.lux b/stdlib/source/lux/tool/compiler/phase/generation/ruby/case.lux
index 41e55749e..695485a16 100644
--- a/stdlib/source/lux/tool/compiler/phase/generation/ruby/case.lux
+++ b/stdlib/source/lux/tool/compiler/phase/generation/ruby/case.lux
@@ -6,6 +6,8 @@
["ex" exception (#+ exception:)]]
[data
["." text]
+ [number
+ ["i" int]]
[collection
["." list ("#@." functor fold)]
["." set]]]
@@ -100,7 +102,7 @@
(def: (multi-pop! pops)
(-> Nat (Statement Any))
- (_.statement (_.do "slice!" (list (_.int (i/* -1 (.int pops)))
+ (_.statement (_.do "slice!" (list (_.int (i.* -1 (.int pops)))
(_.int (.int pops)))
@cursor)))
diff --git a/stdlib/source/lux/tool/compiler/synthesis.lux b/stdlib/source/lux/tool/compiler/synthesis.lux
index de91d38a7..463affb73 100644
--- a/stdlib/source/lux/tool/compiler/synthesis.lux
+++ b/stdlib/source/lux/tool/compiler/synthesis.lux
@@ -10,6 +10,7 @@
["." text ("#;." equivalence)
["%" format (#+ Format format)]]
[number
+ ["i" int]
["f" frac]]
[collection
["." list ("#;." functor)]
@@ -400,7 +401,7 @@
[#Text text;= %.text])
[(#I64 reference') (#I64 sample')]
- (i/= (.int reference') (.int sample'))
+ (i.= (.int reference') (.int sample'))
_
false)))