From: Hans-Peter Nilsson <hp@bitrange.com>
Date: Tue, 1 Jan 2002 20:48:31 +0000 (+0000)
Subject: * gcc.dg/mmix-1.c: New test.
X-Git-Tag: prereleases/libstdc++-3.0.96~767
X-Git-Url: https://gcc.gnu.org/git/?a=commitdiff_plain;h=db993cf385183100b90295b614707c2c014c96bb;p=gcc.git

* gcc.dg/mmix-1.c: New test.

From-SVN: r48447
---

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index d97cc967a6f6..eb39eea77406 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,7 @@
+2002-01-01  Hans-Peter Nilsson  <hp@bitrange.com>
+
+	* gcc.dg/mmix-1.c: New test.
+
 2001-12-31  Richard Henderson  <rth@redhat.com>
 
 	* gcc.dg/asm-5.c: New.
diff --git a/gcc/testsuite/gcc.dg/mmix-1.c b/gcc/testsuite/gcc.dg/mmix-1.c
new file mode 100644
index 000000000000..802ae18ff657
--- /dev/null
+++ b/gcc/testsuite/gcc.dg/mmix-1.c
@@ -0,0 +1,42 @@
+/* Origin: <hp@bitrange.com>
+   Test that MMIX -mtoplevel-symbols cause a ":" to be prepended on the
+   right symbols and only there.  */
+/* { dg-do compile { target mmix-*-* } } */
+/* { dg-options "-mtoplevel-symbols" } */
+
+static int static_variable = 1;
+int global_initialized_variable = 2;
+extern int extern_declared_variable;
+int common_variable;
+extern int extern_declared_function (void);
+static int static_function (void);
+
+int global_defined_function ()
+{
+  static int static_variable_in_function = 2009;
+  return
+    static_variable
+    + static_variable_in_function++
+    + global_initialized_variable
+    + common_variable
+    + extern_declared_function ()
+    + static_function ();
+}
+
+static int
+static_function (void)
+{
+  if (extern_declared_variable)
+    return 42;
+  else
+    return 42 + global_defined_function ();
+}
+
+/* { dg-final { scan-assembler-not ":static_variable" } } */
+/* { dg-final { scan-assembler-not "(^|\[^:\])global_initialized_variable" } } */
+/* { dg-final { scan-assembler-not "\[^:\]extern_declared_variable" } } */
+/* { dg-final { scan-assembler-not "\[^:\]common_variable" } } */
+/* { dg-final { scan-assembler-not "\[^:\]extern_declared_function" } } */
+/* { dg-final { scan-assembler-not ":static_function" } } */
+/* { dg-final { scan-assembler-not "(^|\[^:\])global_defined_function" } } */
+/* { dg-final { scan-assembler-not "\[^:\]extern_declared_variable" } } */