Mercurial > urweb
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 "" = "" |