diff interps/c-intercal/oilout0d.c @ 996:859f9b4339e6

<Gregor> tar xf egobot.tar.xz
author HackBot
date Sun, 09 Dec 2012 19:30:08 +0000
parents
children
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/interps/c-intercal/oilout0d.c	Sun Dec 09 19:30:08 2012 +0000
@@ -0,0 +1,465 @@
+/* Automatically generated output, edit source and recompile to change */
+#include "oil.h"
+int optimize_pass1_d(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_AND)
+  do
+  {
+    if(!nodessame(np->lval,np->rval)) break;
+    x1=np->rval->constant; c1=np->rval->optdata;
+    OPTING(anditself);
+    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_OR)
+  do
+  {
+    if(!nodessame(np->lval,np->rval)) break;
+    x1=np->rval->constant; c1=np->rval->optdata;
+    OPTING(oritself);
+    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_XOR)
+  do
+  {
+    if(!nodessame(np->lval,np->rval)) break;
+    x1=np->rval->constant; c1=np->rval->optdata;
+    OPTING(xoritself);
+    tp=newnode();
+    MAYBENEWNODE(tp);
+    tp->opcode=MESH32;
+    tp->width=32;
+    tp->constant=(0LU);
+    nodefree(np->lval); nodefree(np->rval);
+    tempw=np->width; *np=*tp; np->width=tempw; free(tp);
+  } while(0);
+
+  checknodeactbits(np);
+  if(np->opcode==C_XOR &&
+     np->lval->opcode==C_XOR)
+  do
+  {
+    x2=np->lval->rval->constant; c2=np->lval->rval->optdata;
+    if(!nodessame(np->lval->lval,np->rval)) break;
+    x1=np->rval->constant; c1=np->rval->optdata;
+    OPTING(xoritself);
+    tp=newnode();
+    tp=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==C_XOR &&
+     np->lval->opcode==C_XOR)
+  do
+  {
+    x2=np->lval->lval->constant; c2=np->lval->lval->optdata;
+    if(!nodessame(np->lval->rval,np->rval)) break;
+    x1=np->rval->constant; c1=np->rval->optdata;
+    OPTING(xoritself);
+    tp=newnode();
+    tp=np->lval->lval;
+    np->lval->lval=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_XOR &&
+     np->rval->opcode==C_XOR)
+  do
+  {
+    x2=np->rval->rval->constant; c2=np->rval->rval->optdata;
+    if(!nodessame(np->lval,np->rval->lval)) break;
+    x1=np->rval->lval->constant; c1=np->rval->lval->optdata;
+    OPTING(xoritself);
+    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);
+
+  checknodeactbits(np);
+  if(np->opcode==C_XOR &&
+     np->rval->opcode==C_XOR)
+  do
+  {
+    x2=np->rval->lval->constant; c2=np->rval->lval->optdata;
+    if(!nodessame(np->lval,np->rval->rval)) break;
+    x1=np->rval->rval->constant; c1=np->rval->rval->optdata;
+    OPTING(xoritself);
+    tp=newnode();
+    tp=np->rval->lval;
+    np->rval->lval=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_XOR)
+  do
+  {
+    x2=np->rval->rval->constant; c2=np->rval->rval->optdata;
+    x1=np->rval->lval->constant; c1=np->rval->lval->optdata;
+    OPTING(xortoequal);
+    tp=newnode();
+    MAYBENEWNODE(tp);
+    tp->opcode=C_ISEQUAL;
+    tp->width=16;
+    tp->lval=np->rval->lval;
+    np->rval->lval=0;
+    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_LOGICALNOT &&
+     np->rval->opcode==C_ISEQUAL)
+  do
+  {
+    x2=np->rval->rval->constant; c2=np->rval->rval->optdata;
+    x1=np->rval->lval->constant; c1=np->rval->lval->optdata;
+    OPTING(negatingequal);
+    tp=newnode();
+    MAYBENEWNODE(tp);
+    tp->opcode=C_NOTEQUAL;
+    tp->width=16;
+    tp->lval=np->rval->lval;
+    np->rval->lval=0;
+    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_LOGICALNOT &&
+     np->rval->opcode==C_NOTEQUAL)
+  do
+  {
+    x2=np->rval->rval->constant; c2=np->rval->rval->optdata;
+    x1=np->rval->lval->constant; c1=np->rval->lval->optdata;
+    OPTING(negatingequal);
+    tp=newnode();
+    MAYBENEWNODE(tp);
+    tp->opcode=C_ISEQUAL;
+    tp->width=16;
+    tp->lval=np->rval->lval;
+    np->rval->lval=0;
+    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==SELECT &&
+     np->lval->opcode==SELECT &&
+     np->lval->rval->width==32 &&
+     np->rval->opcode==C_XOR &&
+     np->rval->lval->opcode==XOR &&
+     np->rval->lval->width==32 &&
+     np->rval->lval->rval->opcode==SELECT &&
+     np->rval->lval->rval->lval->width==32 &&
+     np->rval->lval->rval->rval->width==32 &&
+     (np->rval->rval->opcode==MESH || np->rval->rval->opcode==MESH32) &&
+     np->rval->rval->constant==2147483648LU)
+  do
+  {
+    if(!nodessame(np->lval->rval,np->rval->lval->rval->lval)) break;
+    if(!nodessame(np->rval->lval->rval->lval,np->rval->lval->rval->rval)) break;
+    x2=np->rval->lval->rval->rval->constant; c2=np->rval->lval->rval->rval->optdata;
+    x1=np->lval->lval->constant; c1=np->lval->lval->optdata;
+    OPTING(greaterthan32);
+    tp=newnode();
+    MAYBENEWNODE(tp);
+    tp->opcode=C_GREATER;
+    tp->width=32;
+    tp->lval=nodecopy(np->lval->lval);
+    MAYBENEWNODE(tp->rval);
+    tp->rval->opcode=C_XOR;
+    tp->rval->width=32;
+    tp->rval->lval=np->rval->lval->rval->rval;
+    np->rval->lval->rval->rval=0;
+    tp->rval->rval=np->lval->lval;
+    np->lval->lval=0;
+    nodefree(np->lval); nodefree(np->rval);
+    tempw=np->width; *np=*tp; np->width=tempw; free(tp);
+  } while(0);
+
+  checknodeactbits(np);
+  if(np->opcode==SELECT &&
+     np->lval->opcode==SELECT &&
+     np->lval->rval->width==32 &&
+     np->rval->opcode==C_XOR &&
+     (np->rval->lval->opcode==MESH || np->rval->lval->opcode==MESH32) &&
+     np->rval->lval->constant==2147483648LU &&
+     np->rval->rval->opcode==XOR &&
+     np->rval->rval->width==32 &&
+     np->rval->rval->rval->opcode==SELECT &&
+     np->rval->rval->rval->lval->width==32 &&
+     np->rval->rval->rval->rval->width==32)
+  do
+  {
+    if(!nodessame(np->lval->rval,np->rval->rval->rval->lval)) break;
+    if(!nodessame(np->rval->rval->rval->lval,np->rval->rval->rval->rval)) break;
+    x2=np->rval->rval->rval->rval->constant; c2=np->rval->rval->rval->rval->optdata;
+    x1=np->lval->lval->constant; c1=np->lval->lval->optdata;
+    OPTING(greaterthan32);
+    tp=newnode();
+    MAYBENEWNODE(tp);
+    tp->opcode=C_GREATER;
+    tp->width=32;
+    tp->lval=nodecopy(np->lval->lval);
+    MAYBENEWNODE(tp->rval);
+    tp->rval->opcode=C_XOR;
+    tp->rval->width=32;
+    tp->rval->lval=np->rval->rval->rval->rval;
+    np->rval->rval->rval->rval=0;
+    tp->rval->rval=np->lval->lval;
+    np->lval->lval=0;
+    nodefree(np->lval); nodefree(np->rval);
+    tempw=np->width; *np=*tp; np->width=tempw; free(tp);
+  } while(0);
+
+  checknodeactbits(np);
+  if(np->opcode==SELECT &&
+     np->lval->opcode==SELECT &&
+     np->lval->rval->width==16 &&
+     np->rval->opcode==C_XOR &&
+     np->rval->lval->opcode==XOR &&
+     np->rval->lval->width==16 &&
+     np->rval->lval->rval->opcode==SELECT &&
+     np->rval->lval->rval->lval->width==16 &&
+     np->rval->lval->rval->rval->width==16 &&
+     (np->rval->rval->opcode==MESH || np->rval->rval->opcode==MESH32) &&
+     np->rval->rval->constant==32768LU)
+  do
+  {
+    if(!nodessame(np->lval->rval,np->rval->lval->rval->lval)) break;
+    if(!nodessame(np->rval->lval->rval->lval,np->rval->lval->rval->rval)) break;
+    x2=np->rval->lval->rval->rval->constant; c2=np->rval->lval->rval->rval->optdata;
+    x1=np->lval->lval->constant; c1=np->lval->lval->optdata;
+    OPTING(greaterthan16);
+    tp=newnode();
+    MAYBENEWNODE(tp);
+    tp->opcode=C_GREATER;
+    tp->width=32;
+    tp->lval=nodecopy(np->lval->lval);
+    MAYBENEWNODE(tp->rval);
+    tp->rval->opcode=C_XOR;
+    tp->rval->width=32;
+    tp->rval->lval=np->rval->lval->rval->rval;
+    np->rval->lval->rval->rval=0;
+    tp->rval->rval=np->lval->lval;
+    np->lval->lval=0;
+    nodefree(np->lval); nodefree(np->rval);
+    tempw=np->width; *np=*tp; np->width=tempw; free(tp);
+  } while(0);
+
+  checknodeactbits(np);
+  if(np->opcode==SELECT &&
+     np->lval->opcode==SELECT &&
+     np->lval->rval->width==16 &&
+     np->rval->opcode==C_XOR &&
+     (np->rval->lval->opcode==MESH || np->rval->lval->opcode==MESH32) &&
+     np->rval->lval->constant==32768LU &&
+     np->rval->rval->opcode==XOR &&
+     np->rval->rval->width==16 &&
+     np->rval->rval->rval->opcode==SELECT &&
+     np->rval->rval->rval->lval->width==16 &&
+     np->rval->rval->rval->rval->width==16)
+  do
+  {
+    if(!nodessame(np->lval->rval,np->rval->rval->rval->lval)) break;
+    if(!nodessame(np->rval->rval->rval->lval,np->rval->rval->rval->rval)) break;
+    x2=np->rval->rval->rval->rval->constant; c2=np->rval->rval->rval->rval->optdata;
+    x1=np->lval->lval->constant; c1=np->lval->lval->optdata;
+    OPTING(greaterthan16);
+    tp=newnode();
+    MAYBENEWNODE(tp);
+    tp->opcode=C_GREATER;
+    tp->width=32;
+    tp->lval=nodecopy(np->lval->lval);
+    MAYBENEWNODE(tp->rval);
+    tp->rval->opcode=C_XOR;
+    tp->rval->width=32;
+    tp->rval->lval=np->rval->rval->rval->rval;
+    np->rval->rval->rval->rval=0;
+    tp->rval->rval=np->lval->lval;
+    np->lval->lval=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_AND &&
+     np->lval->opcode==C_XOR)
+  do
+  {
+    if(!nodessame(np->lval->rval,np->rval)) break;
+    x2=np->rval->constant; c2=np->rval->optdata;
+    x1=np->lval->lval->constant; c1=np->lval->lval->optdata;
+    OPTING(xoroutsideand);
+    tp=newnode();
+    MAYBENEWNODE(tp);
+    tp->opcode=C_XOR;
+    tp->width=32;
+    MAYBENEWNODE(tp->lval);
+    tp->lval->opcode=C_AND;
+    tp->lval->width=32;
+    tp->lval->lval=np->lval->lval;
+    np->lval->lval=0;
+    tp->lval->rval=nodecopy(np->rval);
+    tp->rval=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_AND &&
+     np->rval->opcode==C_XOR)
+  do
+  {
+    if(!nodessame(np->lval,np->rval->rval)) break;
+    x2=np->rval->rval->constant; c2=np->rval->rval->optdata;
+    x1=np->rval->lval->constant; c1=np->rval->lval->optdata;
+    OPTING(xoroutsideand);
+    tp=newnode();
+    MAYBENEWNODE(tp);
+    tp->opcode=C_XOR;
+    tp->width=32;
+    MAYBENEWNODE(tp->lval);
+    tp->lval->opcode=C_AND;
+    tp->lval->width=32;
+    tp->lval->lval=np->rval->lval;
+    np->rval->lval=0;
+    tp->lval->rval=nodecopy(np->rval->rval);
+    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_AND &&
+     np->lval->opcode==C_XOR)
+  do
+  {
+    if(!nodessame(np->lval->lval,np->rval)) break;
+    x2=np->rval->constant; c2=np->rval->optdata;
+    x1=np->lval->rval->constant; c1=np->lval->rval->optdata;
+    OPTING(xoroutsideand);
+    tp=newnode();
+    MAYBENEWNODE(tp);
+    tp->opcode=C_XOR;
+    tp->width=32;
+    MAYBENEWNODE(tp->lval);
+    tp->lval->opcode=C_AND;
+    tp->lval->width=32;
+    tp->lval->lval=np->lval->rval;
+    np->lval->rval=0;
+    tp->lval->rval=nodecopy(np->rval);
+    tp->rval=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_AND &&
+     np->rval->opcode==C_XOR)
+  do
+  {
+    if(!nodessame(np->lval,np->rval->lval)) break;
+    x2=np->rval->lval->constant; c2=np->rval->lval->optdata;
+    x1=np->rval->rval->constant; c1=np->rval->rval->optdata;
+    OPTING(xoroutsideand);
+    tp=newnode();
+    MAYBENEWNODE(tp);
+    tp->opcode=C_XOR;
+    tp->width=32;
+    MAYBENEWNODE(tp->lval);
+    tp->lval->opcode=C_AND;
+    tp->lval->width=32;
+    tp->lval->lval=np->rval->rval;
+    np->rval->rval=0;
+    tp->lval->rval=nodecopy(np->rval->lval);
+    tp->rval=np->rval->lval;
+    np->rval->lval=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_XOR &&
+     (np->rval->opcode==MESH || np->rval->opcode==MESH32) &&
+     np->rval->constant==1LU)
+  do
+  {
+    x1=np->lval->constant; c1=np->lval->optdata;
+    x=x1; c=c1; if(!(c==1)) break;
+    OPTING(booleannot);
+    tp=newnode();
+    MAYBENEWNODE(tp);
+    tp->opcode=C_LOGICALNOT;
+    tp->width=16;
+    tp->rval=np->lval;
+    np->lval=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_MINUS &&
+     (np->lval->opcode==MESH || np->lval->opcode==MESH32) &&
+     np->lval->constant==2LU &&
+     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_PLUS;
+    tp->width=32;
+    tp->lval=np->rval->rval;
+    np->rval->rval=0;
+    MAYBENEWNODE(tp->rval);
+    tp->rval->opcode=MESH32;
+    tp->rval->width=32;
+    tp->rval->constant=(1LU);
+    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;
+}