diff options
| -rw-r--r-- | environment.c | 8 | ||||
| -rw-r--r-- | test/lambdas.tm | 7 |
2 files changed, 11 insertions, 4 deletions
diff --git a/environment.c b/environment.c index d110a7ef..d9573e2f 100644 --- a/environment.c +++ b/environment.c @@ -55,7 +55,7 @@ env_t *new_compilation_unit(void) {"octal", "Int__octal", "func(i:Int, digits=0, prefix=yes)->Text"}, {"random", "Int__random", "func(min=0, max=0xffffffff)->Int"}, {"bits", "Int__bits", "func(x:Int)->[Bool]"}, - {"abs", "Int__abs", "func(i:Int)->Int"}, + {"abs", "labs", "func(i:Int)->Int"}, {"min", "Int__min", "Int"}, {"max", "Int__max", "Int"}, )}, @@ -65,7 +65,7 @@ env_t *new_compilation_unit(void) {"octal", "Int32__octal", "func(i:Int32, digits=0, prefix=yes)->Text"}, {"random", "Int32__random", "func(min=0, max=0xffffffff)->Int32"}, {"bits", "Int32__bits", "func(x:Int32)->[Bool]"}, - {"abs", "Int32__abs", "func(i:Int32)->Int32"}, + {"abs", "abs", "func(i:Int32)->Int32"}, {"min", "Int32__min", "Int32"}, {"max", "Int32__max", "Int32"}, )}, @@ -75,7 +75,7 @@ env_t *new_compilation_unit(void) {"octal", "Int16__octal", "func(i:Int16, digits=0, prefix=yes)->Text"}, {"random", "Int16__random", "func(min=0, max=0xffffffff)->Int16"}, {"bits", "Int16__bits", "func(x:Int16)->[Bool]"}, - {"abs", "Int16__abs", "func(i:Int16)->Int16"}, + {"abs", "abs", "func(i:Int16)->Int16"}, {"min", "Int16__min", "Int16"}, {"max", "Int16__max", "Int16"}, )}, @@ -85,7 +85,7 @@ env_t *new_compilation_unit(void) {"octal", "Int8__octal", "func(i:Int8, digits=0, prefix=yes)->Text"}, {"random", "Int8__random", "func(min=0, max=0xffffffff)->Int8"}, {"bits", "Int8__bits", "func(x:Int8)->[Bool]"}, - {"abs", "Int8__abs", "func(i:Int8)->Int8"}, + {"abs", "abs", "func(i:Int8)->Int8"}, {"min", "Int8__min", "Int8"}, {"max", "Int8__max", "Int8"}, )}, diff --git a/test/lambdas.tm b/test/lambdas.tm index d896ea4b..ca2acb5d 100644 --- a/test/lambdas.tm +++ b/test/lambdas.tm @@ -24,3 +24,10 @@ func suffix_fn(fn:func(t:Text)->Text, suffix:Text)->func(t:Text)->Text >> shout2 := suffix_fn(Text.upper, "!") >> shout2("hello") = "HELLO!" + +func mul_func(n:Int, fn:func(x:Int)->Int)-> func(x:Int)->Int + return func(x:Int) n*fn(x) + +>> abs100 := mul_func(100, Int.abs) +>> abs100(-5) += 500 |