* gcc.c-torture/compile/980616-1.c: New test.
authorJeffrey A Law <law@cygnus.com>
Sun, 16 Aug 1998 00:50:25 +0000 (00:50 +0000)
committerJeff Law <law@gcc.gnu.org>
Sun, 16 Aug 1998 00:50:25 +0000 (18:50 -0600)
From-SVN: r21760

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

index 3312459641923b85b0296c152ca38d8d4bca87e5..6dfde2e258fb47c70c894a107e6ff54b52900aa7 100644 (file)
@@ -1,5 +1,7 @@
 Sun Aug 16 01:29:19 1998  Jeffrey A Law  (law@cygnus.com)
 
+       * gcc.c-torture/compile/980816-1.c: New test.
+
        * gcc.dg/980816-1.c: New test.
 
 1998-08-01  Dave Love  <d.love@dl.ac.uk>
diff --git a/gcc/testsuite/gcc.c-torture/compile/980816-1.c b/gcc/testsuite/gcc.c-torture/compile/980816-1.c
new file mode 100644 (file)
index 0000000..c56b6c9
--- /dev/null
@@ -0,0 +1,51 @@
+typedef unsigned int size_t;
+typedef void *XtPointer;
+
+typedef struct _WidgetRec *Widget;
+typedef struct _WidgetClassRec *WidgetClass;
+
+extern WidgetClass commandWidgetClass;
+
+typedef void (*XtCallbackProc)(
+    Widget              ,
+    XtPointer           ,       
+    XtPointer                   
+);
+
+extern const  char XtStrings[];
+
+
+typedef struct                                          
+{
+       char                    *Name,                   
+                               *Label;                  
+       XtCallbackProc          Callback;                
+       XtPointer               ClientData;              
+       Widget                  W;                               
+} DialogButtonType, *DialogButtonTypePtr;
+
+Widget AddButtons(Widget Parent, Widget Top,
+       DialogButtonTypePtr Buttons, size_t Count)
+{
+       int             i;
+
+       for (i = 0; i < Count; i++)
+       {
+               if (!Buttons[i].Label)
+                       continue;
+               Buttons[i].W  = XtVaCreateManagedWidget(Buttons[i].Name,
+                       commandWidgetClass,
+                       Parent,
+                       ((char*)&XtStrings[429]) , Buttons[i].Label,
+                       "fromHoriz" , i ? Buttons[i-1].W : ((void *)0) ,
+                       "fromVert" , Top,
+                       "resizable" , 1 ,
+                       ((void *)0) );
+
+               XtAddCallback(((char*)&XtStrings[136]),
+                                Buttons[i].Callback, Buttons[i].ClientData);
+       }
+       return(Buttons[Count-1].W);
+}
+