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

Subversion Repositories scarts

[/] [scarts/] [trunk/] [toolchain/] [scarts-gcc/] [gcc-4.1.1/] [gcc/] [testsuite/] [gcc.c-torture/] [compile/] [20010226-1.c] - Blame information for rev 12

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 12 jlechner
/* { dg-skip-if "trampolines not supported" { "scarts_32-*-*" || "scarts_16-*-*" } { "*" } { "" } } */
2
void f1 (void *);
3
void f3 (void *, void (*)(void *));
4
void f2 (void *);
5
 
6
int foo (void *a, int b)
7
{
8
  if (!b)
9
    {
10
      f1 (a);
11
      return 1;
12
    }
13
  if (b)
14
    {
15
      void bar (void *c)
16
      {
17
        if (c == a)
18
          f2 (c);
19
      }
20
      f3 (a, bar);
21
    }
22
  return 0;
23
}

powered by: WebSVN 2.1.0

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