TakeV
/
guix
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

* Function application test cases.

This commit is contained in:
Eelco Dolstra 2003-08-14 12:37:50 +00:00
parent dc0ef2ca98
commit 9ee3b7a37a
3 changed files with 27 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
testpkgs/fun/fun1.fix Normal file
View File

@ -0,0 +1,9 @@
Call(
Function(["x"],
Call(
Function(["x"], Var("x")),
[ ("x", Var("x")) ]
)
),
[ ("x", True) ]
)

9
testpkgs/fun/fun2.fix Normal file
View File

@ -0,0 +1,9 @@
Call(
Function(["x"],
Call(
Function(["y", "z"], Var("y")),
[ ("y", Var("x")) ]
)
),
[ ("x", True) ]
)

9
testpkgs/fun/fun3.fix Normal file
View File

@ -0,0 +1,9 @@
Call(
Function(["x"],
Call(
Function(["x"], Var("x")),
[ ("x", False) ]
)
),
[ ("x", True) ]
)