blob: 02fb0e03585f4e0eea289905c1d1ee391a79778d (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
fun main () : transaction page =
x <- source <xml/>;
return <xml>
<head>
<title>Test</title>
</head>
<body onload={set x <xml>boo</xml>}>
<dyn signal={signal x}/>
</body>
</xml>
fun main2 () : transaction page =
return <xml>
<head>
<title>Test</title>
</head>
<body>
<button onclick={alert "Hi"}/>
</body>
</xml>
|
