Minor js optimizations. * flatten() now uses accumulator and join. * reuse regexps instead of allocating new each time

con e = []
structure B : sig
end = struct
end
open B

fun main () =
 return <xml></xml>