[m-dev.] for review: MLDS changes

[Fergus Henderson]

On 20-Feb-2001, Julien Fischer <juliensf at students.cs.mu.oz.au> wrote:
> Made mls_to_gcc.m consistent with changes to MLDS.

s/mls/mlds/

> Index: compiler/mlds_to_gcc.m
> ===================================================================
> RCS file: /home/mercury1/repository/mercury/compiler/mlds_to_gcc.m,v
> retrieving revision 1.31
> diff -u -r1.31 mlds_to_gcc.m
> --- compiler/mlds_to_gcc.m	2001/02/10 11:21:31	1.31
> +++ compiler/mlds_to_gcc.m	2001/02/20 02:02:11
> @@ -1054,6 +1054,8 @@
>  	{ sorry(this_file, "`protected' access") }.
>  add_var_access_flag(default, _GCC_Defn) -->
>  	{ sorry(this_file, "`default' access") }.
> +add_var_access_flag(local, _GCC_Defn) -->
> +	{ sorry(this_file, "`local' access") }.
>  
>  :- pred add_var_virtuality_flag(mlds__virtuality, gcc__var_decl,
>  	io__state, io__state).
> @@ -1128,6 +1130,8 @@
>  	{ sorry(this_file, "`protected' access") }.
>  add_field_access_flag(default, _GCC_Defn) -->
>  	{ sorry(this_file, "`default' access") }.
> +add_field_access_flag(local, _GCC_Defn) -->
> +	{ sorry(this_file, "`local' access") }.
>  
>  :- pred add_field_per_instance_flag(mlds__per_instance, gcc__field_decl,
>  	io__state, io__state).
> @@ -1209,6 +1213,8 @@
>  	{ sorry(this_file, "`protected' access") }.
>  add_func_access_flag(default, _GCC_Defn) -->
>  	{ sorry(this_file, "`default' access") }.
> +add_func_access_flag(local, _GCC_Defn) -->
> +	{ sorry(this_file, "`local' access") }.

Those are not the right thing to do here, but go ahead and commit this
and I'll fix these.

-- 
Fergus Henderson <fjh at cs.mu.oz.au>  |  "I have always known that the pursuit
                                    |  of excellence is a lethal habit"
WWW: <http://www.cs.mu.oz.au/~fjh>  |     -- the last words of T. S. Garp.
--------------------------------------------------------------------------
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
--------------------------------------------------------------------------