File tree Expand file tree Collapse file tree 2 files changed +4
-4
lines changed Expand file tree Collapse file tree 2 files changed +4
-4
lines changed Original file line number Diff line number Diff line change @@ -210,7 +210,7 @@ let intf filename =
210
210
; process_interface_file ppf filename;;
211
211
212
212
213
- let fmt_file input =
213
+ let format_file input =
214
214
let ext = classify_input (Ext_filename. get_extension_maybe input) in
215
215
let syntax =
216
216
match ext with
@@ -450,7 +450,7 @@ let buckle_script_flags : (string * Bsc_args.spec * string) array =
450
450
" -dsource" , set Clflags. dump_source,
451
451
" *internal* print source" ;
452
452
453
- " -fmt " , string_call fmt_file ,
453
+ " -format " , string_call format_file ,
454
454
" Format as Res syntax" ;
455
455
456
456
" -where" , unit_call print_standard_library,
Original file line number Diff line number Diff line change @@ -437297,7 +437297,7 @@ let intf filename =
437297
437297
; process_interface_file ppf filename;;
437298
437298
437299
437299
437300
- let fmt_file input =
437300
+ let format_file input =
437301
437301
let ext = classify_input (Ext_filename.get_extension_maybe input) in
437302
437302
let syntax =
437303
437303
match ext with
@@ -437535,7 +437535,7 @@ let buckle_script_flags : (string * Bsc_args.spec * string) array =
437535
437535
"-dsource", set Clflags.dump_source,
437536
437536
"*internal* print source";
437537
437537
437538
- "-fmt ", string_call fmt_file ,
437538
+ "-format ", string_call format_file ,
437539
437539
"Format as Res syntax";
437540
437540
437541
437541
"-where", unit_call print_standard_library,
You can’t perform that action at this time.
0 commit comments