From 82580039f3e9a1ca41cc6aed5dfa02f3c944e796 Mon Sep 17 00:00:00 2001
From: Adam Chlipala <adamc@hcoop.net>
Date: Thu, 1 Jan 2009 11:58:00 -0500
Subject: Included a recursive function in JavaScript

---
 tests/stypes.ur | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'tests/stypes.ur')

diff --git a/tests/stypes.ur b/tests/stypes.ur
index 6c590843..142925e5 100644
--- a/tests/stypes.ur
+++ b/tests/stypes.ur
@@ -56,6 +56,7 @@ fun main () : transaction page =
       <a onclick={set sColor White}>White</a>
       <a onclick={set sColor Blue}>Blue</a><br/>
 
-      <dyn signal={ls <- signal sList; return <xml>{[isNil ls]}</xml>}/>
+      <dyn signal={ls <- signal sList; return <xml>{[isNil ls]}</xml>}/>;
+      <dyn signal={ls <- signal sList; return <xml>{delist ls}</xml>}/>
       <a onclick={set sList (Cons ("A", Cons ("B", Nil)))}>Change</a><br/>
     </body></xml>
-- 
cgit v1.2.3