--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/tests/cut.lac Thu Jul 24 10:09:21 2008 -0400 @@ -0,0 +1,6 @@ +val r = {A = 1, B = "Hi", C = 0.0} +val rA = r -- #A + +val main : unit -> page = fn () => <html><body> + {cdata rA.B} +</body></html>