darling-gdb/gdb/testsuite/gdb.base/langs0.c
1999-06-28 16:06:02 +00:00

35 lines
459 B
C

/* This file is actually in C, it is not supposed to simulate something
translated from another language or anything like that. */
#ifdef PROTOTYPES
extern int fsub_();
int csub (int x)
#else
int
csub (x)
int x;
#endif
{
return x + 1;
}
int
langs0__2do ()
{
return fsub_ () + 2;
}
int
main ()
{
#ifdef usestubs
set_debug_traps();
breakpoint();
#endif
if (langs0__2do () == 5003)
/* Success. */
return 0;
else
return 1;
}