summaryrefslogtreecommitdiff
path: root/testsuite/tests/backtrace/backtrace_effects.ml
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/tests/backtrace/backtrace_effects.ml')
-rw-r--r--testsuite/tests/backtrace/backtrace_effects.ml14
1 files changed, 10 insertions, 4 deletions
diff --git a/testsuite/tests/backtrace/backtrace_effects.ml b/testsuite/tests/backtrace/backtrace_effects.ml
index 352b32cbd7..762e27549e 100644
--- a/testsuite/tests/backtrace/backtrace_effects.ml
+++ b/testsuite/tests/backtrace/backtrace_effects.ml
@@ -1,7 +1,7 @@
-(* TEST
- flags = "-g"
- ocamlrunparam += ",b=1"
- exit_status = "2"
+(* TEST_BELOW
+(* Blank lines added here to preserve locations. *)
+
+
*)
open Effect
@@ -39,3 +39,9 @@ let baz () =
| _ -> None }
let _ = baz ()
+
+(* TEST
+ flags = "-g";
+ ocamlrunparam += ",b=1";
+ exit_status = "2";
+*)