c/6277: Failure of test gcc.dg/i386-387-1.c on cygwin

[David.Billinghurst@riotinto.com]

>Number:         6277
>Category:       c
>Synopsis:       Failure of test gcc.dg/i386-387-1.c on cygwin
>Confidential:   no
>Severity:       non-critical
>Priority:       medium
>Responsible:    unassigned
>State:          open
>Class:          sw-bug
>Submitter-Id:   net
>Arrival-Date:   Fri Apr 12 07:36:01 PDT 2002
>Closed-Date:
>Last-Modified:
>Originator:     David Billinghurst
>Release:        unknown-1.0
>Organization:
>Environment:
i686-pc-cygwin
>Description:
gcc.dg/i386-387-1.c fails on cygwin with:

FAIL: gcc.dg/i386-387-1.c scan-assembler call	sin
FAIL: gcc.dg/i386-387-1.c scan-assembler call	cos
FAIL: gcc.dg/i386-387-1.c scan-assembler call	sqrt

Inspection of the assembler shows lines "call  _sin" etc
If this is the desired outcome then the scan-assembler
regex needs patching (below)
>How-To-Repeat:
bootstrap and run testsuite
>Fix:
Index: i386-387-1.c
===================================================================
RCS file: /cvs/gcc/gcc/gcc/testsuite/gcc.dg/i386-387-1.c,v
retrieving revision 1.1.2.1
diff -u -r1.1.2.1 i386-387-1.c
--- i386-387-1.c        29 Mar 2002 23:21:41 -0000      1.1.2.1
+++ i386-387-1.c        12 Apr 2002 14:33:42 -0000
@@ -1,9 +1,9 @@
 /* Verify that -mno-fancy-math-387 works.  */
 /* { dg-do compile { target "i?86-*-*" } } */
 /* { dg-options "-O -ffast-math -mfpmath=387 -mno-fancy-math-387" } */
-/* { dg-final { scan-assembler "call\tsin" } } */
-/* { dg-final { scan-assembler "call\tcos" } } */
-/* { dg-final { scan-assembler "call\tsqrt" } } */
+/* { dg-final { scan-assembler "call\t_?sin" } } */
+/* { dg-final { scan-assembler "call\t_?cos" } } */
+/* { dg-final { scan-assembler "call\t_?sqrt" } } */

 double f1(double x) { return __builtin_sin(x); }
 double f2(double x) { return __builtin_cos(x); }
>Release-Note:
>Audit-Trail:
>Unformatted:
----gnatsweb-attachment----
Content-Type: text/plain; name="i386-387-1.s"
Content-Disposition: inline; filename="i386-387-1.s"

	.file	"i386-387-1.c"
	.text
	.align 2
.globl _f1
	.def	_f1;	.scl	2;	.type	32;	.endef
_f1:
	pushl	%ebp
	movl	%esp, %ebp
	subl	$8, %esp
	movl	8(%ebp), %eax
	movl	12(%ebp), %edx
	movl	%eax, (%esp)
	movl	%edx, 4(%esp)
	call	_sin
	movl	%ebp, %esp
	popl	%ebp
	ret
	.align 2
.globl _f2
	.def	_f2;	.scl	2;	.type	32;	.endef
_f2:
	pushl	%ebp
	movl	%esp, %ebp
	subl	$8, %esp
	movl	8(%ebp), %eax
	movl	12(%ebp), %edx
	movl	%eax, (%esp)
	movl	%edx, 4(%esp)
	call	_cos
	movl	%ebp, %esp
	popl	%ebp
	ret
	.align 2
.globl _f3
	.def	_f3;	.scl	2;	.type	32;	.endef
_f3:
	pushl	%ebp
	movl	%esp, %ebp
	subl	$8, %esp
	movl	8(%ebp), %eax
	movl	12(%ebp), %edx
	movl	%eax, (%esp)
	movl	%edx, 4(%esp)
	call	_sqrt
	movl	%ebp, %esp
	popl	%ebp
	ret
	.def	_sqrt;	.scl	2;	.type	32;	.endef
	.def	_cos;	.scl	2;	.type	32;	.endef
	.def	_sin;	.scl	2;	.type	32;	.endef