diff options
author | Sébastien Dailly <sebastien@chimrod.com> | 2015-03-17 22:15:54 +0100 |
---|---|---|
committer | Sébastien Dailly <sebastien@chimrod.com> | 2015-03-19 10:55:57 +0100 |
commit | 476a5eca7679a2062fdf21d20b4150183f266e3b (patch) | |
tree | 792e46b78b5fc7080d735482280c2e56b90f52b1 /content/resources/js | |
parent | adefa3853855aac303ff6cab5b8a43564b584890 (diff) |
Article en homage à Terry Pratchet
Diffstat (limited to 'content/resources/js')
-rw-r--r-- | content/resources/js/bf.js | 288 |
1 files changed, 288 insertions, 0 deletions
diff --git a/content/resources/js/bf.js b/content/resources/js/bf.js new file mode 100644 index 0000000..d2047c9 --- /dev/null +++ b/content/resources/js/bf.js @@ -0,0 +1,288 @@ +// Generated by js_of_ocaml 2.5 +(function(I){"use strict";var +ac=254,ab=224,Y="+",Z=65535,aa=250,o=1024,X=57343,$=512,e=128,d="",C=" : file already exists",U=56320,V=240,W=2048,a=248,T="/",_="fd ";function +J(a,b,c){var +e=new +Array(c);for(var +d=0;d<c;d++)e[d]=a[b+d];return e}function +H(a,b,c){var +e=String.fromCharCode;if(b==0&&c<=4096&&c==a.length)return e.apply(null,a);var +f=d;for(;0<c;b+=o,c-=o)f+=e.apply(null,J(a,b,Math.min(c,o)));return f}function +ad(a){var +c=new +Array(a.l),e=a.c,d=e.length,b=0;for(;b<d;b++)c[b]=e.charCodeAt(b);for(d=a.l;b<d;b++)c[b]=0;a.c=c;a.t=4;return c}function +s(a,b,c,d,e){if(e==0)return 0;if(d==0&&(e>=c.l||c.t==2&&e>=c.c.length)){c.c=a.t==4?H(a.c,b,e):b==0&&a.c.length==e?a.c:a.c.substr(b,e);c.t=c.c.length==c.l?0:2}else +if(c.t==2&&d==c.c.length){c.c+=a.t==4?H(a.c,b,e):b==0&&a.c.length==e?a.c:a.c.substr(b,e);c.t=c.c.length==c.l?0:2}else{if(c.t!=4)ad(c);var +g=a.c,h=c.c;if(a.t==4)for(var +f=0;f<e;f++)h[d+f]=g[b+f];else{var +i=Math.min(e,g.length-b);for(var +f=0;f<i;f++)h[d+f]=g.charCodeAt(b+f);for(;f<e;f++)h[d+f]=0}}return 0}function +bl(a,b){var +e=a.length,d=new +Array(e+1),c=0;for(;c<e;c++)d[c]=a[c];d[c]=b;return d}function +l(c,b){if(c.fun)return l(c.fun,b);var +a=c.length,d=b.length,e=a-d;if(e==0)return c.apply(null,b);else +if(e<0)return l(c.apply(null,J(b,0,a)),J(b,a,d-a));else +return function(a){return l(c,bl(b,a))}}function +a_(a,b){if(b.repeat)return b.repeat(a);var +c=d,e=0;if(a==0)return c;for(;;){if(a&1)c+=b;a>>=1;if(a==0)return c;b+=b;e++;if(e==9)b.slice(0,1)}}function +t(a){if(a.t==2)a.c+=a_(a.l-a.c.length,"\0");else +a.c=H(a.c,0,a.c.length);a.t=0}function +ae(a){if(a.length<24){for(var +b=0;b<a.length;b++)if(a.charCodeAt(b)>127)return false;return true}else +return!/[^\x00-\x7f]/.test(a)}function +bh(a){for(var +l=d,f=d,i,h,j,b,c=0,k=a.length;c<k;c++){h=a.charCodeAt(c);if(h<e){for(var +g=c+1;g<k&&(h=a.charCodeAt(g))<e;g++);if(g-c>$){f.substr(0,1);l+=f;f=d;l+=a.slice(c,g)}else +f+=a.slice(c,g);if(g==k)break;c=g}b=1;if(++c<k&&((j=a.charCodeAt(c))&-64)==e){i=j+(h<<6);if(h<ab){b=i-12416;if(b<e)b=1}else{b=2;if(++c<k&&((j=a.charCodeAt(c))&-64)==e){i=j+(i<<6);if(h<V){b=i-925824;if(b<W||b>=55295&&b<57344)b=2}else{b=3;if(++c<k&&((j=a.charCodeAt(c))&-64)==e&&h<245){b=j-63447168+(i<<6);if(b<65536||b>1114111)b=3}}}}}if(b<4){c-=b;f+="\ufffd"}else +if(b>Z)f+=String.fromCharCode(55232+(b>>10),U+(b&1023));else +f+=String.fromCharCode(b);if(f.length>o){f.substr(0,1);l+=f;f=d}}return l+f}function +bg(a){switch(a.t){case +9:return a.c;default:t(a);case +0:if(ae(a.c)){a.t=9;return a.c}a.t=8;case +8:return bh(a.c)}}function +g(a,b,c){this.t=a;this.c=b;this.l=c}g.prototype={toString:function(){return bg(this)}};function +a6(a,b){throw[0,a,b]}function +c(a){return new +g(0,a,a.length)}function +ai(a,b){a6(a,c(b))}var +f=[0];function +u(a){ai(f[4],a)}function +m(a){if(a<0)u("String.create");return new +g(a?2:9,d,a)}function +a5(a){throw a}function +a7(){a5(f[6])}function +aS(a,b){if(b==0)a7();return a/b|0}function +aW(a,b){var +c=a[3]<<16,d=b[3]<<16;if(c>d)return 1;if(c<d)return-1;if(a[2]>b[2])return 1;if(a[2]<b[2])return-1;if(a[1]>b[1])return 1;if(a[1]<b[1])return-1;return 0}function +aX(a,b){if(a<b)return-1;if(a==b)return 0;return 1}function +ba(a,b){a.t&6&&t(a);b.t&6&&t(b);return a.c<b.c?-1:a.c>b.c?1:0}function +D(a,b,c){var +e=[];for(;;){if(!(c&&a===b))if(a +instanceof +g)if(b +instanceof +g){if(a!==b){var +d=ba(a,b);if(d!=0)return d}}else +return 1;else +if(a +instanceof +Array&&a[0]===(a[0]|0)){var +f=a[0];if(f===ac)f=0;if(f===aa){a=a[1];continue}else +if(b +instanceof +Array&&b[0]===(b[0]|0)){var +h=b[0];if(h===ac)h=0;if(h===aa){b=b[1];continue}else +if(f!=h)return f<h?-1:1;else +switch(f){case +248:var +d=aX(a[2],b[2]);if(d!=0)return d;break;case +251:u("equal: abstract value");case +255:var +d=aW(a,b);if(d!=0)return d;break;default:if(a.length!=b.length)return a.length<b.length?-1:1;if(a.length>1)e.push(a,b,1)}}else +return 1}else +if(b +instanceof +g||b +instanceof +Array&&b[0]===(b[0]|0))return-1;else +if(typeof +a!="number"&&a&&a.compare)return a.compare(b,c);else{if(a<b)return-1;if(a>b)return 1;if(a!=b){if(!c)return NaN;if(a==a)return 1;if(b==b)return-1}}if(e.length==0)return 0;var +i=e.pop();b=e.pop();a=e.pop();if(i+1<a.length)e.push(a,b,i+1);a=a[i];b=b[i]}}function +aT(a,b){return+(D(a,b,false)==0)}function +aV(a,b){return+(D(a,b,false)>=0)}function +bi(a){for(var +h=d,c=h,b,j,f=0,i=a.length;f<i;f++){b=a.charCodeAt(f);if(b<e){for(var +g=f+1;g<i&&(b=a.charCodeAt(g))<e;g++);if(g-f>$){c.substr(0,1);h+=c;c=d;h+=a.slice(f,g)}else +c+=a.slice(f,g);if(g==i)break;f=g}if(b<W){c+=String.fromCharCode(192|b>>6);c+=String.fromCharCode(e|b&63)}else +if(b<55296||b>=X)c+=String.fromCharCode(ab|b>>12,e|b>>6&63,e|b&63);else +if(b>=56319||f+1==i||(j=a.charCodeAt(f+1))<U||j>X)c+="\xef\xbf\xbd";else{f++;b=(b<<10)+j-56613888;c+=String.fromCharCode(V|b>>18,e|b>>12&63,e|b>>6&63,e|b&63)}if(c.length>o){c.substr(0,1);h+=c;c=d}}return h+c}function +F(a){var +b=9;if(!ae(a))b=8,a=bi(a);return new +g(b,a,a.length)}function +bm(a){var +d=a.length,c=new +Array(d);for(var +b=0;b<d;b++)c[b]=a[b];return c}function +G(a){return function(){return arguments.length>0?l(a,bm(arguments)):l(a,[undefined])}}function +aY(a,b){return+(D(a,b,false)<=0)}function +h(a){ai(f[2],a)}function +aZ(a){if(!a.opened)h("Cannot flush a closed channel");if(a.buffer==d)return 0;if(a.output)switch(a.output.length){case +2:a.output(a,a.buffer);break;default:a.output(a.buffer)}a.buffer=d;return 0}function +j(a){this.data=a}j.prototype={truncate:function(){this.data=m(0)}};function +n(a){return a.l}function +ah(a){a=a +instanceof +g?a.toString():a;h(a+": No such file or directory")}var +aR=T;function +v(a){a=a +instanceof +g?a.toString():a;if(a.charCodeAt(0)!=47)a=aR+a;var +e=a.split(T),b=[];for(var +c=0;c<e.length;c++)switch(e[c]){case"..":if(b.length>1)b.pop();break;case".":break;case"":if(b.length==0)b.push(d);break;default:b.push(e[c]);break}b.orig=a;return b}function +k(){this.content={}}k.prototype={exists:function(a){return this.content[a]?1:0},mk:function(a,b){this.content[a]=b},get:function(a){return this.content[a]},list:function(){var +a=[];for(var +b +in +this.content)a.push(b);return a},remove:function(a){delete +this.content[a]}};var +x=new +k();x.mk(d,new +k());function +E(a){var +b=x;for(var +c=0;c<a.length;c++){if(!(b.exists&&b.exists(a[c])))ah(a.orig);b=b.get(a[c])}return b}function +bf(a){var +c=v(a),b=E(c);return b +instanceof +k?1:0}function +bc(a){return new +g(4,a,a.length)}function +bo(a){if(a.t!=4)ad(a);return a.c}function +aU(a,b){var +f=v(a),d=x;for(var +i=0;i<f.length-1;i++){var +e=f[i];if(!d.exists(e))d.mk(e,new +k());d=d.get(e);if(!(d +instanceof +k))h(f.orig+C)}var +e=f[f.length-1];if(d.exists(e))h(f.orig+C);if(b +instanceof +k)d.mk(e,b);else +if(b +instanceof +j)d.mk(e,b);else +if(b +instanceof +g)d.mk(e,new +j(b));else +if(b +instanceof +Array)d.mk(e,new +j(bc(b)));else +if(b.toString)d.mk(e,new +j(c(b.toString())));else +u("caml_fs_register");return 0}function +be(a){var +b=x,d=v(a),e,f;for(var +c=0;c<d.length;c++){if(b.auto){e=b.auto;f=c}if(!(b.exists&&b.exists(d[c])))return e?e(d,f):0;b=b.get(d[c])}return 1}function +q(a,b,c){if(f.fds===undefined)f.fds=new +Array();c=c?c:{};var +d={};d.file=b;d.offset=c.append?n(b.data):0;d.flags=c;f.fds[a]=d;f.fd_last_idx=a;return a}function +bp(a,b,c){var +d={};while(b){switch(b[1]){case +0:d.rdonly=1;break;case +1:d.wronly=1;break;case +2:d.append=1;break;case +3:d.create=1;break;case +4:d.truncate=1;break;case +5:d.excl=1;break;case +6:d.binary=1;break;case +7:d.text=1;break;case +8:d.nonblock=1;break}b=b[2]}var +g=a.toString(),j=v(a);if(d.rdonly&&d.wronly)h(g+" : flags Open_rdonly and Open_wronly are not compatible");if(d.text&&d.binary)h(g+" : flags Open_text and Open_binary are not compatible");if(be(a)){if(bf(a))h(g+" : is a directory");if(d.create&&d.excl)h(g+C);var +i=f.fd_last_idx?f.fd_last_idx:0,e=E(j);if(d.truncate)e.truncate();return q(i+1,e,d)}else +if(d.create){var +i=f.fd_last_idx?f.fd_last_idx:0;aU(a,m(0));var +e=E(j);return q(i+1,e,d)}else +ah(a)}q(0,new +j(m(0)));q(1,new +j(m(0)));q(2,new +j(m(0)));function +a0(a){var +b=f.fds[a];if(b.flags.wronly)h(_+a+" is writeonly");return{file:b.file,offset:b.offset,fd:a,opened:true}}function +bj(a){if(a.charCodeAt(a.length-1)==10)a=a.substr(0,a.length-1);var +b=I.console;b&&b.error&&b.error(a)}function +bk(a){if(a.charCodeAt(a.length-1)==10)a=a.substr(0,a.length-1);var +b=I.console;b&&b.log&&b.log(a)}var +w=new +Array();function +a9(a,b){var +h=c(b),d=n(h),g=n(a.file.data),f=a.offset;if(f+d>=g){var +e=m(f+d);s(a.file.data,0,e,0,g);s(h,0,e,f,d);a.file.data=e}a.offset+=d;return 0}function +af(a){var +b;switch(a){case +1:b=bk;break;case +2:b=bj;break;default:b=a9}var +e=f.fds[a];if(e.flags.rdonly)h(_+a+" is readonly");var +c={file:e.file,offset:e.offset,fd:a,opened:true,buffer:d,output:b};w[c.fd]=c;return c}function +a1(){var +a=0;for(var +b +in +w)if(w[b].opened)a=[0,w[b],a];return a}if(!Math.imul)Math.imul=function(a,b){return((a>>16)*b<<16)+(a&Z)*b|0};var +ag=Math.imul;function +a3(a){return a +instanceof +Array?a[0]:a +instanceof +g?252:1e3}function +b(a,b){f[a+1]=b}var +a2={};function +aQ(a){if((a.t&6)!=0)t(a);return a.c}function +a8(a,b){a2[aQ(a)]=b;return 0}var +a4=0;function +p(a){a[2]=a4++;return a}function +a$(){u("index out of bounds")}function +bd(a,b){switch(a.t&6){default:if(b>=a.c.length)return 0;case +0:return a.c.charCodeAt(b);case +4:return a.c[b]}}function +bb(a,b){if(b>>>0>=a.l)a$();return bd(a,b)}function +aO(a,b){return a.length==1?a(b):l(a,[b])}function +aP(a,b,c){return a.length==2?a(b,c):l(a,[b,c])}b(11,[a,c("Undefined_recursive_module"),-12]);b(10,[a,c("Assert_failure"),-11]);b(9,[a,c("Sys_blocked_io"),-10]);b(8,[a,c("Stack_overflow"),-9]);b(7,[a,c("Match_failure"),-8]);b(6,[a,c("Not_found"),-7]);b(5,[a,c("Division_by_zero"),-6]);b(4,[a,c("End_of_file"),-5]);b(3,[a,c("Invalid_argument"),-4]);b(2,[a,c("Failure"),-3]);b(1,[a,c("Sys_error"),-2]);b(0,[a,c("Out_of_memory"),-1]);p([a,c("Pervasives.Exit"),0]);var +al=c("Array.Bottom"),am=c("Sys.Break"),an=c("CamlinternalFormat.Type_mismatch"),aq=c("Js.Error"),at=[0,0,0],as=[0,4,0],au=[0,0,0,0],aE=c("Ook. Ook? "),aF=c("Ook? Ook. "),aG=c("Ook. Ook. "),aH=c("Ook! Ook! "),aI=c("Ook! Ook. "),aJ=c("Ook. Ook! "),aK=c("Ook! Ook? "),aL=c("Ook? Ook! "),aw=c(">"),ax=c("<"),ay=c(Y),az=c("-"),aA=c("."),aB=c(Y),aC=c("["),aD=c("]"),aM=c(d);function +r(a){return 0<=a?a:-a|0}var +K=2147483647,aj=-2147483648;function +i(a,b){if(a){var +c=a[1];return[0,c,i(a[2],b)]}return b}a0(0);af(1);af(2);p([a,al,0]);function +L(a,b){if(b){var +c=b[2],d=aO(a,b[1]);return[0,d,L(a,c)]}return 0}p([a,am,0]);p([a,an,0]);var +M=[0,0];function +N(a){M[1]=[0,a,M[1]];return 0}var +O=I,ap=O.Array,P=p([a,aq,0]),y=[0,P,{}],ao=a3(y)===a?y:y[0+1];a8(c("jsError"),ao);N(function(a){return a[1]===P?[0,F(a[2].toString())]:0});N(function(a){return a +instanceof +ap?0:[0,F(a.toString())]});function +Q(a,b){var +d=0,c=a;for(;;){if(0===c)return d;var +d=[0,b,d],c=c-1|0;continue}}function +z(a,b,c){var +e=b,d=0,f=n(c);for(;;){if(d===f)return e;var +e=aP(a,e,bb(c,d)),d=d+1|0;continue}}function +R(a,b,c){var +d=aS(c,a),e=c-ag(d,a)|0,f=(a/2|0)<e?[0,d+1|0,c-ag(d+1|0,a)|0]:[0,d,e],g=f[2],h=f[1],i=c-b|0,j=r(g);return((j+3|0)+h|0)<r(i)?[0,h,g]:[0,0,i]}function +ar(a,b){var +c=a[2],e=aV(c,b)?c:b,d=a[1],f=aY(d,b)?d:b;return[0,f,e]}function +A(a){var +b=a[1],c=0<b?2:3;return Q(r(b),c)}function +av(a){switch(a){case +0:return aw;case +1:return ax;case +2:return ay;case +3:return az;case +4:return aA;case +5:return aB;case +6:return aC;default:return aD}}function +S(a){switch(a){case +0:return aE;case +1:return aF;case +2:return aG;case +3:return aH;case +4:return aI;case +5:return aJ;case +6:return aK;default:return aL}}function +B(a,b){var +o=F(b),t=z(ar,[0,K,aj],o),k=[0,Math.sqrt(t[1])|0,K],c=1,C=t[2];for(;;){var +l=k[1];if(C<c){var +w=z(function(a,b){var +c=R(l,a[1],b),d=c[1],e=0!==d?1:0,g=c[2],f=e?at:e,h=i(f,i(A([0,g]),as)),j=i(a[3],h),k=i(f,A([0,d]));return[0,b,i(a[2],k),j]},au,o),x=w[2],g=0,f=x,G=0;for(;;){if(f){var +B=aT(f[1],G)?g+1|0:g,g=B,f=f[2];continue}var +H=[0,3,[0,7,w[3]]],I=i([0,6,x],i(Q(g,1),H)),e=aM,d=L(a,i(A([0,l]),I));for(;;){if(d){var +q=d[1],h=n(e),p=n(q),j=m(h+p|0),y=d[2];s(e,0,j,0,h);s(q,0,j,h,p);var +e=j,d=y;continue}return e}}}var +u=k[2],D=[0,0,c],v=z(function(c){return function(a,b){var +d=R(c,a[1],b),e=d[1],f=0===e?0:3,g=r(d[2]);return[0,b,((a[2]+e|0)+g|0)+f|0]}}(c),D,o)[2],E=v<u?[0,c,v]:[0,l,u],k=E,c=c+1|0;continue}}var +aN=G(function(a){return B(av,a)}),bn=G(function(a){return B(S,a)});O.converter={"to_bf":aN,"to_ook":G(function(a){return B(S,a)})};function +ak(a){var +b=a;for(;;){if(b){var +c=b[2],d=b[1];try{aZ(d)}catch(f){}var +b=c;continue}return 0}}ak(a1(0));return}(function(){return this}())); |