diff src/mono_print.sml @ 1294:b4480a56cab7

Server-side 'onError'
author Adam Chlipala <adam@chlipala.net>
date Tue, 07 Sep 2010 08:28:07 -0400
parents acabf3935060
children 02fc16faecf3
line wrap: on
line diff
--- a/src/mono_print.sml	Sun Sep 05 14:00:57 2010 -0400
+++ b/src/mono_print.sml	Tue Sep 07 08:28:07 2010 -0400
@@ -527,7 +527,7 @@
       | DPolicy p => box [string "policy",
                           space,
                           p_policy env p]
-
+      | DOnError _ => string "ONERROR"
                           
 fun p_file env file =
     let