Mercurial > urweb

diff src/cjr_print.sml @ 1451:b6ce8ef0ea88

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Before allowing an indirect return, check (dynamically, for now) that we aren't in an RPC handler
author Adam Chlipala <adam@chlipala.net>
date Sun, 17 Apr 2011 13:43:00 -0400
parents 36f7d1debb37
children d674fb9499c4
line wrap: on
line diff
--- a/src/cjr_print.sml	Sun Apr 17 11:21:19 2011 -0400
+++ b/src/cjr_print.sml	Sun Apr 17 13:43:00 2011 -0400
@@ -2651,6 +2651,8 @@
                                     newline,
                                     string "uw_write(ctx, begin_xhtml);",
                                     newline,
+                                    string "uw_mayReturnIndirectly(ctx);",
+                                    newline,
                                     string "uw_set_script_header(ctx, \"",
                                     let
                                         val scripts =