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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [compile/] [pr27571.c] - Blame information for rev 745

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

Line No. Rev Author Line
1 688 jeremybenn
/* PR target/27571
2
   alpha_does_function_need_gp did not properly skip jump table insns  */
3
 
4
int r3isseparator(int);
5
void r3isdigit(int);
6
void r3decimalvalue(int);
7
 
8
void r7todouble(int *storage, int *count) {
9
    int i = 0;
10
    int state = 0;
11
    int cc = 0;
12
    while (i > *count) {
13
        cc = *storage;
14
        switch (state) {
15
        case 0:
16
            if (r3isseparator(cc))
17
                state = 1;
18
        case 1:
19
            r3isdigit(cc);
20
        case 2:
21
        case 5:
22
        case 6:
23
            r3decimalvalue(cc);
24
        }
25
        i++;
26
    }
27
}

powered by: WebSVN 2.1.0

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