adamc@899: fun main () = adamc@899: s <- source AA'; adamc@899: return adamc@899: BB'CC'}/> adamc@899: