[m-rev.] diff: add a test case for a ppc/os x bug

[Julien Fischer]

On Thu, 2 Dec 2004, Julien Fischer wrote:

>
> Estimated hours taken: 0.1
> Branches: main
>
> Add a bug that Ian discovered to the test suite.
> XXX We don't have a fix for this yet.
>
> tests/hard_coded/Mmakefile:
> tests/hard_coded/ppc_bug.exp:
> tests/hard_coded/ppc_bug.m:
> 	Add a test case that currently compiles incorrectly in
> 	grade reg.gc on PPC/MacOS X.
>
...
> Index: hard_coded/ppc_bug.exp
> ===================================================================
> RCS file: hard_coded/ppc_bug.exp
> diff -N hard_coded/ppc_bug.exp
> --- /dev/null	1 Jan 1970 00:00:00 -0000
> +++ hard_coded/ppc_bug.exp	2 Dec 2004 06:53:06 -0000
> @@ -0,0 +1 @@
> +3
> Index: hard_coded/ppc_bug.m
> ===================================================================
> RCS file: hard_coded/ppc_bug.m
> diff -N hard_coded/ppc_bug.m
> --- /dev/null	1 Jan 1970 00:00:00 -0000
> +++ hard_coded/ppc_bug.m	2 Dec 2004 06:55:59 -0000
> @@ -0,0 +1,40 @@
> +% The following program compiles incorrectly on PPC/MacOS X
> +% in grade reg.gc.  find_nth_yes/4 ends up throwing an
> +% exception instead of returning `YesPos = 3'.  Passing
> +% `--no-optimize-fulljumps' to causes the test to pass.
> +%
> +% The test passes with gcc 2.95.2 (Apple version)
> +% but fails with gcc 3.3 (Apple version).
> +

I should also mention that this test passes on x86
machines (including in reg.gc).  I'm currently seeing
if using gcc 3.4 on OS X makes any difference.

Julien.
--------------------------------------------------------------------------
mercury-reviews mailing list
post:  mercury-reviews at cs.mu.oz.au
administrative address: owner-mercury-reviews at cs.mu.oz.au
unsubscribe: Address: mercury-reviews-request at cs.mu.oz.au Message: unsubscribe
subscribe:   Address: mercury-reviews-request at cs.mu.oz.au Message: subscribe
--------------------------------------------------------------------------