[m-dev.] for review: options to switch off RTTI features.

Zoltan Somogyi zs at cs.mu.OZ.AU
Tue May 25 13:50:20 AEST 1999


> Index: compiler/stack_layout.m
> ===================================================================
> RCS file: /home/mercury1/repository/mercury/compiler/stack_layout.m,v
> retrieving revision 1.29
> diff -u -r1.29 stack_layout.m
> --- stack_layout.m	1999/05/07 08:08:56	1.29
> +++ stack_layout.m	1999/05/25 02:33:54
> @@ -768,10 +768,16 @@
>  		initial(ArgTypes, none), must_be_static, CNum1,
>  		"stack_layout_locn_vector") },
>  
> -	{ list__map(SelectNames, AllArrayInfo, AllNames) },
> -	stack_layout__get_next_cell_number(CNum2),
> -	{ NameVector = create(0, AllNames, uniform(yes(string)),
> -		must_be_static, CNum2, "stack_layout_name_vector") }.
> +	stack_layout__get_agc_stack_layout(AgcStackLayout),
> +	( { AgcStackLayout = no } ->
> +		{ list__map(SelectNames, AllArrayInfo, AllNames) },
> +		stack_layout__get_next_cell_number(CNum2),
> +		{ NameVector = create(0, AllNames, uniform(yes(string)),
> +			must_be_static, CNum2, "stack_layout_name_vector") }
> +	;
> +		{ NameVector = const(int_const(0)) }
> +	).
> +

Your change looks good, except for the condition in the if-then-else above.
You want to generate variable names if debugging is turned on, regardless
of whether we are using agc or not, so test for that, not for agc.

Zoltan.
--------------------------------------------------------------------------
mercury-developers mailing list
Post messages to:       mercury-developers at cs.mu.oz.au
Administrative Queries: owner-mercury-developers at cs.mu.oz.au
Subscriptions:          mercury-developers-request at cs.mu.oz.au
--------------------------------------------------------------------------



More information about the developers mailing list