summaryrefslogtreecommitdiff
path: root/testsuite/tests/tool-debugger/printer/debuggee.ml
blob: f22a4bd50f60cffce401ff94d3154f1ed62d3ab1 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
(* TEST
flags += " -g "
ocamldebug_script = "${test_source_directory}/input_script"
readonly_files = "printer.ml"
include debugger
* debugger
** shared-libraries
*** setup-ocamlc.byte-build-env
**** ocamlc.byte
module = "printer.ml"
**** ocamlc.byte
***** check-ocamlc.byte-output
****** ocamldebug
******* check-program-output
*)

let f x =
  for _i = 0 to x do
    print_endline "..."
  done

let () = f 3