* gcc.c-torture/execute/20010604-1.c: New test.

From-SVN: r42883

gcc/testsuite/ChangeLog

+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.

gcc/testsuite/gcc.c-torture/execute/20010604-1.c

+#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);
+}