+
+t_curry(_Cfg) ->
+ Single = fun (X) -> X end,
+ Double = fun (X, Y) -> {X, Y} end,
+ Triple = fun (X, Y, Z) -> {X, Y, Z} end,
+
+ F = hope_fun:curry(Single),
+ a = F(a),
+
+ G1 = hope_fun:curry(Double),
+ G = G1(a),
+ {a, b} = G(b),
+
+ H1 = hope_fun:curry(Triple),
+ H2 = H1(a),
+ H = H2(b),
+ {a, b, c} = H(c).