* gcc.c-torture/execute/20010604-1.c: New test.
authorJohn David Anglin <dave@hiauly1.hia.nrc.ca>
Mon, 4 Jun 2001 20:30:45 +0000 (20:30 +0000)
committerJohn David Anglin <danglin@gcc.gnu.org>
Mon, 4 Jun 2001 20:30:45 +0000 (20:30 +0000)
From-SVN: r42883

gcc/testsuite/ChangeLog
gcc/testsuite/gcc.c-torture/execute/20010604-1.c [new file with mode: 0644]

index 2f81f4c78cee487cc732ee3bf46e82aaf4df3401..03a8b52bcf79575fbac12362cba671c032c7c1dc 100644 (file)
@@ -1,3 +1,7 @@
+2001-06-04  John David Anglin  <dave@hiauly1.hia.nrc.ca>
+
+       * gcc.c-torture/execute/20010604-1.c: New test.
+
 2001-06-04  Loren J. Rittle  <ljrittle@acm.org>
 
        * gcc.c-torture/execute/ieee/rbug.x: XFAIL FreeBSD 5.x.
diff --git a/gcc/testsuite/gcc.c-torture/execute/20010604-1.c b/gcc/testsuite/gcc.c-torture/execute/20010604-1.c
new file mode 100644 (file)
index 0000000..e0deaf5
--- /dev/null
@@ -0,0 +1,14 @@
+#include <stdbool.h>
+
+int f (int a, int b, int c, _Bool d, _Bool e, _Bool f, char g)
+{
+  if (g != 1 || d != true || e != true || f != true) abort ();
+  return a + b + c;
+}
+
+int main (void)
+{
+  if (f (1, 2, -3, true, true, true, '\001'))
+    abort ();
+  exit (0);
+}