source: trunk/libs/newlib/src/libgloss/testsuite/libgloss.all/double.c @ 444

Last change on this file since 444 was 444, checked in by satin@…, 6 years ago

add newlib,libalmos-mkh, restructure shared_syscalls.h and mini-libc

File size: 440 bytes
Line 
1/* Oki bug report [OKI001](gcc008_1)
2
3        The following program is not executed.
4        error messages are as follow.
5
6        illegal trap: 0x12 pc=d000d954
7        d000d954 08000240  NOP
8 */
9
10#include <stdio.h>
11extern double dcall ();
12
13main ()
14{
15  double d1, d2, d3;
16  int i;
17
18  d1 = dcall (1.);
19  printf ("d1 = %e\n", d1);
20
21  pass ("double [OKI001]");
22  fflush(stdout);
23}
24
25double
26dcall (d)
27     double d;
28{
29  int Zero = 0;
30  return d + Zero;
31}
32
33
Note: See TracBrowser for help on using the repository browser.