adamc@1046: fun main () : transaction page = return <xml> adamc@1046: <body> adamc@1046: <form> adamc@1046: <textbox{#Text}/><submit action={submit}/> adamc@1046: </form> adamc@1046: </body> adamc@1046: </xml> adamc@1046: adamc@1046: and submit r = return <xml/>