Mercurial > repo
view interps/c-intercal/oilout-m.c @ 11686:10d612def8ee draft
<b_jonas> perl -e for $e ("i","u"){ $f="bin/date$e"; open my$i,"<",$f or die "error open $f r"; local$/; $s=<$i> or die; $s=~s/"\\+%Y/\\${d:+-d "\\$d"} $&/ or die; open $o,">",$f or die "error open $f w: $!"; print $o $s or die; close $o or die; print "OK $f\\n" }
author | HackEso <hackeso@esolangs.org> |
---|---|
date | Fri, 04 Jan 2019 21:29:08 +0000 |
parents | 859f9b4339e6 |
children |
line wrap: on
line source
/* Automatically generated output, edit source and recompile to change */ #include "ick.h" extern int optimize_pass1_e(node*); extern int optimize_pass1_d(node*); extern int optimize_pass1_c(node*); extern int optimize_pass1_b(node*); extern int optimize_pass1_a(node*); extern int optimize_pass1_9(node*); extern int optimize_pass1_8(node*); extern int optimize_pass1_7(node*); extern int optimize_pass1_6(node*); extern int optimize_pass1_5(node*); extern int optimize_pass1_4(node*); extern int optimize_pass1_3(node*); extern int optimize_pass1_2(node*); extern int optimize_pass1_1(node*); extern int optimize_pass1_0(node*); int optimize_pass1(node* np) { int opted=0; if(!np) return 0; if(np->lval) opted|=optimize_pass1(np->lval); if(np->rval) opted|=optimize_pass1(np->rval); opted|=optimize_pass1_e(np); opted|=optimize_pass1_d(np); opted|=optimize_pass1_c(np); opted|=optimize_pass1_b(np); opted|=optimize_pass1_a(np); opted|=optimize_pass1_9(np); opted|=optimize_pass1_8(np); opted|=optimize_pass1_7(np); opted|=optimize_pass1_6(np); opted|=optimize_pass1_5(np); opted|=optimize_pass1_4(np); opted|=optimize_pass1_3(np); opted|=optimize_pass1_2(np); opted|=optimize_pass1_1(np); opted|=optimize_pass1_0(np); return opted; }