File tree Expand file tree Collapse file tree 5 files changed +18
-12
lines changed
ocaml/testsuite/tests/mixed-blocks Expand file tree Collapse file tree 5 files changed +18
-12
lines changed Original file line number Diff line number Diff line change @@ -290,8 +290,8 @@ let main n ~bytecode =
290
290
let per_type f = List. iter named_blocks ~f in
291
291
line {| (* TEST
292
292
flags = "-extension layouts_alpha"
293
- * %s
294
- *) | } (if bytecode then " bytecode" else " native" );
293
+ %s
294
+ *) | } (if bytecode then " * bytecode" else " * flambda2 \n ** native" );
295
295
line " (** This is code generated by [generate_mixed_blocks_code.ml]. *)" ;
296
296
line " " ;
297
297
line " (* Helper functions for manipulating the fields of a mixed record *)" ;
Original file line number Diff line number Diff line change 1
1
(* TEST
2
2
flags = "-extension layouts_alpha"
3
- * bytecode
3
+ * bytecode
4
4
*)
5
5
(* * This is code generated by [generate_mixed_blocks_code.ml]. *)
6
6
Original file line number Diff line number Diff line change 1
1
(* TEST
2
2
flags = "-extension layouts_alpha"
3
- * native
3
+ * flambda2
4
+ ** native
4
5
*)
5
6
(* * This is code generated by [generate_mixed_blocks_code.ml]. *)
6
7
Original file line number Diff line number Diff line change 3
3
program = "${test_build_directory}/hash.exe"
4
4
all_modules = "hash.ml"
5
5
6
- * setup-ocamlc.opt-build-env
7
- ** ocamlc.opt
8
- *** run
9
- **** check-program-output
6
+ * flambda2
7
+ ** setup-ocamlc.opt-build-env
8
+ *** ocamlc.opt
9
+ **** run
10
+ ***** check-program-output
10
11
reference = "${test_source_directory}/hash.byte.reference"
11
- * setup-ocamlopt.opt-build-env
12
- ** ocamlopt.opt
13
- *** run
14
- **** check-program-output
12
+ ** setup-ocamlopt.opt-build-env
13
+ *** ocamlopt.opt
14
+ **** run
15
+ ***** check-program-output
15
16
reference = "${test_source_directory}/hash.native.reference"
16
17
*)
17
18
Original file line number Diff line number Diff line change 1
1
(* TEST
2
2
flags = "-extension layouts_alpha"
3
+
4
+ * flambda2
5
+ ** native
6
+ ** bytecode
3
7
*)
4
8
5
9
type t = { t : t ; flt : float # }
You can’t perform that action at this time.
0 commit comments