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

Subversion Repositories openrisc

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

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


/* this is an f90 function */
void testOnly(int *cIntPtr);
 
int main(int argc, char **argv)
{
   int myCInt;
 
   myCInt = -11;
   testOnly(&myCInt);
 
   return 0;
}/* end main() */

Line No.	Rev	Author	Line
1	694	jeremybenn	`/* this is an f90 function */`
2			`void testOnly(int *cIntPtr);`
3
4			`int main(int argc, char **argv)`
5			`{`
6			`int myCInt;`
7
8			`myCInt = -11;`
9			`testOnly(&myCInt);`
10
11			`return 0;`
12			`}/* end main() */`

Browse

Tools

Subversion Repositories openrisc

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