gdb/testsuite/gdb.base/langs0.c

   1 /* This file is actually in C, it is not supposed to simulate something
   2    translated from another language or anything like that.  */
   3 extern  int fsub_();
   4
   5 int csub (int x)
   6 {
   7   return x + 1;
   8 }
   9
  10 int
  11 langs0__2do ()
  12 {
  13   return fsub_ () + 2;
  14 }
  15
  16 int
  17 main ()
  18 {
  19   if (langs0__2do () == 5003)
  20     /* Success.  */
  21     return 0;
  22   else
  23     return 1;
  24 }