summaryrefslogtreecommitdiff
path: root/testsuite/tests/warnings/deprecated_mutable.ml
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/tests/warnings/deprecated_mutable.ml')
-rw-r--r--testsuite/tests/warnings/deprecated_mutable.ml11
1 files changed, 8 insertions, 3 deletions
diff --git a/testsuite/tests/warnings/deprecated_mutable.ml b/testsuite/tests/warnings/deprecated_mutable.ml
index 78fb12ac41..82ea7ec00b 100644
--- a/testsuite/tests/warnings/deprecated_mutable.ml
+++ b/testsuite/tests/warnings/deprecated_mutable.ml
@@ -1,8 +1,8 @@
-(* TEST
+(* TEST_BELOW
+(* Blank lines added here to preserve locations. *)
+
-flags = "-w +A-70"
-* bytecode
*)
@@ -11,3 +11,8 @@ type t = {mutable x : int [@deprecated_mutable]}
let y : t = {x = 5}
let () = y.x <- 42
+
+(* TEST
+ flags = "-w +A-70";
+ bytecode;
+*)