Mercurial > urweb
diff src/cjr.sml @ 643:aa2290c32ce2
Avoid any JavaScript when pages don't need it; update demo prose
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Tue, 10 Mar 2009 10:44:26 -0400 |
parents | 56aaa1941dad |
children | 9a2c18dab11d |
line wrap: on
line diff
--- a/src/cjr.sml Sun Mar 08 20:34:21 2009 -0400 +++ b/src/cjr.sml Tue Mar 10 10:44:26 2009 -0400 @@ -113,6 +113,10 @@ withtype decl = decl' located -type file = decl list * (Core.export_kind * string * int * typ list * typ) list +datatype sidedness = + ServerOnly + | ServerAndClient + +type file = decl list * (Core.export_kind * string * int * typ list * typ * sidedness) list end