Skip to content

Commit 9f0092b

Browse files
committed
native toplevel: cleanup arguments
1 parent d3553ed commit 9f0092b

File tree

1 file changed

+0
-4
lines changed

1 file changed

+0
-4
lines changed

toplevel/opttopmain.ml

Lines changed: 0 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -157,7 +157,6 @@ module Options = Main_args.Make_opttop_options (struct
157157
let _no_insn_sched = clear insn_sched
158158
let _no_unbox_free_vars_of_closures = clear unbox_free_vars_of_closures
159159
let _no_unbox_specialised_args = clear unbox_specialised_args
160-
let _o s = output_name := Some s
161160
let _o2 () =
162161
default_simplify_rounds := 2;
163162
use_inlining_arguments_set o2_arguments;
@@ -183,7 +182,6 @@ module Options = Main_args.Make_opttop_options (struct
183182
let _labels = clear classic
184183
let _alias_deps = clear transparent_modules
185184
let _no_alias_deps = set transparent_modules
186-
let _dlinscan = set use_linscan
187185
let _app_funct = set applicative_functors
188186
let _no_app_funct = clear applicative_functors
189187
let _noassert = set noassert
@@ -195,7 +193,6 @@ module Options = Main_args.Make_opttop_options (struct
195193
let _ppx s = Compenv.first_ppx := s :: !Compenv.first_ppx
196194
let _principal = set principal
197195
let _no_principal = clear principal
198-
let _real_paths = set real_paths
199196
let _rectypes = set recursive_types
200197
let _no_rectypes = clear recursive_types
201198
let _strict_sequence = set strict_sequence
@@ -240,7 +237,6 @@ module Options = Main_args.Make_opttop_options (struct
240237
let _dreload = set dump_reload
241238
let _dscheduling = set dump_scheduling
242239
let _dlinear = set dump_linear
243-
let _dinterval = set dump_interval
244240
let _dstartup = set keep_startup_file
245241
let _safe_string = clear unsafe_string
246242
let _unsafe_string = set unsafe_string

0 commit comments

Comments
 (0)