Mercurial > urweb

diff src/jscomp.sml @ 1620:43f22a8f76cc

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Allow sources to be returned by RPCs
author Adam Chlipala <adam@chlipala.net>
date Sat, 03 Dec 2011 10:00:10 -0500
parents 15e0c935c91b
children 438561303d02
line wrap: on
line diff
--- a/src/jscomp.sml	Sat Dec 03 09:44:07 2011 -0500
+++ b/src/jscomp.sml	Sat Dec 03 10:00:10 2011 -0500
@@ -310,6 +310,8 @@
 
               | TFfi ("Basis", "bool") => ("t[i++] == \"1\"", st)
 
+              | TSource => ("parseSource(t[i++], t[i++])", st)
+
               | TOption t =>
                 let
                     val (e, st) = unurlifyExp loc (t, st)