comparison tests/utest.ur @ 23:e5df3d3554d3

fakeId parameter
author Adam Chlipala <adam@chlipala.net>
date Sun, 16 Jan 2011 13:21:34 -0500
parents 354dae3008de
children c560ec5bf514
comparison
equal deleted inserted replaced
22:70ab0230649b 23:e5df3d3554d3
25 return {Nam = n} 25 return {Nam = n}
26 26
27 fun choose _ r = return r 27 fun choose _ r = return r
28 28
29 val formClass = inputs 29 val formClass = inputs
30
31 val fakeId = None
30 end) 32 end)
31 33
32 fun wrap title body = 34 fun wrap title body =
33 userStuff <- U.main wrap; 35 userStuff <- U.main wrap;
34 return <xml><head> 36 return <xml><head>