summaryrefslogtreecommitdiff
path: root/testsuite/tests/parsing/pr7165.ml
blob: 2e189f09c8c73b41da11e7cc44a961c9845b8451 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
(* TEST_BELOW
(* Blank lines added here to preserve locations. *)




*)

(* this is a lexer directive with an out-of-bound integer;
   it should result in a lexing error instead of an
   uncaught exception as in PR#7165 *)
#9342101923012312312 ""

(* TEST
 flags = "-dparsetree";
 ocamlc_byte_exit_status = "2";
 setup-ocamlc.byte-build-env;
 ocamlc.byte;
 check-ocamlc.byte-output;
*)