blob: 2994e6e6619778dbf8c767cc6d7d6972f03dccc7 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
module type PARSE_COMMON =
sig
val is_letter : char -> bool
val is_digit : char -> bool
val is_whitespace : char -> bool
val is_cr : char -> bool
val lift_or : ('a -> bool) -> ('a -> bool) -> 'a -> bool
val skip_spaces : unit Angstrom.t
val take_till_cr : string Angstrom.t
end
module ParseCommon : PARSE_COMMON
|