Here's a collage of some of my favourite bits. (I've inlined some functions, but this is nearly as readable as the actual code.) open Option Parse Scan; (m

Here's a collage of some of my favourite bits. (I've inlined some functions, but this is nearly as readable as the actual code.) open Option Parse Scan; (maybe embedded --| minus -- name >> (fn arg => ((if ! testing then #2 arg |> Output.writeln else (); #1 #> curry getOpt) arg (implode [])))) -- command_name "supply" >> (op ^) What does this say?