XL-001-tests.asmcomp

Gbp-Pq: Name 0010-XL-001-tests.asmcomp.patch

diff --git a/testsuite/tests/asmcomp/main.ml b/testsuite/tests/asmcomp/main.ml
index 284f7fbc960abc35ea6588aa3c06e05e5c30fa1a..6457ad209026d36822c3e9a4d30378336bbc29c7 100644 (file)
--- a/testsuite/tests/asmcomp/main.ml
+++ b/testsuite/tests/asmcomp/main.ml
@@ -6,7 +6,6 @@ let compile_file filename =
     let out_name = Filename.chop_extension filename ^ ".s" in
     Emitaux.output_channel := open_out out_name
   end; (* otherwise, stdout *)
-  Clflags.dlcode := false;
   Compilenv.reset ~source_provenance:(Timings.File filename) "test";
   Emit.begin_assembly();
   let ic = open_in filename in