/* StdCCorpse1.c */

extern void Croak();

static int si3[3] = {1, 2, 3};
static int sui;
int i;
int ii = 42;
extern int ei;
short int shorti = 12345;
char sc = -100;
unsigned char uc = 200;
long unsigned int lui = -1;

enum letter {h, j, k};
typedef enum letter Letter;

struct rec {
	int i;
	int (*f)();
	int *pi;
	int ia[3];
};

typedef struct rec Rec, *Ptr;

int blork();
Letter (*inc)();
int (*tweak)() = blork;

Letter rot(l)
	Letter l;
	{
	Letter next = l+1;
	if (l==k) return h;
	return next;
	}

int blork(x)
	int x;
	{
	Letter l = x;
	int innerEye = x;
	int *pii = ⅈ
	Croak();
	return x+innerEye+*pii;}

int zork(r)
	Rec r;
	{
	return r.i;
	}

main () {
	Rec r;
	Ptr p = &r;
	int *ip = &si3[1];
	r.i = 17;
	r.f = blork;
	r.pi = &r.i;
	r.ia[0] = 1 + (r.ia[1] = 1 + (r.ia[2] = 13));
	inc = rot;
	(*ip) += blork(i);
	return;
	}