sig
exception No_match
class virtual ['a] scanner :
'a Cf_seq.t ->
object
val mutable next_ : 'a Cf_seq.t
method fini : 'a Cf_seq.t
method private virtual get : char
method init : Scanf.Scanning.scanbuf
end
val cscanf :
('a Cf_seq.t -> ('a #Cf_scan_parser.scanner as 'b)) ->
('b -> exn -> 'c) ->
('d, Scanf.Scanning.scanbuf, 'e, 'd -> 'c, 'd -> 'c, 'c) format6 ->
'd -> ('a, 'c) Cf_parser.t
val scanf :
('a, Scanf.Scanning.scanbuf, 'b, 'a -> 'c, 'a -> 'c, 'c) format6 ->
'a -> (char, 'c) Cf_parser.t
val scanfx :
('a, Scanf.Scanning.scanbuf, 'b, 'a -> 'c, 'a -> 'c, 'c) format6 ->
'a -> (char #Cf_parser.cursor, char, 'c) Cf_parser.X.t
end