sig
  type scanbuf
  val from_string : string -> Scanf.Scanning.scanbuf
  val from_channel : Pervasives.in_channel -> Scanf.Scanning.scanbuf
  val from_function : (unit -> char) -> Scanf.Scanning.scanbuf
end