aboutsummaryrefslogtreecommitdiffhomepage
path: root/tests
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adamc@hcoop.net>2008-07-17 13:12:16 -0400
committerGravatar Adam Chlipala <adamc@hcoop.net>2008-07-17 13:12:16 -0400
commit1676fa257dfb1f2569d6ffcdb1aea4c5a50dbae1 (patch)
tree01e744eb79f225bc9aeca41fad855b494a037151 /tests
parent31b2c3d5e8740967ead001b40ca25f3ca3628da7 (diff)
MonoShake
Diffstat (limited to 'tests')
-rw-r--r--tests/rec3.lac13
1 files changed, 13 insertions, 0 deletions
diff --git a/tests/rec3.lac b/tests/rec3.lac
new file mode 100644
index 00000000..eaa07fe2
--- /dev/null
+++ b/tests/rec3.lac
@@ -0,0 +1,13 @@
+val rec main = fn () => <html><body>
+ <a link={aux ()}>See another page</a>
+</body></html>
+
+and aux = fn () => <html><body>
+ <h1>The Main Event</h1>
+
+ {auxer ()}
+</body></html>
+
+and auxer = fn () => <body>
+ <a link={main ()}>Back to square one</a>
+</body>