aboutsummaryrefslogtreecommitdiff
path: root/test/lambdas.tm
diff options
context:
space:
mode:
Diffstat (limited to 'test/lambdas.tm')
-rw-r--r--test/lambdas.tm7
1 files changed, 7 insertions, 0 deletions
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