1#include <stdio.h> 2#include <string.h> 3 4char out[100]; 5 6typedef struct { double d; int i[3]; } B; 7typedef struct { char c[33],c1; } X; 8 9char c1 = 'a'; 10char c2 = 127; 11char c3 = (char)128; 12char c4 = (char)255; 13char c5 = -1; 14 15double d1 = 0.1; 16double d2 = 0.2; 17double d3 = 0.3; 18double d4 = 0.4; 19double d5 = 0.5; 20double d6 = 0.6; 21double d7 = 0.7; 22double d8 = 0.8; 23double d9 = 0.9; 24 25B B1 = {0.1,{1,2,3}}; 26B B2 = {0.2,{5,4,3}}; 27X X1 = {"abcdefghijklmnopqrstuvwxyzABCDEF", 'G'}; 28X X2 = {"123",'9'}; 29X X3 = {"return-return-return",'R'}; 30 31X f (B a, char b, double c, B d) 32{ 33 static X xr = {"return val", 'R'}; 34 X r; 35 r = xr; 36 r.c1 = b; 37 sprintf (out, "X f(B,char,double,B):({%g,{%d,%d,%d}},'%c',%g,{%g,{%d,%d,%d}})", 38 a.d, a.i[0], a.i[1], a.i[2], b, c, d.d, d.i[0], d.i[1], d.i[2]); 39 return r; 40} 41 42X (*fp) (B, char, double, B) = &f; 43 44main () 45{ 46 X Xr; 47 char tmp[100]; 48 49 Xr = f (B1, c2, d3, B2); 50 strcpy (tmp, out); 51 Xr.c[0] = Xr.c1 = '\0'; 52 Xr = (*fp) (B1, c2, d3, B2); 53 if (strcmp (tmp, out)) 54 abort (); 55 56 exit (0); 57} 58