1184299Snwhitehornlong f (w) 2184299Snwhitehorn char *w; 3184299Snwhitehorn{ 4184299Snwhitehorn long k, i, c = 0, x; 5184299Snwhitehorn char *p = (char*) &x; 6184299Snwhitehorn for (i = 0; i < 1; i++) 7184299Snwhitehorn { 8184299Snwhitehorn for (k = 0; k < sizeof (long); k++) 9184299Snwhitehorn p[k] = w[k]; 10184299Snwhitehorn c += x; 11184299Snwhitehorn } 12184299Snwhitehorn return c; 13184299Snwhitehorn} 14184299Snwhitehorn 15184299Snwhitehornmain () 16184299Snwhitehorn{ 17184299Snwhitehorn int i; 18184299Snwhitehorn char a[sizeof (long)]; 19184299Snwhitehorn 20184299Snwhitehorn for (i = sizeof (long); --i >= 0;) a[i] = ' '; 21184299Snwhitehorn if (f (a) != ~0UL / (unsigned char) ~0 * ' ') 22184299Snwhitehorn abort (); 23184299Snwhitehorn exit (0); 24184299Snwhitehorn} 25184299Snwhitehorn