Mercurial > repo
view interps/c-intercal/oilout0e.c @ 11293:a7899ef2d7b6
<wob_jonas> learn Aristotle said that every illness can be cured by balancing the four vitreous humors, and everyone believed him for two thousand years, even though people still died of illnesses. It wasn\'t until the 20th century that Szent-Gy\xc3\xb6rgyi Albert realized that Aristotle didn\'t find fifth kind of vitreous humor, vitamin C, because the Greek alphabet
author | HackBot |
---|---|
date | Mon, 01 Jan 2018 17:57:43 +0000 |
parents | 859f9b4339e6 |
children |
line wrap: on
line source
/* Automatically generated output, edit source and recompile to change */ #include "oil.h" int optimize_pass1_e(node *np) { int opted=0; unsigned long c,c1,c2,c3,c4,c5,c6,c7,c8,c9; unsigned long x,x1,x2,x3,x4,x5,x6,x7,x8,x9,r; int tempw; node *tp; checknodeactbits(np); if(np->opcode==C_PLUS && (np->lval->opcode==MESH || np->lval->opcode==MESH32) && np->lval->constant==1LU && np->rval->opcode==C_LOGICALNOT) do { x1=np->rval->rval->constant; c1=np->rval->rval->optdata; x=x1; c=c1; if(!(c==1)) break; OPTING(not21); tp=newnode(); MAYBENEWNODE(tp); tp->opcode=C_MINUS; tp->width=32; MAYBENEWNODE(tp->lval); tp->lval->opcode=MESH32; tp->lval->width=32; tp->lval->constant=(2LU); tp->rval=np->rval->rval; np->rval->rval=0; nodefree(np->lval); nodefree(np->rval); tempw=np->width; *np=*tp; np->width=tempw; free(tp); } while(0); checknodeactbits(np); if(np->opcode==C_PLUS && np->lval->opcode==C_LOGICALNOT && (np->rval->opcode==MESH || np->rval->opcode==MESH32) && np->rval->constant==1LU) do { x1=np->lval->rval->constant; c1=np->lval->rval->optdata; x=x1; c=c1; if(!(c==1)) break; OPTING(not21); tp=newnode(); MAYBENEWNODE(tp); tp->opcode=C_MINUS; tp->width=32; MAYBENEWNODE(tp->lval); tp->lval->opcode=MESH32; tp->lval->width=32; tp->lval->constant=(2LU); tp->rval=np->lval->rval; np->lval->rval=0; nodefree(np->lval); nodefree(np->rval); tempw=np->width; *np=*tp; np->width=tempw; free(tp); } while(0); checknodeactbits(np); if(np->opcode==MINGLE && (np->lval->opcode==MESH || np->lval->opcode==MESH32) && np->lval->constant==0LU) do { x1=np->rval->constant; c1=np->rval->optdata; x=x1; c=c1; if(!(c==1)) break; OPTING(nullmingle); tp=newnode(); tp=np->rval; np->rval=0; nodefree(np->lval); nodefree(np->rval); tempw=np->width; *np=*tp; np->width=tempw; free(tp); } while(0); checknodeactbits(np); if(np->opcode==C_LOGICALNOT && np->rval->opcode==C_LOGICALNOT) do { x1=np->rval->rval->constant; c1=np->rval->rval->optdata; x=x1; c=c1; if(!(c==1)) break; OPTING(redundantdoublenot); tp=newnode(); tp=np->rval->rval; np->rval->rval=0; nodefree(np->lval); nodefree(np->rval); tempw=np->width; *np=*tp; np->width=tempw; free(tp); } while(0); c=c1=c2=c3=c4=c5=c6=c7=c8=c9=0; x=x1=x2=x3=x4=x5=x6=x7=x8=x9=r=0; if(c+c1+c2+c3+c4+c5+c6+c7+c8+c9+r+ x+x1+x2+x3+x4+x5+x6+x7+x8+x9) raise(SIGSEGV); return opted; }