let nsplit str c =
  nsplitf str ((=) c)