comparison src/demo.sml @ 769:efceae06df17

allow/deny working in Mono_opt
author Adam Chlipala <adamc@hcoop.net>
date Sat, 02 May 2009 13:37:52 -0400
parents 3b7e46790fa7
children 74a090ff296e
comparison
equal deleted inserted replaced
768:3b7e46790fa7 769:efceae06df17
102 clientToServer = [], 102 clientToServer = [],
103 effectful = [], 103 effectful = [],
104 clientOnly = [], 104 clientOnly = [],
105 serverOnly = [], 105 serverOnly = [],
106 jsFuncs = [], 106 jsFuncs = [],
107 rewrites = [] 107 rewrites = [],
108 filterUrl = #filterUrl combined @ #filterUrl urp,
109 filterMime = #filterMime combined @ #filterMime urp
108 } 110 }
109 111
110 val parse = Compiler.run (Compiler.transform Compiler.parseUrp "Demo parseUrp") 112 val parse = Compiler.run (Compiler.transform Compiler.parseUrp "Demo parseUrp")
111 113
112 fun capitalize "" = "" 114 fun capitalize "" = ""