adamc@155: val handler = fn r =>
adamc@155: Name: {cdata r.Nam}
adamc@155: Password: {cdata r.Word}
adamc@155:
adamc@155:
adamc@155: val main : unit -> page = fn () =>
adamc@155:
adamc@155: Name:
adamc@155: Password:
adamc@155:
adamc@155:
adamc@155:
adamc@155: