OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [g++.dg/] [compat/] [decimal/] [compat-common.h] - Blame information for rev 717

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 693 jeremybenn
/*  Several of the binary compatibility tests use these macros to
2
    allow debugging the test or tracking down a failure by getting an
3
    indication of whether each individual check passed or failed.
4
    When DBG is defined, each check is shown by a dot (pass) or 'F'
5
    (fail) rather than aborting as soon as a failure is detected.  */
6
 
7
#ifdef DBG
8
#include <stdio.h>
9
#define DEBUG_INIT setbuf (stdout, NULL);
10
#define DEBUG_FPUTS(x) fputs (x, stdout);
11
#define DEBUG_DOT putc ('.', stdout);
12
#define DEBUG_NL putc ('\n', stdout);
13
#define DEBUG_FAIL putc ('F', stdout); fails++;
14
#define DEBUG_CHECK { DEBUG_FAIL } else { DEBUG_DOT }
15
#define DEBUG_FINI if (fails) DEBUG_FPUTS ("failed\n") \
16
                   else DEBUG_FPUTS ("passed\n")
17
#else
18
#define DEBUG_INIT
19
#define DEBUG_FPUTS(x)
20
#define DEBUG_DOT
21
#define DEBUG_NL
22
#define DEBUG_FAIL abort ();
23
#define DEBUG_CHECK abort ();
24
#define DEBUG_FINI
25
#endif
26
 
27
#ifdef SKIP_COMPLEX
28
#ifndef SKIP_COMPLEX_INT
29
#define SKIP_COMPLEX_INT
30
#endif
31
#endif
32
 
33
#ifndef SKIP_COMPLEX
34
#ifdef __GNUC__
35
#define CINT(x, y) (x + y * __extension__ 1i)
36
#define CDBL(x, y) (x + y * __extension__ 1i)
37
#else
38
#ifdef __SUNPRO_C
39
/* ??? Complex support without <complex.h>.  */
40
#else
41
#include <complex.h>
42
#endif
43
#ifndef SKIP_COMPLEX_INT
44
#define CINT(x, y) ((_Complex int) (x + y * _Complex_I))
45
#endif
46
#define CDBL(x, y) (x + y * _Complex_I)
47
#endif
48
#endif
49
 
50
#ifdef __cplusplus
51
extern "C" void abort (void);
52
#else
53
extern void abort (void);
54
#endif
55
extern int fails;

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.