adamc@684: table t : { Chan : option (channel unit) } adamc@684: adamc@684: fun main () : transaction page = adamc@684: ch <- channel; adamc@684: dml (INSERT INTO t (Chan) VALUES ({[Some ch]})); adamc@684: return Did it.