Mercurial > urweb

comparison src/settings.sml @ 1422:07ef5771568d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Notice that Basis.now is effectful; smarter JavaScript encoding of initial source values built using server-side expressions that can't be turned into JavaScript
author Adam Chlipala <adam@chlipala.net>
date Tue, 08 Feb 2011 16:54:01 -0500
parents 82b204f20026
children 36c0a1be3f5a
comparison
equal deleted inserted replaced
1421:3dab4696d116 1422:07ef5771568d
137 "onDisconnect", 137 "onDisconnect",
138 "onServerError", 138 "onServerError",
139 "kc", 139 "kc",
140 "debug", 140 "debug",
141 "naughtyDebug", 141 "naughtyDebug",
142 "rand"] 142 "rand",
143 "now"]
143 144
144 val benign = ref benignBase 145 val benign = ref benignBase
145 fun setBenignEffectful ls = benign := S.addList (benignBase, ls) 146 fun setBenignEffectful ls = benign := S.addList (benignBase, ls)
146 fun isBenignEffectful x = S.member (!benign, x) 147 fun isBenignEffectful x = S.member (!benign, x)
147 148