1 files changed, 30 insertions, 0 deletions
diff --git a/gcc/testsuite/gcc.dg/bitfld-1.c b/gcc/testsuite/gcc.dg/bitfld-1.c
new file mode 100644
index 00000000000..ce37cc4e2e6
--- /dev/null
+++ b/gcc/testsuite/gcc.dg/bitfld-1.c
@@ -0,0 +1,30 @@
+/* Copyright (C) 2002 Free Software Foundation, Inc.
+
+   Tests various diagnostics about a bit-field's type and width.
+
+   Source: Neil Booth, 26 Jan 2002.
+*/
+
+/* { dg-options -pedantic } */
+
+enum foo {e1 = 0, e2, e3, e4, e5};
+
+int x;
+typedef unsigned int ui;
+
+struct bf1
+{
+  unsigned int a: 3.5;		/* { dg-error "integer constant" } */
+  unsigned int b: x;		/* { dg-error "integer constant" } */
+  unsigned int c: -1;		/* { dg-error "negative width" } */
+  unsigned int d: 0;		/* { dg-error "zero width" } */
+  unsigned int : 0;		/* { dg-bogus "zero width" } */
+  unsigned int : 5;
+  double e: 1;			/* { dg-error "invalid type" } */
+  float f: 1;			/* { dg-error "invalid type" } */
+  unsigned long g: 5;		/* { dg-warning "GCC extension" } */
+  ui h: 5;
+  enum foo i: 2;		/* { dg-error "narrower" } */
+  enum foo j: 3;
+  unsigned int k: 256;		/* { dg-error "exceeds its type" } */
+};