diff --git a/lib/read.mli b/lib/read.mli index 167ac1e..f1ad820 100644 --- a/lib/read.mli +++ b/lib/read.mli @@ -135,10 +135,6 @@ val finish_string : lexer_state -> Lexing.lexbuf -> string val read_string : lexer_state -> Lexing.lexbuf -> string val read_ident : lexer_state -> Lexing.lexbuf -> string -val map_string : - lexer_state -> (string -> int -> int -> 'a) -> Lexing.lexbuf -> 'a -(* equivalent to finish_string *) - val map_ident : lexer_state -> (string -> int -> int -> 'a) -> Lexing.lexbuf -> 'a (* equivalent to read_ident *) diff --git a/test/test_read.ml b/test/test_read.ml index 3d21bce..19291ea 100644 --- a/test/test_read.ml +++ b/test/test_read.ml @@ -78,7 +78,7 @@ let unquoted_from_string () = __LOC__ Fixtures.unquoted_value (Yojson.Safe.from_string Fixtures.unquoted_json) -let map_ident_and_string () = +let map_ident () = let lexbuf = Lexing.from_string {|{foo:"hello"}|} in let lexer_state = Yojson.init_lexer () in @@ -127,5 +127,5 @@ let single_json = ("from_string_fail_escaped_char", `Quick, from_string_fail_escaped_char); ("from_file", `Quick, from_file); ("unquoted_from_string", `Quick, unquoted_from_string); - ("map_ident/map_string", `Quick, map_ident_and_string); + ("map_ident", `Quick, map_ident); ]