@@ -157,7 +157,6 @@ module Options = Main_args.Make_opttop_options (struct
157
157
let _no_insn_sched = clear insn_sched
158
158
let _no_unbox_free_vars_of_closures = clear unbox_free_vars_of_closures
159
159
let _no_unbox_specialised_args = clear unbox_specialised_args
160
- let _o s = output_name := Some s
161
160
let _o2 () =
162
161
default_simplify_rounds := 2 ;
163
162
use_inlining_arguments_set o2_arguments;
@@ -183,7 +182,6 @@ module Options = Main_args.Make_opttop_options (struct
183
182
let _labels = clear classic
184
183
let _alias_deps = clear transparent_modules
185
184
let _no_alias_deps = set transparent_modules
186
- let _dlinscan = set use_linscan
187
185
let _app_funct = set applicative_functors
188
186
let _no_app_funct = clear applicative_functors
189
187
let _noassert = set noassert
@@ -195,7 +193,6 @@ module Options = Main_args.Make_opttop_options (struct
195
193
let _ppx s = Compenv. first_ppx := s :: ! Compenv. first_ppx
196
194
let _principal = set principal
197
195
let _no_principal = clear principal
198
- let _real_paths = set real_paths
199
196
let _rectypes = set recursive_types
200
197
let _no_rectypes = clear recursive_types
201
198
let _strict_sequence = set strict_sequence
@@ -240,7 +237,6 @@ module Options = Main_args.Make_opttop_options (struct
240
237
let _dreload = set dump_reload
241
238
let _dscheduling = set dump_scheduling
242
239
let _dlinear = set dump_linear
243
- let _dinterval = set dump_interval
244
240
let _dstartup = set keep_startup_file
245
241
let _safe_string = clear unsafe_string
246
242
let _unsafe_string = set unsafe_string
0 commit comments