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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.dg/] [pr33919.c] - Blame information for rev 749

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

Line No. Rev Author Line
1 689 jeremybenn
/* PR preprocessor/pr33919 */
2
/* { dg-do run } */
3
/* { dg-options "-I . -include ${srcdir}/gcc.dg/pr33919-0.h" } */
4
 
5
#include "pr33919-1.h"
6
 
7
const char *base_file = __BASE_FILE__;
8
 
9
extern int strcmp (const char *, const char *);
10
extern void abort (void);
11
 
12
int
13
main ()
14
{
15
  if (!strcmp (pre_inc_base_file, "<command line>"))
16
    abort ();
17
  if (strcmp (pre_inc_base_file, __FILE__))
18
    abort ();
19
  if (strcmp (base_file, __FILE__))
20
    abort ();
21
  if (strcmp (inc_base_file, __FILE__))
22
    abort ();
23
  if (strcmp (nested_inc_base_file, __FILE__))
24
    abort ();
25
  return 0;
26
}

powered by: WebSVN 2.1.0

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