sig
  module Scanning :
    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
  exception Scan_failure of string
  val bscanf :
    Scanf.Scanning.scanbuf ->
    ('a, Scanf.Scanning.scanbuf, 'b) format -> 'a -> 'b
  val fscanf :
    Pervasives.in_channel ->
    ('a, Scanf.Scanning.scanbuf, 'b) format -> 'a -> 'b
  val sscanf : string -> ('a, Scanf.Scanning.scanbuf, 'b) format -> 'a -> 'b
  val scanf : ('a, Scanf.Scanning.scanbuf, 'b) format -> 'a -> 'b
  val kscanf :
    Scanf.Scanning.scanbuf ->
    (Scanf.Scanning.scanbuf -> exn -> 'a) ->
    ('b, Scanf.Scanning.scanbuf, 'a) format -> 'b -> 'a
end