Implement concatWith

Fixes issue #8.

* basis/string.sml (concatWith): New.
* basis/__string.sml (concatWith): Implement it. Perhaps a bit too naive.