xref: /openbsd-src/gnu/usr.bin/binutils/gdb/testsuite/gdb.base/langs0.c (revision b725ae7711052a2233e31a66fefb8a752c388d7a)
1e93f7393Sniklas /* This file is actually in C, it is not supposed to simulate something
2e93f7393Sniklas    translated from another language or anything like that.  */
3*b725ae77Skettenis #ifdef PROTOTYPES
4*b725ae77Skettenis extern  int fsub_();
5*b725ae77Skettenis 
csub(int x)6*b725ae77Skettenis int csub (int x)
7*b725ae77Skettenis #else
8e93f7393Sniklas int
9e93f7393Sniklas csub (x)
10e93f7393Sniklas      int x;
11*b725ae77Skettenis #endif
12e93f7393Sniklas {
13e93f7393Sniklas   return x + 1;
14e93f7393Sniklas }
15e93f7393Sniklas 
16e93f7393Sniklas int
langs0__2do()17e93f7393Sniklas langs0__2do ()
18e93f7393Sniklas {
19e93f7393Sniklas   return fsub_ () + 2;
20e93f7393Sniklas }
21e93f7393Sniklas 
22e93f7393Sniklas int
main()23e93f7393Sniklas main ()
24e93f7393Sniklas {
25e93f7393Sniklas #ifdef usestubs
26e93f7393Sniklas   set_debug_traps();
27e93f7393Sniklas   breakpoint();
28e93f7393Sniklas #endif
29e93f7393Sniklas   if (langs0__2do () == 5003)
30e93f7393Sniklas     /* Success.  */
31e93f7393Sniklas     return 0;
32e93f7393Sniklas   else
33e93f7393Sniklas     return 1;
34e93f7393Sniklas }
35