mercurylang/mercury
1
0
Fork 0
mirror of https://github.com/Mercury-Language/mercury.git synced 2026-04-15 01:13:30 +00:00
Code Issues Projects Releases Wiki Activity

Avoid compiler crashes with --optimize-saved-vars.

Browse Source
This commit is contained in:
Zoltan Somogyi
2026-04-05 02:53:05 +10:00
parent 7e8781390d
commit d631c0bb22
1 changed files with 17 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
compiler/handle_options.m
View File

@@ -716,6 +716,22 @@ convert_options_to_globals(ProgressStream, DefaultOptionTable, OptionTable0,
OT_OptFollowCode = OT_OptFollowCode0
),
globals.lookup_bool_option(!.Globals, structure_reuse_analysis, Reuse),
globals.lookup_bool_option(!.Globals, use_regions, Regions),
( if
( Reuse = yes
; Regions = yes
)
then
% The code of interval.m, which this optimization uses,
% throws an exception if given a unification whose HowToConstruct
% field contains either reuse_cell, or construct_in_region.
% Fixing this is future work.
OT_OptSVCell1 = do_not_opt_svcell
else
OT_OptSVCell1 = OT_OptSVCell0
),
(
AllowSrcChangesDebug = do_not_allow_src_changes,
OT_OptDupCalls = do_not_opt_dup_calls,
@@ -728,7 +744,7 @@ convert_options_to_globals(ProgressStream, DefaultOptionTable, OptionTable0,
;
AllowSrcChangesDebug = allow_src_changes,
OT_OptDupCalls = OT_OptDupCalls0,
OT_OptSVCell = OT_OptSVCell0,
OT_OptSVCell = OT_OptSVCell1,
OT_OptLoopInvariants = OT_OptLoopInvariants0,
OT_OptHigherOrder = OT_OptHigherOrder0,
OT_Tuple = OT_Tuple0,