[hcoop/debian/mlton.git] / lib / cml / tests / exit.sml


structure Main =
struct
   open CML

   fun doit _ =
      CML.exit ()
end
Commit	Line	Data
7f918cf1 CE	1
	2	structure Main =
	3	struct
	4	open CML
	5
	6	fun doit _ =
	7	CML.exit ()
	8	end