summaryrefslogtreecommitdiff
path: root/tests
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adamc@hcoop.net>2008-07-13 20:07:10 -0400
committerGravatar Adam Chlipala <adamc@hcoop.net>2008-07-13 20:07:10 -0400
commit811a3831805bf7a87ed3a64156f4ac6f6246edb9 (patch)
treea2bc2022ac4e0412a787a526135aafc99db66998 /tests
parent97cc749872a8baf53bb34ef1b536b82f6aa7f1c7 (diff)
Passing an argument to a web function
Diffstat (limited to 'tests')
-rw-r--r--tests/plink.lac8
1 files changed, 8 insertions, 0 deletions
diff --git a/tests/plink.lac b/tests/plink.lac
new file mode 100644
index 00000000..9601f08a
--- /dev/null
+++ b/tests/plink.lac
@@ -0,0 +1,8 @@
+val pA = fn size => <html><body>
+ <font size={size}>Hello World!</font>
+</body></html>
+
+val main = fn () => <html><body>
+ <li> <a link={pA 5}>Size 5</a></li>
+ <li> <a link={pA 10}>Size 10</a></li>
+</body></html>