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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.dg/] [20020122-2.c] - Blame information for rev 774

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

Line No. Rev Author Line
1 689 jeremybenn
/* This test was supplied with PR target/5379.  It caused the compiler
2
   to get a segmentation fault.  */
3
 
4
/* { dg-do compile } */
5
/* { dg-options "-O2 -fprefetch-loop-arrays -w" } */
6
/* { dg-options "-O2 -fprefetch-loop-arrays -march=athlon" { target { { i?86-*-* x86_64-*-* } && ia32 } } } */
7
 
8
extern int access( char* );
9
extern int a();
10
char* foocp();
11
 
12
void
13
_KDE_IceGetPoValidAuthIndices (protocol_name, num_indices_ret, indices_ret)
14
const char *protocol_name;
15
int *num_indices_ret;
16
int *indices_ret;
17
{
18
    int auth_file;
19
    char *filename;
20
    int index_ret, i;
21
 
22
    if (!(filename = foocp ()))
23
        return;
24
 
25
    if (access (filename))
26
        return;
27
 
28
    if (auth_file = access (filename))
29
        return;
30
 
31
    for (;;)
32
    {
33
        if (strcmp (protocol_name, protocol_name) == 0 )
34
        {
35
            for (i = 0; i < *num_indices_ret; i++)
36
                if (index_ret == indices_ret[i])
37
                    break;
38
        }
39
    }
40
}
41
 

powered by: WebSVN 2.1.0

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