diff tests/chat.ur @ 690:01b6f2ee2ef0

Redo signal implementation to avoid memory leaks
author Adam Chlipala <adamc@hcoop.net>
date Thu, 02 Apr 2009 15:12:06 -0400
parents 5bbb542243e8
children
line wrap: on
line diff
--- a/tests/chat.ur	Thu Apr 02 13:48:59 2009 -0400
+++ b/tests/chat.ur	Thu Apr 02 15:12:06 2009 -0400
@@ -48,6 +48,7 @@
 
         fun doSpeak () =
             line <- get newLine;
+            set newLine "";
             speak line
     in
         return <xml><body onload={onload ()}>