From 38f76c25a93c43e508de67a0c620a57f1bce2eee Mon Sep 17 00:00:00 2001
From: Jeffrey A Law <law@cygnus.com>
Date: Tue, 25 Aug 1998 18:43:10 +0000
Subject: * gcc.c-torture/compile/980825-1.c: New test.

From-SVN: r21975
---
 gcc/testsuite/ChangeLog                        |  4 ++++
 gcc/testsuite/gcc.c-torture/compile/980825-1.c | 30 ++++++++++++++++++++++++++
 2 files changed, 34 insertions(+)
 create mode 100644 gcc/testsuite/gcc.c-torture/compile/980825-1.c

(limited to 'gcc')

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 810e3b5..5d0537f 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,7 @@
+Tue Aug 25 19:42:13 1998  Jeffrey A Law  (law@cygnus.com)
+
+	* gcc.c-torture/compile/980825-1.c: New test.
+
 Mon Aug 24 16:38:52 1998  Jeffrey A Law  (law@cygnus.com)
 
 	* gcc.c-torture/compile/930326-1.x: Fix typo.
diff --git a/gcc/testsuite/gcc.c-torture/compile/980825-1.c b/gcc/testsuite/gcc.c-torture/compile/980825-1.c
new file mode 100644
index 0000000..34e35bf
--- /dev/null
+++ b/gcc/testsuite/gcc.c-torture/compile/980825-1.c
@@ -0,0 +1,30 @@
+typedef enum { FALSE, TRUE } boolean;
+enum _errorTypes { FATAL = 1, WARNING = 2, PERROR = 4 };
+typedef struct _optionValues {
+    struct _include {		 
+	boolean	classNames;	 
+	boolean	defines;	 
+	boolean	enumerators;	 
+    } include;
+} optionValues;
+extern optionValues	Option;
+static void applyTagInclusionList( list )
+    const char *const list;
+{
+    boolean mode = TRUE;	 
+    const char *p;
+    for (p = list  ;  *p != '\0'  ;  ++p)
+	switch (*p)
+	{
+	    case '=':	 
+		clearTagList();
+		mode = TRUE;
+		break;
+	    case '+':	mode = TRUE;	break;	 
+	    case '-':	mode = FALSE;	break;	 
+	    case 'c':	Option.include.classNames	= mode;		break;
+	    case 'd':	Option.include.defines		= mode;		break;
+	    case 'e':	Option.include.enumerators	= mode;		break;
+	    default: error(FATAL, "-i: Invalid tag option '%c'", *p);	break;
+	}
+}
-- 
cgit v1.1