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

Subversion Repositories open8_urisc

[/] [open8_urisc/] [trunk/] [gnu/] [binutils/] [ld/] [testsuite/] [ld-pe/] [direct2_client.c] - Rev 117

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

extern void abort (void);
 
void
__cdecl
lib2foocdecl(int junk1, int* junk2);
 
void
__stdcall
lib2foostdcall(int junk1, int* junk2);
 
void
__fastcall
lib2foofastcall(int junk1, int* junk2);
 
void
__cdecl
lib1foocdecl(int junk1, int* junk2)
{
    lib2foocdecl(junk1, junk2);
}
 
void
__stdcall
lib1foostdcall(int junk1, int* junk2)
{
    lib2foostdcall(junk1, junk2);
}
 
void
__fastcall
lib1foofastcall(int junk1, int* junk2)
{
    lib2foofastcall(junk1, junk2);
}
 
int main()
{
  int junk[3];
  lib1foofastcall (1, &junk[0]);
  lib1foostdcall (2, &junk[1]);
  lib1foocdecl (3, &junk[2]);
  if (junk[1] != 2 || junk[0] != 1 || junk[2] != 3)
    abort ();
 
  return 0;
}
 
 

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

powered by: WebSVN 2.1.0

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