Mercurial > urweb

diff src/mono.sml @ 609:56aaa1941dad

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
First gimpy RPC
author Adam Chlipala <adamc@hcoop.net>
date Sun, 15 Feb 2009 10:32:50 -0500
parents 330a7de47914
children 5891f47d7cff
line wrap: on
line diff
--- a/src/mono.sml	Sun Feb 15 09:27:36 2009 -0500
+++ b/src/mono.sml	Sun Feb 15 10:32:50 2009 -0500
@@ -109,7 +109,7 @@
        | ESignalBind of exp * exp
        | ESignalSource of exp
 
-       | EServerCall of int * exp list * exp
+       | EServerCall of string * exp list * exp * typ
 
 withtype exp = exp' located
 
@@ -117,7 +117,7 @@
          DDatatype of string * int * (string * int * typ option) list
        | DVal of string * int * typ * exp * string
        | DValRec of (string * int * typ * exp * string) list
-       | DExport of Core.export_kind * string * int * typ list
+       | DExport of Core.export_kind * string * int * typ list * typ
 
        | DTable of string * (string * typ) list
        | DSequence of string