[m-dev.] trivial fix to a bug that was screwing several debugger functions

Tyson Dowd trd at cs.mu.OZ.AU
Thu Aug 6 16:19:01 AEST 1998


On 06-Aug-1998, Zoltan Somogyi <zs at cs.mu.OZ.AU> wrote:
> 
> runtime/mercury_bootstrap.c:
> 	Fix a missing BEGIN_CODE in a hand-written module.
> 
> Zoltan.
> 
> Index: mercury_bootstrap.c
> ===================================================================
> RCS file: /home/mercury1/repository/mercury/runtime/mercury_bootstrap.c,v
> retrieving revision 1.2
> diff -u -u -r1.2 mercury_bootstrap.c
> --- mercury_bootstrap.c	1998/08/05 04:26:24	1.2
> +++ mercury_bootstrap.c	1998/08/06 06:13:50
> @@ -83,6 +83,10 @@
>  MR_MAKE_STACK_LAYOUT_ENTRY(mercury____Index___private_builtin__type_info_1_0);
>  MR_MAKE_STACK_LAYOUT_ENTRY(mercury____Compare___private_builtin__type_info_1_0);
>  BEGIN_MODULE(type_info_module)
> +	init_entry(mercury____Unify___private_builtin__type_info_1_0);
> +	init_entry(mercury____Index___private_builtin__type_info_1_0);
> +	init_entry(mercury____Compare___private_builtin__type_info_1_0);
> +BEGIN_CODE
>  Define_entry(mercury____Unify___private_builtin__type_info_1_0);
>  {

Those init_entries should be init_entry_sl, otherwise this change is
fine.

-- 
       Tyson Dowd           # "Bill Gates is a white persian cat and a monocle
                            # away from becoming another James Bond villan."
     trd at cs.mu.oz.au        # "No Mr Bond, I expect you to upgrade."
http://www.cs.mu.oz.au/~trd #                -- Dennis Miller and Terri Branch



More information about the developers mailing list