structure Main =
struct
   open CML

   fun doit _ =
      CML.exit ()
end