signature PPC = sig

  structure T: TOKENIZER

  type t
  type tkPos

  datatype tkClass =
    Ctk of T.token |
    Cid |
    Cconst |
    Cunop |
    Cbinop |
    Cop

  val create: { fname: string, incDirs: string list, debugMode: bool } -> t
  val debugPrint: string -> string list -> unit

  val getClass: t -> tkClass list -> T.token * tkPos * t
end