summaryrefslogtreecommitdiff
path: root/testsuite/tests/backtrace/inline_traversal_test.ml
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/tests/backtrace/inline_traversal_test.ml')
-rw-r--r--testsuite/tests/backtrace/inline_traversal_test.ml30
1 files changed, 22 insertions, 8 deletions
diff --git a/testsuite/tests/backtrace/inline_traversal_test.ml b/testsuite/tests/backtrace/inline_traversal_test.ml
index d70c7fc52e..8fa5803b88 100644
--- a/testsuite/tests/backtrace/inline_traversal_test.ml
+++ b/testsuite/tests/backtrace/inline_traversal_test.ml
@@ -1,11 +1,11 @@
-(* TEST
- flags = "-g"
- ocamlrunparam += ",b=1"
- * bytecode
- * native
- * native
- ocamlopt_flags = "-O3"
- compiler_directory_suffix = ".O3"
+(* TEST_BELOW
+(* Blank lines added here to preserve locations. *)
+
+
+
+
+
+
*)
(* A test for inlined stack backtraces *)
@@ -52,3 +52,17 @@ let () =
Printf.printf "Frame %d\n" i;
print_slots (Some slot)
done
+
+(* TEST
+ flags = "-g";
+ ocamlrunparam += ",b=1";
+ {
+ bytecode;
+ }{
+ native;
+ }{
+ ocamlopt_flags = "-O3";
+ compiler_directory_suffix = ".O3";
+ native;
+ }
+*)