View | Details | Raw Unified | Return to bug 250408 | Differences between
and this patch

Collapse All | Expand All

(-)asmcomp/amd64/emit.mlp (-2 / +2 lines)
Lines 1032-1038 let begin_assembly() = Link Here
1032
    | S_macosx -> D.section ["__TEXT";"__literal16"] None ["16byte_literals"]
1032
    | S_macosx -> D.section ["__TEXT";"__literal16"] None ["16byte_literals"]
1033
    | S_mingw64 | S_cygwin -> D.section [".rdata"] (Some "dr") []
1033
    | S_mingw64 | S_cygwin -> D.section [".rdata"] (Some "dr") []
1034
    | S_win64 -> D.data ()
1034
    | S_win64 -> D.data ()
1035
    | _ -> D.section [".rodata.cst8"] (Some "a") ["@progbits"]
1035
    | _ -> D.section [".rodata.cst8"] (Some "aM") ["@progbits,8"]
1036
    end;
1036
    end;
1037
    D.align 16;
1037
    D.align 16;
1038
    _label (emit_symbol "caml_negf_mask");
1038
    _label (emit_symbol "caml_negf_mask");
Lines 1096-1102 let end_assembly() = Link Here
1096
    | S_macosx -> D.section ["__TEXT";"__literal8"] None ["8byte_literals"]
1096
    | S_macosx -> D.section ["__TEXT";"__literal8"] None ["8byte_literals"]
1097
    | S_mingw64 | S_cygwin -> D.section [".rdata"] (Some "dr") []
1097
    | S_mingw64 | S_cygwin -> D.section [".rdata"] (Some "dr") []
1098
    | S_win64 -> D.data ()
1098
    | S_win64 -> D.data ()
1099
    | _ -> D.section [".rodata.cst8"] (Some "a") ["@progbits"]
1099
    | _ -> D.section [".rodata.cst8"] (Some "aM") ["@progbits,8"]
1100
    end;
1100
    end;
1101
    List.iter (fun (cst,lbl) -> emit_float_constant cst lbl) !float_constants
1101
    List.iter (fun (cst,lbl) -> emit_float_constant cst lbl) !float_constants
1102
  end;
1102
  end;

Return to bug 250408