From 838ae13dc4ab603f1efdf1da653e2ca1b7b009e1 Mon Sep 17 00:00:00 2001
From: Stan Shebs <shebs@apple.com>
Date: Fri, 16 Apr 1999 01:33:56 +0000
Subject: Initial revision

---
 gdb/testsuite/gdb.base/langs0.c | 28 ++++++++++++++++++++++++++++
 1 file changed, 28 insertions(+)
 create mode 100644 gdb/testsuite/gdb.base/langs0.c

(limited to 'gdb/testsuite/gdb.base/langs0.c')

diff --git a/gdb/testsuite/gdb.base/langs0.c b/gdb/testsuite/gdb.base/langs0.c
new file mode 100644
index 00000000000..69c0ce8b0fa
--- /dev/null
+++ b/gdb/testsuite/gdb.base/langs0.c
@@ -0,0 +1,28 @@
+/* This file is actually in C, it is not supposed to simulate something
+   translated from another language or anything like that.  */
+int
+csub (x)
+     int x;
+{
+  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;
+}
-- 
cgit v1.2.1