adamc@1088: fun main () = adamc@1088: a <- source "some text"; adamc@1088: return adamc@1088: adamc@1088: