Mercurial > urweb

comparison src/mono_print.sml @ 463:bb27c7efcd90

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Reading cookies works
author Adam Chlipala <adamc@hcoop.net>
date Thu, 06 Nov 2008 12:08:41 -0500
parents 7abb28e9d51f
children a152905c3c3b
comparison
equal deleted inserted replaced
462:21bb5bbba2e9 463:bb27c7efcd90
270 p_exp env e, 270 p_exp env e,
271 string ")"] 271 string ")"]
272 | ENextval e => box [string "nextval(", 272 | ENextval e => box [string "nextval(",
273 p_exp env e, 273 p_exp env e,
274 string ")"] 274 string ")"]
275 | EUnurlify (e, _) => box [string "unurlify(",
276 p_exp env e,
277 string ")"]
275 278
276 and p_exp env = p_exp' false env 279 and p_exp env = p_exp' false env
277 280
278 fun p_vali env (x, n, t, e, s) = 281 fun p_vali env (x, n, t, e, s) =
279 let 282 let