(root)/
gcc-13.2.0/
gcc/
testsuite/
gcc.c-torture/
compile/
980816-1.c
       1  /* { dg-skip-if "too many arguments in function call" { bpf-*-* } } */
       2  
       3  typedef __SIZE_TYPE__ size_t;
       4  typedef void *XtPointer;
       5  
       6  typedef struct _WidgetRec *Widget;
       7  typedef struct _WidgetClassRec *WidgetClass;
       8  
       9  extern WidgetClass commandWidgetClass;
      10  
      11  typedef void (*XtCallbackProc)(
      12      Widget 		 ,
      13      XtPointer 		 ,	 
      14      XtPointer 		 	 
      15  );
      16  
      17  extern const  char XtStrings[];
      18  
      19  
      20  typedef struct						 
      21  {
      22  	char			*Name,			 
      23  				*Label;			 
      24  	XtCallbackProc		Callback;		 
      25  	XtPointer		ClientData;		 
      26  	Widget			W;				 
      27  } DialogButtonType, *DialogButtonTypePtr;
      28  
      29   
      30  Widget AddButtons(Widget Parent, Widget Top,
      31  	DialogButtonTypePtr Buttons, size_t Count)
      32  {
      33  	int		i;
      34  
      35  	for (i = 0; i < Count; i++)
      36  	{
      37  		if (!Buttons[i].Label)
      38  			continue;
      39  		Buttons[i].W  = XtVaCreateManagedWidget(Buttons[i].Name,
      40  			commandWidgetClass,
      41  			Parent,
      42  			((char*)&XtStrings[429]) , Buttons[i].Label,
      43  			"fromHoriz" , i ? Buttons[i-1].W : ((void *)0) ,
      44  			"fromVert" , Top,
      45  			"resizable" , 1 ,
      46  			((void *)0) );
      47  
      48  		XtAddCallback(((char*)&XtStrings[136]),
      49  				 Buttons[i].Callback, Buttons[i].ClientData);
      50  	}
      51  	return(Buttons[Count-1].W);
      52  }
      53