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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.target/] [mips/] [code-readable-1.c] - Blame information for rev 704

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

Line No. Rev Author Line
1 691 jeremybenn 
/* { dg-options "(-mips16) -mcode-readable=yes -mgp32 addressing=absolute" } */
2 
 
3 
MIPS16 int
4 
foo (int i)
5 
{
6 
  switch (i)
7 
    {
8 
    case 1: return 40;
9 
    case 2: return 11;
10 
    case 3: return 29;
11 
    case 4: return 10;
12 
    case 5: return 12;
13 
    case 6: return 35;
14 
    case 7: return 23;
15 
    default: return 0;
16 
    }
17 
}
18 
 
19 
extern int k[];
20 
 
21 
MIPS16 int *
22 
bar (void)
23 
{
24 
  return k;
25 
}
26 
 
27 
/* { dg-final { scan-assembler "\tla\t" } } */
28 
/* { dg-final { scan-assembler "\t\\.half\t" } } */
29 
/* { dg-final { scan-assembler-not "%hi\\(\[^)\]*L" } } */
30 
/* { dg-final { scan-assembler-not "%lo\\(\[^)\]*L" } } */
31 
 
32 
/* { dg-final { scan-assembler "\t\\.word\tk\n" } } */
33 
/* { dg-final { scan-assembler-not "%hi\\(k\\)" } } */
34 
/* { dg-final { scan-assembler-not "%lo\\(k\\)" } } */

powered by: WebSVN 2.1.0

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