kiss-lang/kiss
1
0
Fork 0
Code Issues 6 Pull Requests Actions Packages Projects Releases Wiki Activity

Make max and min apply aliases

Browse Source
This commit is contained in:
Nat Quayle Nelson
2020-12-07 08:37:37 -07:00
parent 4c4622a268
commit b98787e147
1 changed files with 3 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
src/kiss/Macros.hx
View File

@@ -52,15 +52,9 @@ class Macros {
// the (apply [func] [args]) macro keeps its own list of aliases for the math operators // the (apply [func] [args]) macro keeps its own list of aliases for the math operators
// that can't just be function aliases because they emulate &rest behavior // that can't just be function aliases because they emulate &rest behavior
var opAliases = [ var opAliases = [
"+" => "Prelude.add", "+" => "Prelude.add", "-" => "Prelude.subtract", "*" => "Prelude.multiply", "/" => "Prelude.divide", ">" => "Prelude.greaterThan",
"-" => "Prelude.subtract", ">=" => "Prelude.greaterEqual", "<" => "Prelude.lessThan", "<=" => "Prelude.lesserEqual", "=" => "Prelude.areEqual", "max" => "Prelude.max",
"*" => "Prelude.multiply", "min" => "Prelude.min"
"/" => "Prelude.divide",
">" => "Prelude.greaterThan",
">=" => "Prelude.greaterEqual",
"<" => "Prelude.lessThan",
"<=" => "Prelude.lesserEqual",
"=" => "Prelude.areEqual"
]; ];
macros["apply"] = (wholeExp:ReaderExp, exps:Array<ReaderExp>, k) -> { macros["apply"] = (wholeExp:ReaderExp, exps:Array<ReaderExp>, k) -> {