fun main () = let fun getIt () = return (bless "http://www.yahoo.com/") in s <- source ; return