sig
  val commacat : string list -> string
  val semicolon : string list -> string
  val nospacecommacat : string list -> string
  val nospacesemicolon : string list -> string
  val dotcat : string list -> string
  val newlinecat : string list -> string
  val blankcat : string list -> string
  val slashcat : string list -> string
end