// This program was compiled from OCaml by js_of_ocaml 1.0
function caml_raise_with_arg (tag, arg) { throw [0, tag, arg]; }
function caml_raise_with_string (tag, msg) {
caml_raise_with_arg (tag, new MlWrappedString (msg));
}
function caml_invalid_argument (msg) {
caml_raise_with_string(caml_global_data[4], msg);
}
function caml_array_bound_error () {
caml_invalid_argument("index out of bounds");
}
function caml_str_repeat(n, s) {
if (!n) { return ""; }
if (n & 1) { return caml_str_repeat(n - 1, s) + s; }
var r = caml_str_repeat(n >> 1, s);
return r + r;
}
function MlString(param) {
if (param != null) {
this.bytes = this.fullBytes = param;
this.last = this.len = param.length;
}
}
MlString.prototype = {
string:null,
bytes:null,
fullBytes:null,
array:null,
len:null,
last:0,
toJsString:function() {
return this.string = decodeURIComponent (escape(this.getFullBytes()));
},
toBytes:function() {
if (this.string != null)
var b = unescape (encodeURIComponent (this.string));
else {
var b = "", a = this.array, l = a.length;
for (var i = 0; i < l; i ++) b += String.fromCharCode (a[i]);
}
this.bytes = this.fullBytes = b;
this.last = this.len = b.length;
return b;
},
getBytes:function() {
var b = this.bytes;
if (b == null) b = this.toBytes();
return b;
},
getFullBytes:function() {
var b = this.fullBytes;
if (b !== null) return b;
b = this.bytes;
if (b == null) b = this.toBytes ();
if (this.last < this.len) {
this.bytes = (b += caml_str_repeat(this.len - this.last, '\0'));
this.last = this.len;
}
this.fullBytes = b;
return b;
},
toArray:function() {
var b = this.bytes;
if (b == null) b = this.toBytes ();
var a = [], l = this.last;
for (var i = 0; i < l; i++) a[i] = b.charCodeAt(i);
for (l = this.len; i < l; i++) a[i] = 0;
this.string = this.bytes = this.fullBytes = null;
this.last = this.len;
this.array = a;
return a;
},
getArray:function() {
var a = this.array;
if (!a) a = this.toArray();
return a;
},
getLen:function() {
var len = this.len;
if (len !== null) return len;
this.toBytes();
return this.len;
},
toString:function() { var s = this.string; return s?s:this.toJsString(); },
valueOf:function() { var s = this.string; return s?s:this.toJsString(); },
blitToArray:function(i1, a2, i2, l) {
var a1 = this.array;
if (a1)
for (var i = 0; i < l; i++) a2 [i2 + i] = a1 [i1 + i];
else {
var b = this.bytes;
if (b == null) b = this.toBytes();
var l1 = this.last - i1;
if (l <= l1)
for (var i = 0; i < l; i++) a2 [i2 + i] = b.charCodeAt(i1 + i);
else {
for (var i = 0; i < l1; i++) a2 [i2 + i] = b.charCodeAt(i1 + i);
for (; i < l; i++) a2 [i2 + i] = 0;
}
}
},
get:function (i) {
var a = this.array;
if (a) return a[i];
var b = this.bytes;
if (b == null) b = this.toBytes();
return (i<this.last)?b.charCodeAt(i):0;
},
safeGet:function (i) {
if (!this.len) this.toBytes();
if ((i < 0) || (i >= this.len)) caml_array_bound_error ();
return this.get(i);
},
set:function (i, c) {
var a = this.array;
if (!a) {
if (this.last == i) {
this.bytes += String.fromCharCode (c & 0xff);
this.last ++;
return 0;
}
a = this.toArray();
} else if (this.bytes != null) {
this.bytes = this.fullBytes = this.string = null;
}
a[i] = c & 0xff;
return 0;
},
safeSet:function (i, c) {
if (this.len == null) this.toBytes ();
if ((i < 0) || (i >= this.len)) caml_array_bound_error ();
this.set(i, c);
},
fill:function (ofs, len, c) {
if (ofs >= this.last && this.last && c == 0) return;
var a = this.array;
if (!a) a = this.toArray();
else if (this.bytes != null) {
this.bytes = this.fullBytes = this.string = null;
}
var l = ofs + len;
for (var i = ofs; i < l; i++) a[i] = c;
},
compare:function (s2) {
if (this.string != null && s2.string != null) {
if (this.string < s2.string) return -1;
if (this.string > s2.string) return 1;
return 0;
}
var b1 = this.getFullBytes ();
var b2 = s2.getFullBytes ();
if (b1 < b2) return -1;
if (b1 > b2) return 1;
return 0;
},
equal:function (s2) {
if (this.string != null && s2.string != null)
return this.string == s2.string;
return this.getFullBytes () == s2.getFullBytes ();
},
lessThan:function (s2) {
if (this.string != null && s2.string != null)
return this.string < s2.string;
return this.getFullBytes () < s2.getFullBytes ();
},
lessEqual:function (s2) {
if (this.string != null && s2.string != null)
return this.string <= s2.string;
return this.getFullBytes () <= s2.getFullBytes ();
}
}
function MlWrappedString (s) { this.string = s; }
MlWrappedString.prototype = new MlString();
function MlMakeString (l) { this.bytes = ""; this.len = l; }
MlMakeString.prototype = new MlString ();
function caml_array_get (array, index) {
if ((index < 0) || (index >= array.length - 1)) caml_array_bound_error();
return array[index+1];
}
function caml_array_set (array, index, newval) {
if ((index < 0) || (index >= array.length - 1)) caml_array_bound_error();
array[index+1]=newval; return 0;
}
function caml_blit_string(s1, i1, s2, i2, len) {
if (len === 0) return;
if (i2 === s2.last && s2.bytes != null) {
var b = s1.bytes;
if (b == null) b = s1.toBytes ();
if (i1 > 0 || s1.last > len) b = b.slice(i1, i1 + len);
s2.bytes += b;
s2.last += b.length;
return;
}
var a = s2.array;
if (!a) a = s2.toArray(); else { s2.bytes = s2.string = null; }
s1.blitToArray (i1, a, i2, len);
}
function caml_call_gen(f, args) {
if(f.fun)
return caml_call_gen(f.fun, args);
var n = f.length;
var d = n - args.length;
if (d == 0)
return f.apply(null, args);
else if (d < 0)
return caml_call_gen(f.apply(null, args.slice(0,n)), args.slice(n));
else
return function (x){ return caml_call_gen(f, args.concat([x])); };
}
function caml_classify_float (x) {
if (isFinite (x)) {
if (Math.abs(x) >= 2.2250738585072014e-308) return 0;
if (x != 0) return 1;
return 2;
}
return isNaN(x)?4:3;
}
function caml_create_string(len) {
if (len < 0) caml_invalid_argument("String.create");
return new MlMakeString(len);
}
function caml_fill_string(s, i, l, c) { s.fill (i, l, c); }
function caml_parse_format (fmt) {
fmt = fmt.toString ();
var len = fmt.length;
if (len > 31) caml_invalid_argument("format_int: format too long");
var f =
{ justify:'+', signstyle:'-', filler:' ', alternate:false,
base:0, signedconv:false, width:0, uppercase:false,
sign:1, prec:-1, conv:'f' };
for (var i = 0; i < len; i++) {
var c = fmt.charAt(i);
switch (c) {
case '-':
f.justify = '-'; break;
case '+': case ' ':
f.signstyle = c; break;
case '0':
f.filler = '0'; break;
case '#':
f.alternate = true; break;
case '1': case '2': case '3': case '4': case '5':
case '6': case '7': case '8': case '9':
f.width = 0;
while (c=fmt.charCodeAt(i) - 48, c >= 0 && c <= 9) {
f.width = f.width * 10 + c; i++
}
i--;
break;
case '.':
f.prec = 0;
i++;
while (c=fmt.charCodeAt(i) - 48, c >= 0 && c <= 9) {
f.prec = f.prec * 10 + c; i++
}
i--;
case 'd': case 'i':
f.signedconv = true; /* fallthrough */
case 'u':
f.base = 10; break;
case 'x':
f.base = 16; break;
case 'X':
f.base = 16; f.uppercase = true; break;
case 'o':
f.base = 8; break;
case 'e': case 'f': case 'g':
f.signedconv = true; f.conv = c; break;
case 'E': case 'F': case 'G':
f.signedconv = true; f.uppercase = true;
f.conv = c.toLowerCase (); break;
}
}
return f;
}
function caml_finish_formatting(f, rawbuffer) {
if (f.uppercase) rawbuffer = rawbuffer.toUpperCase();
var len = rawbuffer.length;
if (f.signedconv && (f.sign < 0 || f.signstyle != '-')) len++;
if (f.alternate) {
if (f.base == 8) len += 1;
if (f.base == 16) len += 2;
}
var buffer = "";
if (f.justify == '+' && f.filler == ' ')
for (var i = len; i < f.width; i++) buffer += ' ';
if (f.signedconv) {
if (f.sign < 0) buffer += '-';
else if (f.signstyle != '-') buffer += f.signstyle;
}
if (f.alternate && f.base == 8) buffer += '0';
if (f.alternate && f.base == 16) buffer += "0x";
if (f.justify == '+' && f.filler == '0')
for (var i = len; i < f.width; i++) buffer += '0';
buffer += rawbuffer;
if (f.justify == '-')
for (var i = len; i < f.width; i++) buffer += ' ';
return new MlWrappedString (buffer);
}
function caml_format_float (fmt, x) {
var s, f = caml_parse_format(fmt);
var prec = (f.prec < 0)?6:f.prec;
if (x < 0) { f.sign = -1; x = -x; }
if (isNaN(x)) { s = "nan"; f.filler = ' '; }
else if (!isFinite(x)) { s = "inf"; f.filler = ' '; }
else
switch (f.conv) {
case 'e':
var s = x.toExponential(prec);
var i = s.length;
if (s.charAt(i - 3) == 'e')
s = s.slice (0, i - 1) + '0' + s.slice (i - 1);
break;
case 'f':
s = x.toFixed(prec); break;
case 'g':
prec = prec?prec:1;
s = x.toExponential(prec - 1);
var j = s.indexOf('e');
var exp = +s.slice(j + 1);
if (exp < -4 || x.toFixed(0).length > prec) {
var i = j - 1; while (s.charAt(i) == '0') i--;
if (s.charAt(i) == '.') i--;
s = s.slice(0, i + 1) + s.slice(j);
i = s.length;
if (s.charAt(i - 3) == 'e')
s = s.slice (0, i - 1) + '0' + s.slice (i - 1);
break;
} else {
var p = prec;
if (exp < 0) { p -= exp + 1; s = x.toFixed(p); }
else while (s = x.toFixed(p), s.length > prec + 1) p--;
if (p) {
var i = s.length - 1; while (s.charAt(i) == '0') i--;
if (s.charAt(i) == '.') i--;
s = s.slice(0, i + 1);
}
}
break;
}
return caml_finish_formatting(f, s);
}
function caml_format_int(fmt, i) {
if (fmt.toString() == "%d") return new MlWrappedString(""+i);
var f = caml_parse_format(fmt);
if (i < 0) { if (f.signedconv) { f.sign = -1; i = -i; } else i >>>= 0; }
var s = i.toString(f.base);
if (f.prec >= 0) {
f.filler = ' ';
var n = f.prec - s.length;
if (n > 0) s = caml_str_repeat (n, '0') + s;
}
return caml_finish_formatting(f, s);
}
function caml_get_exception_backtrace () {
caml_invalid_argument
("Primitive 'caml_get_exception_backtrace' not implemented");
}
function caml_int64_compare(x,y) {
var x3 = x[3] << 16;
var y3 = y[3] << 16;
if (x3 > y3) return 1;
if (x3 < y3) return -1;
if (x[2] > y[2]) return 1;
if (x[2] < y[2]) return -1;
if (x[1] > y[1]) return 1;
if (x[1] < y[1]) return -1;
return 0;
}
function caml_int_compare (a, b) {
if (a < b) return (-1); if (a == b) return 0; return 1;
}
function caml_compare_val (a, b, total) {
var stack = [];
for(;;) {
if (!(total && a === b)) {
if (a instanceof MlString) {
if (b instanceof MlString) {
if (a != b) {
var x = a.compare(b);
if (x != 0) return x;
}
} else
return 1;
} else if (a instanceof Array && a[0] === (a[0]|0)) {
var ta = a[0];
if (ta === 250) {
a = a[1];
continue;
} else if (b instanceof Array && b[0] === (b[0]|0)) {
var tb = b[0];
if (tb === 250) {
b = b[1];
continue;
} else if (ta != tb) {
return (ta < tb)?-1:1;
} else {
switch (ta) {
case 248: {
var x = caml_int_compare(a[2], b[2]);
if (x != 0) return x;
break;
}
case 255: {
var x = caml_int64_compare(a, b);
if (x != 0) return x;
break;
}
default:
if (a.length != b.length) return (a.length < b.length)?-1:1;
if (a.length > 1) stack.push(a, b, 1);
}
}
} else
return 1;
} else if (b instanceof MlString ||
(b instanceof Array && b[0] === (b[0]|0))) {
return -1;
} else {
if (a < b) return -1;
if (a > b) return 1;
if (total && a != b) {
if (a == a) return 1;
if (b == b) return -1;
}
}
}
if (stack.length == 0) return 0;
var i = stack.pop();
b = stack.pop();
a = stack.pop();
if (i + 1 < a.length) stack.push(a, b, i + 1);
a = a[i];
b = b[i];
}
}
function caml_compare (a, b) { return caml_compare_val (a, b, true); }
function caml_greaterequal (x, y) { return +(caml_compare(x,y,false) >= 0); }
function caml_int64_is_negative(x) {
return (x[3] << 16) < 0;
}
function caml_int64_neg (x) {
var y1 = - x[1];
var y2 = - x[2] + (y1 >> 24);
var y3 = - x[3] + (y2 >> 24);
return [255, y1 & 0xffffff, y2 & 0xffffff, y3 & 0xffff];
}
function caml_int64_of_int32 (x) {
return [255, x & 0xffffff, (x >> 24) & 0xffffff, (x >> 31) & 0xffff]
}
function caml_int64_ucompare(x,y) {
if (x[3] > y[3]) return 1;
if (x[3] < y[3]) return -1;
if (x[2] > y[2]) return 1;
if (x[2] < y[2]) return -1;
if (x[1] > y[1]) return 1;
if (x[1] < y[1]) return -1;
return 0;
}
function caml_int64_lsl1 (x) {
x[3] = (x[3] << 1) | (x[2] >> 23);
x[2] = ((x[2] << 1) | (x[1] >> 23)) & 0xffffff;
x[1] = (x[1] << 1) & 0xffffff;
}
function caml_int64_lsr1 (x) {
x[1] = ((x[1] >>> 1) | (x[2] << 23)) & 0xffffff;
x[2] = ((x[2] >>> 1) | (x[3] << 23)) & 0xffffff;
x[3] = x[3] >>> 1;
}
function caml_int64_sub (x, y) {
var z1 = x[1] - y[1];
var z2 = x[2] - y[2] + (z1 >> 24);
var z3 = x[3] - y[3] + (z2 >> 24);
return [255, z1 & 0xffffff, z2 & 0xffffff, z3 & 0xffff];
}
function caml_int64_udivmod (x, y) {
var offset = 0;
var modulus = x.slice ();
var divisor = y.slice ();
var quotient = [255, 0, 0, 0];
while (caml_int64_ucompare (modulus, divisor) > 0) {
offset++;
caml_int64_lsl1 (divisor);
}
while (offset >= 0) {
offset --;
caml_int64_lsl1 (quotient);
if (caml_int64_ucompare (modulus, divisor) >= 0) {
quotient[1] ++;
modulus = caml_int64_sub (modulus, divisor);
}
caml_int64_lsr1 (divisor);
}
return [0,quotient, modulus];
}
function caml_int64_to_int32 (x) {
return x[1] | (x[2] << 24);
}
function caml_int64_is_zero(x) {
return (x[3]|x[2]|x[1]) == 0;
}
function caml_int64_format (fmt, x) {
var f = caml_parse_format(fmt);
if (f.signedconv && caml_int64_is_negative(x)) {
f.sign = -1; x = caml_int64_neg(x);
}
var buffer = "";
var wbase = caml_int64_of_int32(f.base);
var cvtbl = "0123456789abcdef";
do {
var p = caml_int64_udivmod(x, wbase);
x = p[1];
buffer = cvtbl.charAt(caml_int64_to_int32(p[2])) + buffer;
} while (! caml_int64_is_zero(x));
if (f.prec >= 0) {
f.filler = ' ';
var n = f.prec - buffer.length;
if (n > 0) buffer = caml_str_repeat (n, '0') + buffer;
}
return caml_finish_formatting(f, buffer);
}
function caml_parse_sign_and_base (s) {
var i = 0, base = 10, sign = s.get(0) == 45?(i++,-1):1;
if (s.get(i) == 48)
switch (s.get(i + 1)) {
case 120: case 88: base = 16; i += 2; break;
case 111: case 79: base = 8; i += 2; break;
case 98: case 66: base = 2; i += 2; break;
}
return [i, sign, base];
}
function caml_parse_digit(c) {
if (c >= 48 && c <= 57) return c - 48;
if (c >= 65 && c <= 90) return c - 55;
if (c >= 97 && c <= 122) return c - 87;
return -1;
}
var caml_global_data = [0];
function caml_failwith (msg) {
caml_raise_with_string(caml_global_data[3], msg);
}
function caml_int_of_string (s) {
var r = caml_parse_sign_and_base (s);
var i = r[0], sign = r[1], base = r[2];
var threshold = -1 >>> 0;
var c = s.get(i);
var d = caml_parse_digit(c);
if (d < 0 || d >= base) caml_failwith("int_of_string");
var res = d;
for (;;) {
i++;
c = s.get(i);
if (c == 95) continue;
d = caml_parse_digit(c);
if (d < 0 || d >= base) break;
res = base * res + d;
if (res > threshold) caml_failwith("int_of_string");
}
if (i != s.getLen()) caml_failwith("int_of_string");
res = sign * res;
if ((res | 0) != res) caml_failwith("int_of_string");
return res;
}
function caml_is_printable(c) { return +(c > 31 && c < 127); }
var caml_js_regexps = { amp:/&/g, lt:/</g, quot:/\"/g, all:/[&<\"]/ };
function caml_js_html_escape (s) {
if (!caml_js_regexps.all.test(s)) return s;
return s.replace(caml_js_regexps.amp, "&")
.replace(caml_js_regexps.lt, "<")
.replace(caml_js_regexps.quot, """);
}
function caml_js_on_ie () {
var ua = window.navigator?window.navigator.userAgent:"";
return ua.indexOf("MSIE") != -1 && ua.indexOf("Opera") != 0;
}
function caml_js_wrap_callback(f) {
var toArray = Array.prototype.slice;
return function () {
var args = (arguments.length > 0)?toArray.call (arguments):[undefined];
return caml_call_gen(f, args);
}
}
function caml_make_vect (len, init) {
var b = [0]; for (var i = 1; i <= len; i++) b[i] = init; return b;
}
function caml_ml_flush () { return 0; }
function caml_ml_open_descriptor_out () { return 0; }
function caml_ml_out_channels_list () { return 0; }
function caml_ml_output () { return 0; }
function caml_mul(x,y) {
return ((((x >> 16) * y) << 16) + (x & 0xffff) * y)|0;
}
function caml_notequal (x, y) { return +(caml_compare_val(x,y,false) != 0); }
function caml_obj_is_block (x) { return +(x instanceof Array); }
function caml_obj_tag (x) { return (x instanceof Array)?x[0]:1000; }
function caml_register_global (n, v) { caml_global_data[n + 1] = v; }
var caml_named_values = {};
function caml_register_named_value(nm,v) {
caml_named_values[nm] = v; return 0;
}
function caml_string_equal(s1, s2) {
var b1 = s1.fullBytes;
var b2 = s2.fullBytes;
if (b1 != null && b2 != null) return (b1 == b2)?1:0;
return (s1.getFullBytes () == s2.getFullBytes ())?1:0;
}
function caml_string_notequal(s1, s2) { return 1-caml_string_equal(s1, s2); }
function caml_sys_get_config () {
return [0, new MlWrappedString("Unix"), 32];
}
function caml_update_dummy (x, y) {
if( typeof y==="function" ) { x.fun = y; return 0; }
if( y.fun ) { x.fun = y.fun; return 0; }
var i = y.length; while (i--) x[i] = y[i]; return 0;
}
(function()
{function _iy_(_nL_,_nM_,_nN_,_nO_,_nP_,_nQ_,_nR_)
{return _nL_.length==6
?_nL_(_nM_,_nN_,_nO_,_nP_,_nQ_,_nR_)
:caml_call_gen(_nL_,[_nM_,_nN_,_nO_,_nP_,_nQ_,_nR_]);}
function _es_(_nH_,_nI_,_nJ_,_nK_)
{return _nH_.length==3
?_nH_(_nI_,_nJ_,_nK_)
:caml_call_gen(_nH_,[_nI_,_nJ_,_nK_]);}
function _eX_(_nE_,_nF_,_nG_)
{return _nE_.length==2?_nE_(_nF_,_nG_):caml_call_gen(_nE_,[_nF_,_nG_]);}
function _cz_(_nC_,_nD_)
{return _nC_.length==1?_nC_(_nD_):caml_call_gen(_nC_,[_nD_]);}
var
_a_=[0,new MlString("Failure")],
_b_=[0,new MlString("Invalid_argument")],
_c_=[0,new MlString("Assert_failure")],
_d_=new MlString("File \"%s\", line %d, characters %d-%d: %s");
caml_register_global(5,[0,new MlString("Division_by_zero")]);
caml_register_global(3,_b_);
caml_register_global(2,_a_);
var
_b2_=[0,new MlString("Out_of_memory")],
_b1_=[0,new MlString("Match_failure")],
_b0_=[0,new MlString("Stack_overflow")],
_bZ_=[0,new MlString("Undefined_recursive_module")],
_bY_=new MlString("%.12g"),
_bX_=new MlString("."),
_bW_=new MlString("%d"),
_bV_=new MlString("true"),
_bU_=new MlString("false"),
_bT_=new MlString("Pervasives.do_at_exit"),
_bS_=new MlString("\\b"),
_bR_=new MlString("\\t"),
_bQ_=new MlString("\\n"),
_bP_=new MlString("\\r"),
_bO_=new MlString("\\\\"),
_bN_=new MlString("\\'"),
_bM_=new MlString(""),
_bL_=new MlString("String.blit"),
_bK_=new MlString("String.sub"),
_bJ_=new MlString("Queue.Empty"),
_bI_=new MlString("Buffer.add: cannot grow buffer"),
_bH_=new MlString(""),
_bG_=new MlString(""),
_bF_=new MlString("\""),
_bE_=new MlString("\""),
_bD_=new MlString("'"),
_bC_=new MlString("'"),
_bB_=new MlString("."),
_bA_=new MlString("printf: bad positional specification (0)."),
_bz_=new MlString("%_"),
_by_=[0,new MlString("printf.ml"),144,8],
_bx_=new MlString("''"),
_bw_=new MlString("Printf: premature end of format string ``"),
_bv_=new MlString("''"),
_bu_=new MlString(" in format string ``"),
_bt_=new MlString(", at char number "),
_bs_=new MlString("Printf: bad conversion %"),
_br_=new MlString("Sformat.index_of_int: negative argument "),
_bq_=new MlString(""),
_bp_=new MlString(", %s%s"),
_bo_=[1,1],
_bn_=new MlString("%s\n"),
_bm_=
new
MlString
("(Program not linked with -g, cannot print stack backtrace)\n"),
_bl_=new MlString("Raised at"),
_bk_=new MlString("Re-raised at"),
_bj_=new MlString("Raised by primitive operation at"),
_bi_=new MlString("Called from"),
_bh_=new MlString("%s file \"%s\", line %d, characters %d-%d"),
_bg_=new MlString("%s unknown location"),
_bf_=new MlString("Pattern matching failed"),
_be_=new MlString("Assertion failed"),
_bd_=new MlString("Undefined recursive module"),
_bc_=new MlString("(%s%s)"),
_bb_=new MlString(""),
_ba_=new MlString(""),
_a$_=new MlString("(%s)"),
_a__=new MlString("%d"),
_a9_=new MlString("%S"),
_a8_=new MlString("_"),
_a7_=[0,new MlString("src/core/lwt.ml"),648,20],
_a6_=[0,new MlString("src/core/lwt.ml"),651,8],
_a5_=[0,new MlString("src/core/lwt.ml"),498,8],
_a4_=[0,new MlString("src/core/lwt.ml"),487,9],
_a3_=new MlString("Lwt.wakeup_result"),
_a2_=new MlString("Lwt.Canceled"),
_a1_=new MlString("iframe"),
_a0_=new MlString("br"),
_aZ_=new MlString("textarea"),
_aY_=new MlString("input"),
_aX_=new MlString("\""),
_aW_=new MlString(" name=\""),
_aV_=new MlString("\""),
_aU_=new MlString(" type=\""),
_aT_=new MlString("<"),
_aS_=new MlString(">"),
_aR_=new MlString(""),
_aQ_=new MlString("^error_in_anchor^"),
_aP_=[0,new MlString("main.ml"),72,76],
_aO_=new MlString("href"),
_aN_=new MlString("global"),
_aM_=new MlString("wiki"),
_aL_=new MlString("^error2_in_anchor^"),
_aK_=[0,new MlString("]]"),0],
_aJ_=new MlString("[["),
_aI_=new MlString(""),
_aH_=[0,new MlString("]]"),0],
_aG_=new MlString("|"),
_aF_=new MlString("[["),
_aE_=new MlString(""),
_aD_=[0,new MlString("main.ml"),67,35],
_aC_=new MlString("#text"),
_aB_=new MlString("A"),
_aA_=new MlString("B"),
_az_=new MlString("BR"),
_ay_=new MlString("DIV"),
_ax_=new MlString("H1"),
_aw_=new MlString("H2"),
_av_=new MlString("H3"),
_au_=new MlString("HR"),
_at_=new MlString("I"),
_as_=new MlString("P"),
_ar_=new MlString("^"),
_aq_=new MlString("^"),
_ap_=new MlString("\n\n"),
_ao_=[0,new MlString("//")],
_an_=new MlString("----"),
_am_=new MlString("\\\\"),
_al_=[0,new MlString("**")],
_ak_=new MlString("wysitype"),
_aj_=new MlString("\n\n"),
_ai_=new MlString(""),
_ah_=new MlString("lololo"),
_ag_=new MlString("Enter a wikipage"),
_af_=new MlString(""),
_ae_=[0,new MlString("</a>"),0],
_ad_=new MlString("\" wysitype=\"wiki\">"),
_ac_=new MlString("<a href=\""),
_ab_=new MlString("inserthtml"),
_aa_=new MlString("http://google.ru"),
_$_=new MlString("Enter a link"),
___=new MlString("desc"),
_Z_=new MlString("Enter description"),
_Y_=[0,new MlString("</a>"),0],
_X_=new MlString("\" wysitype=\"global\">"),
_W_=new MlString("<a href=\""),
_V_=new MlString(""),
_U_=new MlString("inserthtml"),
_T_=new MlString("submit"),
_S_=
new
MlString
("<html><body><p><b>Camelus</b><i>bactrianus</i></p></body></html>"),
_R_=new MlString("On"),
_Q_=new MlString("inserthorizontalrule"),
_P_=new MlString("hr"),
_O_=new MlString("removeformat"),
_N_=new MlString("remove format"),
_M_=new MlString("bold"),
_L_=new MlString("B"),
_K_=new MlString("italic"),
_J_=new MlString("I"),
_I_=new MlString("formatblock"),
_H_=new MlString("p"),
_G_=[0,[0,new MlString("p")]],
_F_=new MlString("formatblock"),
_E_=new MlString("h1"),
_D_=[0,[0,new MlString("h1")]],
_C_=new MlString("formatblock"),
_B_=new MlString("h2"),
_A_=[0,[0,new MlString("h2")]],
_z_=new MlString("formatblock"),
_y_=new MlString("h3"),
_x_=[0,[0,new MlString("h3")]],
_w_=new MlString("inserthtml"),
_v_=new MlString("link"),
_u_=new MlString("inserthtml"),
_t_=new MlString("link2wiki"),
_s_=new MlString("1px black solid"),
_r_=new MlString("5px"),
_q_=new MlString("wikiFrame"),
_p_=new MlString("2px blue solid"),
_o_=new MlString("5px"),
_n_=new MlString(""),
_m_=[0,new MlString("main.ml"),96,17],
_l_=new MlString("wiki_demo"),
_k_=new MlString("2px green solid"),
_j_=new MlString("#"),
_i_=new MlString("wysiFrame"),
_h_=new MlString("Main.Break");
function _g_(s_e_){throw [0,_a_,s_e_];}
function _b3_(s_f_){throw [0,_b_,s_f_];}
function _cc_(s1_b4_,s2_b6_)
{var
l1_b5_=s1_b4_.getLen(),
l2_b7_=s2_b6_.getLen(),
s_b8_=caml_create_string(l1_b5_+l2_b7_|0);
caml_blit_string(s1_b4_,0,s_b8_,0,l1_b5_);
caml_blit_string(s2_b6_,0,s_b8_,l1_b5_,l2_b7_);
return s_b8_;}
function string_of_int_ch_(n_b9_){return caml_format_int(_bW_,n_b9_);}
function string_of_float_ci_(f_b__)
{var _b$_=caml_format_float(_bY_,f_b__),i_ca_=0,l_cb_=_b$_.getLen();
for(;;)
{if(l_cb_<=i_ca_)
var _cd_=_cc_(_b$_,_bX_);
else
{var
_ce_=_b$_.safeGet(i_ca_),
_cf_=48<=_ce_?58<=_ce_?0:1:45===_ce_?1:0;
if(_cf_){var _cg_=i_ca_+1|0,i_ca_=_cg_;continue;}
var _cd_=_b$_;}
return _cd_;}}
var stderr_cj_=caml_ml_open_descriptor_out(2);
function output_string_cr_(oc_cl_,s_ck_)
{return caml_ml_output(oc_cl_,s_ck_,0,s_ck_.getLen());}
function do_at_exit_cq_(param_cp_)
{var param_cm_=caml_ml_out_channels_list(0);
for(;;)
{if(param_cm_)
{var l_cn_=param_cm_[2];
try {}catch(_co_){}
var param_cm_=l_cn_;
continue;}
return 0;}}
caml_register_named_value(_bT_,do_at_exit_cq_);
function _cv_(_ct_,_cs_){return caml_ml_output_char(_ct_,_cs_);}
function _cC_(_cu_){return caml_ml_flush(_cu_);}
function _cB_(f_cy_,param_cw_)
{var param_cx_=param_cw_;
for(;;)
{if(param_cx_)
{var l_cA_=param_cx_[2];
_cz_(f_cy_,param_cx_[1]);
var param_cx_=l_cA_;
continue;}
return 0;}}
function _cZ_(n_cD_,c_cF_)
{var s_cE_=caml_create_string(n_cD_);
caml_fill_string(s_cE_,0,n_cD_,c_cF_);
return s_cE_;}
function _c0_(s_cI_,ofs_cG_,len_cH_)
{if(0<=ofs_cG_&&0<=len_cH_&&!((s_cI_.getLen()-len_cH_|0)<ofs_cG_))
{var r_cJ_=caml_create_string(len_cH_);
caml_blit_string(s_cI_,ofs_cG_,r_cJ_,0,len_cH_);
return r_cJ_;}
return _b3_(_bK_);}
function _c1_(s1_cM_,ofs1_cL_,s2_cO_,ofs2_cN_,len_cK_)
{if
(0<=
len_cK_&&
0<=
ofs1_cL_&&
!((s1_cM_.getLen()-len_cK_|0)<ofs1_cL_)&&
0<=
ofs2_cN_&&
!((s2_cO_.getLen()-len_cK_|0)<ofs2_cN_))
return caml_blit_string(s1_cM_,ofs1_cL_,s2_cO_,ofs2_cN_,len_cK_);
return _b3_(_bL_);}
function _c2_(sep_cV_,l_cP_)
{if(l_cP_)
{var hd_cQ_=l_cP_[1],num_cR_=[0,0],len_cS_=[0,0],tl_cU_=l_cP_[2];
_cB_
(function(s_cT_)
{num_cR_[1]+=1;len_cS_[1]=len_cS_[1]+s_cT_.getLen()|0;return 0;},
l_cP_);
var
r_cW_=
caml_create_string
(len_cS_[1]+caml_mul(sep_cV_.getLen(),num_cR_[1]-1|0)|0);
caml_blit_string(hd_cQ_,0,r_cW_,0,hd_cQ_.getLen());
var pos_cX_=[0,hd_cQ_.getLen()];
_cB_
(function(s_cY_)
{caml_blit_string(sep_cV_,0,r_cW_,pos_cX_[1],sep_cV_.getLen());
pos_cX_[1]=pos_cX_[1]+sep_cV_.getLen()|0;
caml_blit_string(s_cY_,0,r_cW_,pos_cX_[1],s_cY_.getLen());
pos_cX_[1]=pos_cX_[1]+s_cY_.getLen()|0;
return 0;},
tl_cU_);
return r_cW_;}
return _bM_;}
var
_c3_=caml_sys_get_config(0)[2],
_c4_=caml_mul(_c3_/8|0,(1<<(_c3_-10|0))-1|0)-1|0,
_dn_=252,
_dm_=253,
_dl_=[0,_bJ_];
function _dk_(n_c5_)
{var
n_c6_=1<=n_c5_?n_c5_:1,
n_c7_=_c4_<n_c6_?_c4_:n_c6_,
s_c8_=caml_create_string(n_c7_);
return [0,s_c8_,0,n_c7_,s_c8_];}
function _do_(b_c9_){return _c0_(b_c9_[1],0,b_c9_[2]);}
function _de_(b_c__,more_da_)
{var new_len_c$_=[0,b_c__[3]];
for(;;)
{if(new_len_c$_[1]<(b_c__[2]+more_da_|0))
{new_len_c$_[1]=2*new_len_c$_[1]|0;continue;}
if(_c4_<new_len_c$_[1])
if((b_c__[2]+more_da_|0)<=_c4_)new_len_c$_[1]=_c4_;else _g_(_bI_);
var new_buffer_db_=caml_create_string(new_len_c$_[1]);
_c1_(b_c__[1],0,new_buffer_db_,0,b_c__[2]);
b_c__[1]=new_buffer_db_;
b_c__[3]=new_len_c$_[1];
return 0;}}
function _dp_(b_dc_,c_df_)
{var pos_dd_=b_dc_[2];
if(b_dc_[3]<=pos_dd_)_de_(b_dc_,1);
b_dc_[1].safeSet(pos_dd_,c_df_);
b_dc_[2]=pos_dd_+1|0;
return 0;}
function _dq_(b_di_,s_dg_)
{var len_dh_=s_dg_.getLen(),new_position_dj_=b_di_[2]+len_dh_|0;
if(b_di_[3]<new_position_dj_)_de_(b_di_,len_dh_);
_c1_(s_dg_,0,b_di_[1],b_di_[2],len_dh_);
b_di_[2]=new_position_dj_;
return 0;}
function index_of_int_du_(i_dr_)
{return 0<=i_dr_?i_dr_:_g_(_cc_(_br_,string_of_int_ch_(i_dr_)));}
function add_int_index_dv_(i_ds_,idx_dt_)
{return index_of_int_du_(i_ds_+idx_dt_|0);}
var _dw_=_cz_(add_int_index_dv_,1);
function _dD_(fmt_dx_){return _c0_(fmt_dx_,0,fmt_dx_.getLen());}
function bad_conversion_dF_(sfmt_dy_,i_dz_,c_dB_)
{var
_dA_=_cc_(_bu_,_cc_(sfmt_dy_,_bv_)),
_dC_=_cc_(_bt_,_cc_(string_of_int_ch_(i_dz_),_dA_));
return _b3_(_cc_(_bs_,_cc_(_cZ_(1,c_dB_),_dC_)));}
function bad_conversion_format_ey_(fmt_dE_,i_dH_,c_dG_)
{return bad_conversion_dF_(_dD_(fmt_dE_),i_dH_,c_dG_);}
function incomplete_format_ez_(fmt_dI_)
{return _b3_(_cc_(_bw_,_cc_(_dD_(fmt_dI_),_bx_)));}
function extract_format_d6_(fmt_dJ_,start_dR_,stop_dT_,widths_dV_)
{function skip_positional_spec_dQ_(start_dK_)
{if
((fmt_dJ_.safeGet(start_dK_)-48|0)<
0||
9<
(fmt_dJ_.safeGet(start_dK_)-48|0))
return start_dK_;
var i_dL_=start_dK_+1|0;
for(;;)
{var _dM_=fmt_dJ_.safeGet(i_dL_);
if(48<=_dM_)
{if(!(58<=_dM_)){var _dO_=i_dL_+1|0,i_dL_=_dO_;continue;}
var _dN_=0;}
else
if(36===_dM_){var _dP_=i_dL_+1|0,_dN_=1;}else var _dN_=0;
if(!_dN_)var _dP_=start_dK_;
return _dP_;}}
var
start_dS_=skip_positional_spec_dQ_(start_dR_+1|0),
b_dU_=_dk_((stop_dT_-start_dS_|0)+10|0);
_dp_(b_dU_,37);
var l1_dW_=widths_dV_,l2_dX_=0;
for(;;)
{if(l1_dW_)
{var
l_dY_=l1_dW_[2],
_dZ_=[0,l1_dW_[1],l2_dX_],
l1_dW_=l_dY_,
l2_dX_=_dZ_;
continue;}
var i_d0_=start_dS_,widths_d1_=l2_dX_;
for(;;)
{if(i_d0_<=stop_dT_)
{var _d2_=fmt_dJ_.safeGet(i_d0_);
if(42===_d2_)
{if(widths_d1_)
{var t_d3_=widths_d1_[2];
_dq_(b_dU_,string_of_int_ch_(widths_d1_[1]));
var
i_d4_=skip_positional_spec_dQ_(i_d0_+1|0),
i_d0_=i_d4_,
widths_d1_=t_d3_;
continue;}
throw [0,_c_,_by_];}
_dp_(b_dU_,_d2_);
var _d5_=i_d0_+1|0,i_d0_=_d5_;
continue;}
return _do_(b_dU_);}}}
function extract_format_int_fY_
(conv_ea_,fmt_d__,start_d9_,stop_d8_,widths_d7_)
{var sfmt_d$_=extract_format_d6_(fmt_d__,start_d9_,stop_d8_,widths_d7_);
if(78!==conv_ea_&&110!==conv_ea_)return sfmt_d$_;
sfmt_d$_.safeSet(sfmt_d$_.getLen()-1|0,117);
return sfmt_d$_;}
function sub_format_eA_
(incomplete_format_eh_,bad_conversion_format_er_,conv_ew_,fmt_eb_,i_ev_)
{var len_ec_=fmt_eb_.getLen();
function sub_fmt_et_(c_ed_,i_eq_)
{var close_ee_=40===c_ed_?41:125;
function sub_ep_(j_ef_)
{var j_eg_=j_ef_;
for(;;)
{if(len_ec_<=j_eg_)return _cz_(incomplete_format_eh_,fmt_eb_);
if(37===fmt_eb_.safeGet(j_eg_))
{var _ei_=j_eg_+1|0;
if(len_ec_<=_ei_)
var _ej_=_cz_(incomplete_format_eh_,fmt_eb_);
else
{var _ek_=fmt_eb_.safeGet(_ei_),_el_=_ek_-40|0;
if(_el_<0||1<_el_)
{var _em_=_el_-83|0;
if(_em_<0||2<_em_)
var _en_=1;
else
switch(_em_)
{case 1:var _en_=1;break;
case 2:var _eo_=1,_en_=0;break;
default:var _eo_=0,_en_=0;}
if(_en_){var _ej_=sub_ep_(_ei_+1|0),_eo_=2;}}
else
var _eo_=0===_el_?0:1;
switch(_eo_)
{case 1:
var
_ej_=
_ek_===close_ee_
?_ei_+1|0
:_es_(bad_conversion_format_er_,fmt_eb_,i_eq_,_ek_);
break;
case 2:break;
default:var _ej_=sub_ep_(sub_fmt_et_(_ek_,_ei_+1|0)+1|0);}}
return _ej_;}
var _eu_=j_eg_+1|0,j_eg_=_eu_;
continue;}}
return sub_ep_(i_eq_);}
return sub_fmt_et_(conv_ew_,i_ev_);}
function sub_format_for_printf_e0_(conv_ex_)
{return _es_
(sub_format_eA_,
incomplete_format_ez_,
bad_conversion_format_ey_,
conv_ex_);}
function iter_on_format_args_fe_(fmt_eB_,add_conv_eM_,add_char_eW_)
{var lim_eC_=fmt_eB_.getLen()-1|0;
function scan_fmt_eY_(i_eD_)
{var i_eE_=i_eD_;
a:
for(;;)
{if(i_eE_<lim_eC_)
{if(37===fmt_eB_.safeGet(i_eE_))
{var skip_eF_=0,i_eG_=i_eE_+1|0;
for(;;)
{if(lim_eC_<i_eG_)
var _eH_=incomplete_format_ez_(fmt_eB_);
else
{var _eI_=fmt_eB_.safeGet(i_eG_);
if(58<=_eI_)
{if(95===_eI_)
{var _eK_=i_eG_+1|0,_eJ_=1,skip_eF_=_eJ_,i_eG_=_eK_;
continue;}}
else
if(32<=_eI_)
switch(_eI_-32|0)
{case 1:
case 2:
case 4:
case 5:
case 6:
case 7:
case 8:
case 9:
case 12:
case 15:break;
case 0:
case 3:
case 11:
case 13:var _eL_=i_eG_+1|0,i_eG_=_eL_;continue;
case 10:
var _eN_=_es_(add_conv_eM_,skip_eF_,i_eG_,105),i_eG_=_eN_;
continue;
default:var _eO_=i_eG_+1|0,i_eG_=_eO_;continue;}
var i_eP_=i_eG_;
c:
for(;;)
{if(lim_eC_<i_eP_)
var _eQ_=incomplete_format_ez_(fmt_eB_);
else
{var _eR_=fmt_eB_.safeGet(i_eP_);
if(126<=_eR_)
var _eS_=0;
else
switch(_eR_)
{case 78:
case 88:
case 100:
case 105:
case 111:
case 117:
case 120:
var _eQ_=_es_(add_conv_eM_,skip_eF_,i_eP_,105),_eS_=1;break;
case 69:
case 70:
case 71:
case 101:
case 102:
case 103:
var _eQ_=_es_(add_conv_eM_,skip_eF_,i_eP_,102),_eS_=1;break;
case 33:
case 37:
case 44:
case 64:var _eQ_=i_eP_+1|0,_eS_=1;break;
case 83:
case 91:
case 115:
var _eQ_=_es_(add_conv_eM_,skip_eF_,i_eP_,115),_eS_=1;break;
case 97:
case 114:
case 116:
var _eQ_=_es_(add_conv_eM_,skip_eF_,i_eP_,_eR_),_eS_=1;
break;
case 76:
case 108:
case 110:
var j_eT_=i_eP_+1|0;
if(lim_eC_<j_eT_)
{var _eQ_=_es_(add_conv_eM_,skip_eF_,i_eP_,105),_eS_=1;}
else
{var _eU_=fmt_eB_.safeGet(j_eT_)-88|0;
if(_eU_<0||32<_eU_)
var _eV_=1;
else
switch(_eU_)
{case 0:
case 12:
case 17:
case 23:
case 29:
case 32:
var
_eQ_=
_eX_
(add_char_eW_,_es_(add_conv_eM_,skip_eF_,i_eP_,_eR_),105),
_eS_=1,
_eV_=0;
break;
default:var _eV_=1;}
if(_eV_)
{var _eQ_=_es_(add_conv_eM_,skip_eF_,i_eP_,105),_eS_=1;}}
break;
case 67:
case 99:
var _eQ_=_es_(add_conv_eM_,skip_eF_,i_eP_,99),_eS_=1;break;
case 66:
case 98:
var _eQ_=_es_(add_conv_eM_,skip_eF_,i_eP_,66),_eS_=1;break;
case 41:
case 125:
var _eQ_=_es_(add_conv_eM_,skip_eF_,i_eP_,_eR_),_eS_=1;
break;
case 40:
var
_eQ_=scan_fmt_eY_(_es_(add_conv_eM_,skip_eF_,i_eP_,_eR_)),
_eS_=1;
break;
case 123:
var
i_eZ_=_es_(add_conv_eM_,skip_eF_,i_eP_,_eR_),
j_e1_=_es_(sub_format_for_printf_e0_,_eR_,fmt_eB_,i_eZ_),
i_e2_=i_eZ_;
for(;;)
{if(i_e2_<(j_e1_-2|0))
{var
_e3_=_eX_(add_char_eW_,i_e2_,fmt_eB_.safeGet(i_e2_)),
i_e2_=_e3_;
continue;}
var _e4_=j_e1_-1|0,i_eP_=_e4_;
continue c;}
default:var _eS_=0;}
if(!_eS_)
var _eQ_=bad_conversion_format_ey_(fmt_eB_,i_eP_,_eR_);}
var _eH_=_eQ_;
break;}}
var i_eE_=_eH_;
continue a;}}
var _e5_=i_eE_+1|0,i_eE_=_e5_;
continue;}
return i_eE_;}}
scan_fmt_eY_(0);
return 0;}
function count_arguments_of_format_hb_(fmt_ff_)
{var ac_e6_=[0,0,0,0];
function add_conv_fd_(skip_e$_,i_fa_,c_e7_)
{var _e8_=41!==c_e7_?1:0,_e9_=_e8_?125!==c_e7_?1:0:_e8_;
if(_e9_)
{var inc_e__=97===c_e7_?2:1;
if(114===c_e7_)ac_e6_[3]=ac_e6_[3]+1|0;
if(skip_e$_)
ac_e6_[2]=ac_e6_[2]+inc_e__|0;
else
ac_e6_[1]=ac_e6_[1]+inc_e__|0;}
return i_fa_+1|0;}
iter_on_format_args_fe_
(fmt_ff_,add_conv_fd_,function(i_fb_,param_fc_){return i_fb_+1|0;});
return ac_e6_[1];}
function scan_positional_spec_fU_(fmt_fg_,got_spec_fj_,i_fh_)
{var _fi_=fmt_fg_.safeGet(i_fh_);
if((_fi_-48|0)<0||9<(_fi_-48|0))return _eX_(got_spec_fj_,0,i_fh_);
var accu_fk_=_fi_-48|0,j_fl_=i_fh_+1|0;
for(;;)
{var _fm_=fmt_fg_.safeGet(j_fl_);
if(48<=_fm_)
{if(!(58<=_fm_))
{var
_fp_=j_fl_+1|0,
_fo_=(10*accu_fk_|0)+(_fm_-48|0)|0,
accu_fk_=_fo_,
j_fl_=_fp_;
continue;}
var _fn_=0;}
else
if(36===_fm_)
if(0===accu_fk_)
{var _fq_=_g_(_bA_),_fn_=1;}
else
{var
_fq_=
_eX_(got_spec_fj_,[0,index_of_int_du_(accu_fk_-1|0)],j_fl_+1|0),
_fn_=1;}
else
var _fn_=0;
if(!_fn_)var _fq_=_eX_(got_spec_fj_,0,i_fh_);
return _fq_;}}
function next_index_fP_(spec_fr_,n_fs_)
{return spec_fr_?n_fs_:_cz_(_dw_,n_fs_);}
function get_index_fE_(spec_ft_,n_fu_){return spec_ft_?spec_ft_[1]:n_fu_;}
function _ix_
(to_s_hv_,get_out_fw_,outc_hH_,outs_hw_,flush_hg_,k_hN_,fmt_fv_)
{var out_fx_=_cz_(get_out_fw_,fmt_fv_);
function pr_hf_(k_fC_,n_hM_,fmt_fy_,v_fH_)
{var len_fB_=fmt_fy_.getLen();
function doprn_hc_(n_hE_,i_fz_)
{var i_fA_=i_fz_;
for(;;)
{if(len_fB_<=i_fA_)return _cz_(k_fC_,out_fx_);
var _fD_=fmt_fy_.safeGet(i_fA_);
if(37===_fD_)
{var
get_arg_fL_=
function(spec_fG_,n_fF_)
{return caml_array_get(v_fH_,get_index_fE_(spec_fG_,n_fF_));},
scan_flags_fR_=
function(spec_fT_,n_fM_,widths_fO_,i_fI_)
{var i_fJ_=i_fI_;
for(;;)
{var _fK_=fmt_fy_.safeGet(i_fJ_)-32|0;
if(!(_fK_<0||25<_fK_))
switch(_fK_)
{case 1:
case 2:
case 4:
case 5:
case 6:
case 7:
case 8:
case 9:
case 12:
case 15:break;
case 10:
return scan_positional_spec_fU_
(fmt_fy_,
function(wspec_fN_,i_fS_)
{var _fQ_=[0,get_arg_fL_(wspec_fN_,n_fM_),widths_fO_];
return scan_flags_fR_
(spec_fT_,next_index_fP_(wspec_fN_,n_fM_),_fQ_,i_fS_);},
i_fJ_+1|0);
default:var _fV_=i_fJ_+1|0,i_fJ_=_fV_;continue;}
var _fW_=fmt_fy_.safeGet(i_fJ_);
if(124<=_fW_)
var _fX_=0;
else
switch(_fW_)
{case 78:
case 88:
case 100:
case 105:
case 111:
case 117:
case 120:
var
x_fZ_=get_arg_fL_(spec_fT_,n_fM_),
s_f0_=
caml_format_int
(extract_format_int_fY_(_fW_,fmt_fy_,i_fA_,i_fJ_,widths_fO_),
x_fZ_),
_f2_=
cont_s_f1_(next_index_fP_(spec_fT_,n_fM_),s_f0_,i_fJ_+1|0),
_fX_=1;
break;
case 69:
case 71:
case 101:
case 102:
case 103:
var
x_f3_=get_arg_fL_(spec_fT_,n_fM_),
s_f4_=
caml_format_float
(extract_format_d6_(fmt_fy_,i_fA_,i_fJ_,widths_fO_),x_f3_),
_f2_=
cont_s_f1_(next_index_fP_(spec_fT_,n_fM_),s_f4_,i_fJ_+1|0),
_fX_=1;
break;
case 76:
case 108:
case 110:
var _f5_=fmt_fy_.safeGet(i_fJ_+1|0)-88|0;
if(_f5_<0||32<_f5_)
var _f6_=1;
else
switch(_f5_)
{case 0:
case 12:
case 17:
case 23:
case 29:
case 32:
var i_f7_=i_fJ_+1|0,_f8_=_fW_-108|0;
if(_f8_<0||2<_f8_)
var _f9_=0;
else
{switch(_f8_)
{case 1:var _f9_=0,_f__=0;break;
case 2:
var
x_f$_=get_arg_fL_(spec_fT_,n_fM_),
_ga_=
caml_format_int
(extract_format_d6_(fmt_fy_,i_fA_,i_f7_,widths_fO_),x_f$_),
_f__=1;
break;
default:
var
x_gb_=get_arg_fL_(spec_fT_,n_fM_),
_ga_=
caml_format_int
(extract_format_d6_(fmt_fy_,i_fA_,i_f7_,widths_fO_),x_gb_),
_f__=1;}
if(_f__){var s_gc_=_ga_,_f9_=1;}}
if(!_f9_)
{var
x_gd_=get_arg_fL_(spec_fT_,n_fM_),
s_gc_=
caml_int64_format
(extract_format_d6_(fmt_fy_,i_fA_,i_f7_,widths_fO_),x_gd_);}
var
_f2_=
cont_s_f1_(next_index_fP_(spec_fT_,n_fM_),s_gc_,i_f7_+1|0),
_fX_=1,
_f6_=0;
break;
default:var _f6_=1;}
if(_f6_)
{var
x_ge_=get_arg_fL_(spec_fT_,n_fM_),
s_gf_=
caml_format_int
(extract_format_int_fY_(110,fmt_fy_,i_fA_,i_fJ_,widths_fO_),
x_ge_),
_f2_=
cont_s_f1_(next_index_fP_(spec_fT_,n_fM_),s_gf_,i_fJ_+1|0),
_fX_=1;}
break;
case 37:
case 64:
var _f2_=cont_s_f1_(n_fM_,_cZ_(1,_fW_),i_fJ_+1|0),_fX_=1;
break;
case 83:
case 115:
var x_gg_=get_arg_fL_(spec_fT_,n_fM_);
if(115===_fW_)
var x_gh_=x_gg_;
else
{var n_gi_=[0,0],_gj_=0,_gk_=x_gg_.getLen()-1|0;
if(!(_gk_<_gj_))
{var i_gl_=_gj_;
for(;;)
{var
_gm_=x_gg_.safeGet(i_gl_),
_gn_=
14<=_gm_
?34===_gm_?1:92===_gm_?1:0
:11<=_gm_?13<=_gm_?1:0:8<=_gm_?1:0,
_go_=_gn_?2:caml_is_printable(_gm_)?1:4;
n_gi_[1]=n_gi_[1]+_go_|0;
var _gp_=i_gl_+1|0;
if(_gk_!==i_gl_){var i_gl_=_gp_;continue;}
break;}}
if(n_gi_[1]===x_gg_.getLen())
var _gq_=x_gg_;
else
{var s__gr_=caml_create_string(n_gi_[1]);
n_gi_[1]=0;
var _gs_=0,_gt_=x_gg_.getLen()-1|0;
if(!(_gt_<_gs_))
{var i_gu_=_gs_;
for(;;)
{var _gv_=x_gg_.safeGet(i_gu_),_gw_=_gv_-34|0;
if(_gw_<0||58<_gw_)
if(-20<=_gw_)
var _gx_=1;
else
{switch(_gw_+34|0)
{case 8:
s__gr_.safeSet(n_gi_[1],92);
n_gi_[1]+=1;
s__gr_.safeSet(n_gi_[1],98);
var _gy_=1;
break;
case 9:
s__gr_.safeSet(n_gi_[1],92);
n_gi_[1]+=1;
s__gr_.safeSet(n_gi_[1],116);
var _gy_=1;
break;
case 10:
s__gr_.safeSet(n_gi_[1],92);
n_gi_[1]+=1;
s__gr_.safeSet(n_gi_[1],110);
var _gy_=1;
break;
case 13:
s__gr_.safeSet(n_gi_[1],92);
n_gi_[1]+=1;
s__gr_.safeSet(n_gi_[1],114);
var _gy_=1;
break;
default:var _gx_=1,_gy_=0;}
if(_gy_)var _gx_=0;}
else
var
_gx_=
(_gw_-1|0)<0||56<(_gw_-1|0)
?(s__gr_.safeSet(n_gi_[1],92),
n_gi_[1]+=
1,
s__gr_.safeSet(n_gi_[1],_gv_),
0)
:1;
if(_gx_)
if(caml_is_printable(_gv_))
s__gr_.safeSet(n_gi_[1],_gv_);
else
{s__gr_.safeSet(n_gi_[1],92);
n_gi_[1]+=1;
s__gr_.safeSet(n_gi_[1],48+(_gv_/100|0)|0);
n_gi_[1]+=1;
s__gr_.safeSet(n_gi_[1],48+((_gv_/10|0)%10|0)|0);
n_gi_[1]+=1;
s__gr_.safeSet(n_gi_[1],48+(_gv_%10|0)|0);}
n_gi_[1]+=1;
var _gz_=i_gu_+1|0;
if(_gt_!==i_gu_){var i_gu_=_gz_;continue;}
break;}}
var _gq_=s__gr_;}
var x_gh_=_cc_(_bE_,_cc_(_gq_,_bF_));}
if(i_fJ_===(i_fA_+1|0))
var s_gA_=x_gh_;
else
{var
_gB_=
extract_format_d6_(fmt_fy_,i_fA_,i_fJ_,widths_fO_);
try
{var neg_gC_=0,i_gD_=1;
for(;;)
{if(_gB_.getLen()<=i_gD_)
var _gE_=[0,0,neg_gC_];
else
{var _gF_=_gB_.safeGet(i_gD_);
if(49<=_gF_)
if(58<=_gF_)
var _gG_=0;
else
{var
_gE_=
[0,
caml_int_of_string
(_c0_(_gB_,i_gD_,(_gB_.getLen()-i_gD_|0)-1|0)),
neg_gC_],
_gG_=1;}
else
{if(45===_gF_)
{var _gI_=i_gD_+1|0,_gH_=1,neg_gC_=_gH_,i_gD_=_gI_;
continue;}
var _gG_=0;}
if(!_gG_){var _gJ_=i_gD_+1|0,i_gD_=_gJ_;continue;}}
var match_gK_=_gE_;
break;}}
catch(_gL_)
{if(_gL_[1]!==_a_)throw _gL_;
var match_gK_=bad_conversion_dF_(_gB_,0,115);}
var
p_gM_=match_gK_[1],
_gN_=x_gh_.getLen(),
_gO_=0,
neg_gS_=match_gK_[2],
_gR_=32;
if(p_gM_===_gN_&&0===_gO_)
{var _gP_=x_gh_,_gQ_=1;}
else
var _gQ_=0;
if(!_gQ_)
if(p_gM_<=_gN_)
var _gP_=_c0_(x_gh_,_gO_,_gN_);
else
{var res_gT_=_cZ_(p_gM_,_gR_);
if(neg_gS_)
_c1_(x_gh_,_gO_,res_gT_,0,_gN_);
else
_c1_(x_gh_,_gO_,res_gT_,p_gM_-_gN_|0,_gN_);
var _gP_=res_gT_;}
var s_gA_=_gP_;}
var
_f2_=
cont_s_f1_(next_index_fP_(spec_fT_,n_fM_),s_gA_,i_fJ_+1|0),
_fX_=1;
break;
case 67:
case 99:
var x_gU_=get_arg_fL_(spec_fT_,n_fM_);
if(99===_fW_)
var s_gV_=_cZ_(1,x_gU_);
else
{if(39===x_gU_)
var _gW_=_bN_;
else
if(92===x_gU_)
var _gW_=_bO_;
else
{if(14<=x_gU_)
var _gX_=0;
else
switch(x_gU_)
{case 8:var _gW_=_bS_,_gX_=1;break;
case 9:var _gW_=_bR_,_gX_=1;break;
case 10:var _gW_=_bQ_,_gX_=1;break;
case 13:var _gW_=_bP_,_gX_=1;break;
default:var _gX_=0;}
if(!_gX_)
if(caml_is_printable(x_gU_))
{var s_gY_=caml_create_string(1);
s_gY_.safeSet(0,x_gU_);
var _gW_=s_gY_;}
else
{var s_gZ_=caml_create_string(4);
s_gZ_.safeSet(0,92);
s_gZ_.safeSet(1,48+(x_gU_/100|0)|0);
s_gZ_.safeSet(2,48+((x_gU_/10|0)%10|0)|0);
s_gZ_.safeSet(3,48+(x_gU_%10|0)|0);
var _gW_=s_gZ_;}}
var s_gV_=_cc_(_bC_,_cc_(_gW_,_bD_));}
var
_f2_=
cont_s_f1_(next_index_fP_(spec_fT_,n_fM_),s_gV_,i_fJ_+1|0),
_fX_=1;
break;
case 66:
case 98:
var
_g1_=i_fJ_+1|0,
_g0_=get_arg_fL_(spec_fT_,n_fM_)?_bV_:_bU_,
_f2_=cont_s_f1_(next_index_fP_(spec_fT_,n_fM_),_g0_,_g1_),
_fX_=1;
break;
case 40:
case 123:
var
xf_g2_=get_arg_fL_(spec_fT_,n_fM_),
j_g3_=_es_(sub_format_for_printf_e0_,_fW_,fmt_fy_,i_fJ_+1|0);
if(123===_fW_)
{var
b_g4_=_dk_(xf_g2_.getLen()),
add_char_g8_=
function(i_g6_,c_g5_){_dp_(b_g4_,c_g5_);return i_g6_+1|0;};
iter_on_format_args_fe_
(xf_g2_,
function(skip_g7_,i_g__,c_g9_)
{if(skip_g7_)_dq_(b_g4_,_bz_);else _dp_(b_g4_,37);
return add_char_g8_(i_g__,c_g9_);},
add_char_g8_);
var
_g$_=_do_(b_g4_),
_f2_=cont_s_f1_(next_index_fP_(spec_fT_,n_fM_),_g$_,j_g3_),
_fX_=1;}
else
{var
_ha_=next_index_fP_(spec_fT_,n_fM_),
m_hd_=
add_int_index_dv_
(count_arguments_of_format_hb_(xf_g2_),_ha_),
_f2_=
pr_hf_
(function(param_he_){return doprn_hc_(m_hd_,j_g3_);},
_ha_,
xf_g2_,
v_fH_),
_fX_=1;}
break;
case 33:
_cz_(flush_hg_,out_fx_);
var _f2_=doprn_hc_(n_fM_,i_fJ_+1|0),_fX_=1;
break;
case 41:
var _f2_=cont_s_f1_(n_fM_,_bH_,i_fJ_+1|0),_fX_=1;break;
case 44:
var _f2_=cont_s_f1_(n_fM_,_bG_,i_fJ_+1|0),_fX_=1;break;
case 70:
var x_hh_=get_arg_fL_(spec_fT_,n_fM_);
if(0===widths_fO_)
var s_hi_=string_of_float_ci_(x_hh_);
else
{var
sfmt_hj_=
extract_format_d6_(fmt_fy_,i_fA_,i_fJ_,widths_fO_);
if(70===_fW_)sfmt_hj_.safeSet(sfmt_hj_.getLen()-1|0,103);
var s_hk_=caml_format_float(sfmt_hj_,x_hh_);
if(3<=caml_classify_float(x_hh_))
var _hl_=s_hk_;
else
{var i_hm_=0,l_hn_=s_hk_.getLen();
for(;;)
{if(l_hn_<=i_hm_)
var _ho_=_cc_(s_hk_,_bB_);
else
{var
_hp_=s_hk_.safeGet(i_hm_)-46|0,
_hq_=
_hp_<0||23<_hp_
?55===_hp_?1:0
:(_hp_-1|0)<0||21<(_hp_-1|0)?1:0;
if(!_hq_){var _hr_=i_hm_+1|0,i_hm_=_hr_;continue;}
var _ho_=s_hk_;}
var _hl_=_ho_;
break;}}
var s_hi_=_hl_;}
var
_f2_=
cont_s_f1_(next_index_fP_(spec_fT_,n_fM_),s_hi_,i_fJ_+1|0),
_fX_=1;
break;
case 91:
var
_f2_=bad_conversion_format_ey_(fmt_fy_,i_fJ_,_fW_),
_fX_=1;
break;
case 97:
var
printer_hs_=get_arg_fL_(spec_fT_,n_fM_),
n_ht_=_cz_(_dw_,get_index_fE_(spec_fT_,n_fM_)),
arg_hu_=get_arg_fL_(0,n_ht_),
_hy_=i_fJ_+1|0,
_hx_=next_index_fP_(spec_fT_,n_ht_);
if(to_s_hv_)
_eX_(outs_hw_,out_fx_,_eX_(printer_hs_,0,arg_hu_));
else
_eX_(printer_hs_,out_fx_,arg_hu_);
var _f2_=doprn_hc_(_hx_,_hy_),_fX_=1;
break;
case 114:
var
_f2_=bad_conversion_format_ey_(fmt_fy_,i_fJ_,_fW_),
_fX_=1;
break;
case 116:
var
printer_hz_=get_arg_fL_(spec_fT_,n_fM_),
_hB_=i_fJ_+1|0,
_hA_=next_index_fP_(spec_fT_,n_fM_);
if(to_s_hv_)
_eX_(outs_hw_,out_fx_,_cz_(printer_hz_,0));
else
_cz_(printer_hz_,out_fx_);
var _f2_=doprn_hc_(_hA_,_hB_),_fX_=1;
break;
default:var _fX_=0;}
if(!_fX_)
var _f2_=bad_conversion_format_ey_(fmt_fy_,i_fJ_,_fW_);
return _f2_;}},
_hG_=i_fA_+1|0,
_hD_=0;
return scan_positional_spec_fU_
(fmt_fy_,
function(spec_hF_,i_hC_)
{return scan_flags_fR_(spec_hF_,n_hE_,_hD_,i_hC_);},
_hG_);}
_eX_(outc_hH_,out_fx_,_fD_);
var _hI_=i_fA_+1|0,i_fA_=_hI_;
continue;}}
function cont_s_f1_(n_hL_,s_hJ_,i_hK_)
{_eX_(outs_hw_,out_fx_,s_hJ_);return doprn_hc_(n_hL_,i_hK_);}
return doprn_hc_(n_hM_,0);}
var
kpr_hO_=_eX_(pr_hf_,k_hN_,index_of_int_du_(0)),
_hP_=count_arguments_of_format_hb_(fmt_fv_);
if(_hP_<0||6<_hP_)
{var
loop_h2_=
function(i_hQ_,args_hW_)
{if(_hP_<=i_hQ_)
{var
a_hR_=caml_make_vect(_hP_,0),
_hU_=
function(i_hS_,arg_hT_)
{return caml_array_set(a_hR_,(_hP_-i_hS_|0)-1|0,arg_hT_);},
i_hV_=0,
param_hX_=args_hW_;
for(;;)
{if(param_hX_)
{var _hY_=param_hX_[2],_hZ_=param_hX_[1];
if(_hY_)
{_hU_(i_hV_,_hZ_);
var _h0_=i_hV_+1|0,i_hV_=_h0_,param_hX_=_hY_;
continue;}
_hU_(i_hV_,_hZ_);}
return _eX_(kpr_hO_,fmt_fv_,a_hR_);}}
return function(x_h1_)
{return loop_h2_(i_hQ_+1|0,[0,x_h1_,args_hW_]);};},
_h3_=loop_h2_(0,0);}
else
switch(_hP_)
{case 1:
var
_h3_=
function(x_h5_)
{var a_h4_=caml_make_vect(1,0);
caml_array_set(a_h4_,0,x_h5_);
return _eX_(kpr_hO_,fmt_fv_,a_h4_);};
break;
case 2:
var
_h3_=
function(x_h7_,y_h8_)
{var a_h6_=caml_make_vect(2,0);
caml_array_set(a_h6_,0,x_h7_);
caml_array_set(a_h6_,1,y_h8_);
return _eX_(kpr_hO_,fmt_fv_,a_h6_);};
break;
case 3:
var
_h3_=
function(x_h__,y_h$_,z_ia_)
{var a_h9_=caml_make_vect(3,0);
caml_array_set(a_h9_,0,x_h__);
caml_array_set(a_h9_,1,y_h$_);
caml_array_set(a_h9_,2,z_ia_);
return _eX_(kpr_hO_,fmt_fv_,a_h9_);};
break;
case 4:
var
_h3_=
function(x_ic_,y_id_,z_ie_,t_if_)
{var a_ib_=caml_make_vect(4,0);
caml_array_set(a_ib_,0,x_ic_);
caml_array_set(a_ib_,1,y_id_);
caml_array_set(a_ib_,2,z_ie_);
caml_array_set(a_ib_,3,t_if_);
return _eX_(kpr_hO_,fmt_fv_,a_ib_);};
break;
case 5:
var
_h3_=
function(x_ih_,y_ii_,z_ij_,t_ik_,u_il_)
{var a_ig_=caml_make_vect(5,0);
caml_array_set(a_ig_,0,x_ih_);
caml_array_set(a_ig_,1,y_ii_);
caml_array_set(a_ig_,2,z_ij_);
caml_array_set(a_ig_,3,t_ik_);
caml_array_set(a_ig_,4,u_il_);
return _eX_(kpr_hO_,fmt_fv_,a_ig_);};
break;
case 6:
var
_h3_=
function(x_in_,y_io_,z_ip_,t_iq_,u_ir_,v_is_)
{var a_im_=caml_make_vect(6,0);
caml_array_set(a_im_,0,x_in_);
caml_array_set(a_im_,1,y_io_);
caml_array_set(a_im_,2,z_ip_);
caml_array_set(a_im_,3,t_iq_);
caml_array_set(a_im_,4,u_ir_);
caml_array_set(a_im_,5,v_is_);
return _eX_(kpr_hO_,fmt_fv_,a_im_);};
break;
default:var _h3_=_eX_(kpr_hO_,fmt_fv_,[0]);}
return _h3_;}
function _iL_(oc_iu_)
{function _iw_(_it_){return 0;}
return _iy_
(_ix_,
0,
function(param_iv_){return oc_iu_;},
_cv_,
output_string_cr_,
_cC_,
_iw_);}
function _iH_(fmt_iz_){return _dk_(2*fmt_iz_.getLen()|0);}
function _iE_(k_iC_,b_iA_)
{var s_iB_=_do_(b_iA_);b_iA_[2]=0;return _cz_(k_iC_,s_iB_);}
function _iK_(k_iD_)
{var _iG_=_cz_(_iE_,k_iD_);
return _iy_(_ix_,1,_iH_,_dp_,_dq_,function(_iF_){return 0;},_iG_);}
function _iM_(fmt_iJ_)
{return _eX_(_iK_,function(s_iI_){return s_iI_;},fmt_iJ_);}
var _iN_=[0,0];
function _iU_(x_iO_,i_iP_)
{var f_iQ_=x_iO_[i_iP_+1];
return caml_obj_is_block(f_iQ_)
?caml_obj_tag(f_iQ_)===_dn_
?_eX_(_iM_,_a9_,f_iQ_)
:caml_obj_tag(f_iQ_)===_dm_?string_of_float_ci_(f_iQ_):_a8_
:_eX_(_iM_,_a__,f_iQ_);}
function _iT_(x_iR_,i_iS_)
{if(x_iR_.length-1<=i_iS_)return _bq_;
var _iV_=_iT_(x_iR_,i_iS_+1|0);
return _es_(_iM_,_bp_,_iU_(x_iR_,i_iS_),_iV_);}
32===_c3_;
function _iY_(param_iX_)
{var seq_iW_=[];
caml_update_dummy(seq_iW_,[0,seq_iW_,seq_iW_]);
return seq_iW_;}
var Canceled_iZ_=[0,_a2_],current_data_i0_=[0,0],max_removed_j0_=42;
function repr_rec_i4_(t_i1_)
{var _i2_=t_i1_[1];
{if(3===_i2_[0])
{var t__i3_=_i2_[1],t___i5_=repr_rec_i4_(t__i3_);
if(t___i5_!==t__i3_)t_i1_[1]=[3,t___i5_];
return t___i5_;}
return t_i1_;}}
function repr_j1_(t_i6_){return repr_rec_i4_(t_i6_);}
function call_unsafe_jU_(f_i8_,x_i7_)
{try
{var _i9_=_cz_(f_i8_,x_i7_);}
catch(_i$_)
{var param_i__=_iN_[1];
for(;;)
{if(param_i__)
{var tl_jd_=param_i__[2],hd_ja_=param_i__[1];
try
{var _jb_=_cz_(hd_ja_,_i$_),_jc_=_jb_;}
catch(_je_){var _jc_=0;}
if(!_jc_){var param_i__=tl_jd_;continue;}}
else
if(_i$_[1]!==_b2_&&_i$_[1]!==_b0_)
if(_i$_[1]===_b1_)
{var match_jf_=_i$_[2],char_jg_=match_jf_[3];
_iy_
(_iM_,_d_,match_jf_[1],match_jf_[2],char_jg_,char_jg_+5|0,_bf_);}
else
if(_i$_[1]===_c_)
{var match_jh_=_i$_[2],char_ji_=match_jh_[3];
_iy_
(_iM_,
_d_,
match_jh_[1],
match_jh_[2],
char_ji_,
char_ji_+6|0,
_be_);}
else
if(_i$_[1]===_bZ_)
{var match_jj_=_i$_[2],char_jk_=match_jj_[3];
_iy_
(_iM_,
_d_,
match_jj_[1],
match_jj_[2],
char_jk_,
char_jk_+6|0,
_bd_);}
else
{var _jl_=_i$_.length-1,constructor_jo_=_i$_[0+1][0+1];
if(_jl_<0||2<_jl_)
{var
_jm_=_iT_(_i$_,2),
_jn_=_es_(_iM_,_bc_,_iU_(_i$_,1),_jm_);}
else
switch(_jl_)
{case 1:var _jn_=_ba_;break;
case 2:var _jn_=_eX_(_iM_,_a$_,_iU_(_i$_,1));break;
default:var _jn_=_bb_;}
_cc_(constructor_jo_,_jn_);}
caml_ml_output_char(stderr_cj_,10);
var _jp_=caml_get_exception_backtrace(0);
if(_jp_)
{var a_jq_=_jp_[1],_jr_=0,_js_=a_jq_.length-1-1|0;
if(!(_js_<_jr_))
{var i_jt_=_jr_;
for(;;)
{if(caml_notequal(caml_array_get(a_jq_,i_jt_),_bo_))
{var
_ju_=caml_array_get(a_jq_,i_jt_),
is_raise_jv_=0===_ju_[0]?_ju_[1]:_ju_[1],
info_jw_=
is_raise_jv_?0===i_jt_?_bl_:_bk_:0===i_jt_?_bj_:_bi_,
_jx_=
0===_ju_[0]
?_iy_(_iM_,_bh_,info_jw_,_ju_[2],_ju_[3],_ju_[4],_ju_[5])
:_eX_(_iM_,_bg_,info_jw_);
_es_(_iL_,stderr_cj_,_bn_,_jx_);}
var _jy_=i_jt_+1|0;
if(_js_!==i_jt_){var i_jt_=_jy_;continue;}
break;}}}
else
_eX_(_iL_,stderr_cj_,_bm_);
do_at_exit_cq_(0);
return caml_sys_exit(2);}}
return _i9_;}
function run_waiters_rec_jJ_(state_jD_,ws_jz_,rem_jB_)
{var ws_jA_=ws_jz_,rem_jC_=rem_jB_;
for(;;)
if(typeof ws_jA_==="number")
return run_waiters_rec_next_jE_(state_jD_,rem_jC_);
else
switch(ws_jA_[0])
{case 1:
_cz_(ws_jA_[1],state_jD_);
return run_waiters_rec_next_jE_(state_jD_,rem_jC_);
case 2:
var
ws1_jF_=ws_jA_[1],
_jG_=[0,ws_jA_[2],rem_jC_],
ws_jA_=ws1_jF_,
rem_jC_=_jG_;
continue;
default:
var _jH_=ws_jA_[1][1];
return _jH_
?(_cz_(_jH_[1],state_jD_),
run_waiters_rec_next_jE_(state_jD_,rem_jC_))
:run_waiters_rec_next_jE_(state_jD_,rem_jC_);}}
function run_waiters_rec_next_jE_(state_jK_,rem_jI_)
{return rem_jI_?run_waiters_rec_jJ_(state_jK_,rem_jI_[1],rem_jI_[2]):0;}
function run_cancel_handlers_rec_jW_(chs_jL_,rem_jN_)
{var chs_jM_=chs_jL_,rem_jO_=rem_jN_;
for(;;)
if(typeof chs_jM_==="number")
return run_cancel_handlers_rec_next_jQ_(rem_jO_);
else
switch(chs_jM_[0])
{case 1:
var n_jP_=chs_jM_[1];
if(n_jP_[4]){n_jP_[4]=0;n_jP_[1][2]=n_jP_[2];n_jP_[2][1]=n_jP_[1];}
return run_cancel_handlers_rec_next_jQ_(rem_jO_);
case 2:
var
chs1_jR_=chs_jM_[1],
_jS_=[0,chs_jM_[2],rem_jO_],
chs_jM_=chs1_jR_,
rem_jO_=_jS_;
continue;
default:
var f_jT_=chs_jM_[2];
current_data_i0_[1]=chs_jM_[1];
call_unsafe_jU_(f_jT_,0);
return run_cancel_handlers_rec_next_jQ_(rem_jO_);}}
function run_cancel_handlers_rec_next_jQ_(rem_jV_)
{return rem_jV_?run_cancel_handlers_rec_jW_(rem_jV_[1],rem_jV_[2]):0;}
function unsafe_run_waiters_j2_(sleeper_jY_,state_jX_)
{var
_jZ_=
1===state_jX_[0]
?state_jX_[1][1]===Canceled_iZ_
?(run_cancel_handlers_rec_jW_(sleeper_jY_[4],0),1)
:0
:0;
_jZ_;
return run_waiters_rec_jJ_(state_jX_,sleeper_jY_[2],0);}
var wakening_j3_=[0,0],_j4_=[0,0,0];
function wakeup_kp_(t_j7_,v_j5_)
{var _j6_=[0,v_j5_],t_j8_=repr_rec_i4_(t_j7_),_j9_=t_j8_[1];
switch(_j9_[0])
{case 1:
if(_j9_[1][1]===Canceled_iZ_){var _j__=0,_j$_=1;}else var _j$_=0;
break;
case 2:
var sleeper_ka_=_j9_[1];
t_j8_[1]=_j6_;
var
snapshot_kb_=current_data_i0_[1],
already_wakening_kc_=wakening_j3_[1]?1:(wakening_j3_[1]=1,0);
unsafe_run_waiters_j2_(sleeper_ka_,_j6_);
if(already_wakening_kc_)
{current_data_i0_[1]=snapshot_kb_;var _kd_=0;}
else
for(;;)
{if(0!==_j4_[1])
{if(0===_j4_[1])throw [0,_dl_];
_j4_[1]=_j4_[1]-1|0;
var tail_ke_=_j4_[2],head_kf_=tail_ke_[2];
if(head_kf_===tail_ke_)_j4_[2]=0;else tail_ke_[2]=head_kf_[2];
var _kg_=head_kf_[1];
unsafe_run_waiters_j2_(_kg_[1],_kg_[2]);
continue;}
wakening_j3_[1]=0;
current_data_i0_[1]=snapshot_kb_;
var _kd_=0;
break;}
var _j__=_kd_,_j$_=1;
break;
default:var _j$_=0;}
if(!_j$_)var _j__=_b3_(_a3_);
return _j__;}
function append_kn_(l1_kh_,l2_ki_)
{return typeof l1_kh_==="number"
?l2_ki_
:typeof l2_ki_==="number"?l1_kh_:[2,l1_kh_,l2_ki_];}
function cleanup_kk_(ws_kj_)
{if(typeof ws_kj_!=="number")
switch(ws_kj_[0])
{case 2:
var l1_kl_=ws_kj_[1],_km_=cleanup_kk_(ws_kj_[2]);
return append_kn_(cleanup_kk_(l1_kl_),_km_);
case 1:break;
default:if(!ws_kj_[1][1])return 0;}
return ws_kj_;}
var
pause_hook_kr_=[0,function(_ko_){return 0;}],
_kq_=_iY_(0),
_ku_=[0,0],
null_kz_=null;
function _kJ_(param_ky_)
{var _ks_=1-(_kq_[2]===_kq_?1:0);
if(_ks_)
{var tmp_kt_=_iY_(0);
tmp_kt_[1][2]=_kq_[2];
_kq_[2][1]=tmp_kt_[1];
tmp_kt_[1]=_kq_[1];
_kq_[1][2]=tmp_kt_;
_kq_[1]=_kq_;
_kq_[2]=_kq_;
_ku_[1]=0;
var curr_kv_=tmp_kt_[2];
for(;;)
{var _kw_=curr_kv_!==tmp_kt_?1:0;
if(_kw_)
{if(curr_kv_[4])wakeup_kp_(curr_kv_[3],0);
var _kx_=curr_kv_[2],curr_kv_=_kx_;
continue;}
return _kw_;}}
return _ks_;}
var undefined_kI_=undefined;
function _kH_(x_kA_,f_kB_){return x_kA_==null_kz_?0:_cz_(f_kB_,x_kA_);}
function _kK_(x_kC_,f_kD_,g_kE_)
{return x_kC_==null_kz_?_cz_(f_kD_,0):_cz_(g_kE_,x_kC_);}
function _kL_(x_kF_,f_kG_){return x_kF_==null_kz_?_cz_(f_kG_,0):x_kF_;}
var _true_kM_=true,_false_kN_=false,array_constructor_kO_=Array;
function _kQ_(e_kP_)
{return e_kP_ instanceof array_constructor_kO_
?0
:[0,new MlWrappedString(e_kP_.toString())];}
_iN_[1]=[0,_kQ_,_iN_[1]];
function _kS_(_kR_){return _kR_;}
function appendChild_k0_(p_kT_,n_kU_){p_kT_.appendChild(n_kU_);return 0;}
function handler_k1_(f_kW_)
{return _kS_
(caml_js_wrap_callback
(function(e_kV_)
{if(e_kV_)
{var res_kX_=_cz_(f_kW_,e_kV_);
if(!(res_kX_|0))e_kV_.preventDefault();
return res_kX_;}
var _kY_=event,res_kZ_=_cz_(f_kW_,_kY_);
_kY_.returnValue=res_kZ_;
return res_kZ_;}));}
var
window_k2_=window,
document_k3_=window_k2_.document,
onIE_ld_=caml_js_on_ie(0)|0;
function opt_iter_lg_(x_k4_,f_k5_){return x_k4_?_cz_(f_k5_,x_k4_[1]):0;}
function createElement_k8_(doc_k7_,name_k6_)
{return doc_k7_.createElement(name_k6_.toString());}
function unsafeCreateElement_lp_(doc_k__,name_k9_)
{return createElement_k8_(doc_k__,name_k9_);}
function unsafeCreateElementEx_ll_(_type_k$_,name_la_,doc_lc_,elt_lb_)
{if(0===_type_k$_&&0===name_la_)
return createElement_k8_(doc_lc_,elt_lb_);
if(onIE_ld_)
{var a_le_=new array_constructor_kO_();
a_le_.push(_aT_.toString(),elt_lb_.toString());
opt_iter_lg_
(_type_k$_,
function(t_lf_)
{a_le_.push
(_aU_.toString(),caml_js_html_escape(t_lf_),_aV_.toString());
return 0;});
opt_iter_lg_
(name_la_,
function(n_lh_)
{a_le_.push
(_aW_.toString(),caml_js_html_escape(n_lh_),_aX_.toString());
return 0;});
a_le_.push(_aS_.toString());
return doc_lc_.createElement(a_le_.join(_aR_.toString()));}
var res_li_=createElement_k8_(doc_lc_,elt_lb_);
opt_iter_lg_(_type_k$_,function(t_lj_){return res_li_.type=t_lj_;});
opt_iter_lg_(name_la_,function(n_lk_){return res_li_.name=n_lk_;});
return res_li_;}
function createTextarea_lr_(_type_lo_,name_ln_,doc_lm_)
{return unsafeCreateElementEx_ll_(_type_lo_,name_ln_,doc_lm_,_aZ_);}
function createBr_ls_(doc_lq_)
{return unsafeCreateElement_lp_(doc_lq_,_a0_);}
window.HTMLElement===undefined_kI_;
pause_hook_kr_[1]=
function(param_lt_)
{return 1===param_lt_
?(window_k2_.setTimeout(caml_js_wrap_callback(_kJ_),0),0)
:0;};
function _lw_(x_lu_,f_lv_){return _cz_(f_lv_,x_lu_);}
var Break_lx_=[0,_h_];
function html2wiki_lS_(_opt__ly_,body_lL_)
{_opt__ly_;
var ans_lz_=_dk_(10);
function add_str_lK_(_opt__lA_,s_lC_)
{var surr_lB_=_opt__lA_?_opt__lA_[1]:_ai_,len_lD_=s_lC_.getLen();
try
{var i_lE_=0;
for(;;)
{if(!(len_lD_<=i_lE_))
{if
(92===
s_lC_.safeGet(i_lE_)&&
i_lE_<
(len_lD_-1|0)&&
92===
s_lC_.safeGet(i_lE_+1|0))
{var _lH_=i_lE_+2|0,i_lE_=_lH_;continue;}
if(10===s_lC_.safeGet(i_lE_))
{var _lI_=i_lE_+1|0,i_lE_=_lI_;continue;}
throw [0,Break_lx_,1];}
var _lF_=0,_lG_=_lF_;
break;}}
catch(_lJ_){if(_lJ_[1]!==Break_lx_)throw _lJ_;var _lG_=_lJ_[2];}
return _lG_?_dq_(ans_lz_,_cc_(surr_lB_,_cc_(s_lC_,surr_lB_))):0;}
var
childNodes_lM_=body_lL_.childNodes,
_lN_=0,
_lO_=childNodes_lM_.length-1|0;
if(!(_lO_<_lN_))
{var i_lP_=_lN_;
for(;;)
{var
_mb_=
function(node_lQ_)
{var _lR_=new MlWrappedString(node_lQ_.nodeName);
if(caml_string_notequal(_lR_,_aC_))
{if(caml_string_notequal(_lR_,_aB_))
{if(caml_string_notequal(_lR_,_aA_))
{if(caml_string_notequal(_lR_,_az_))
{if(caml_string_notequal(_lR_,_ay_))
{if
(caml_string_notequal(_lR_,_ax_)&&
caml_string_notequal(_lR_,_aw_)&&
caml_string_notequal(_lR_,_av_))
return caml_string_notequal(_lR_,_au_)
?caml_string_notequal(_lR_,_at_)
?caml_string_notequal(_lR_,_as_)
?_dq_(ans_lz_,_cc_(_aq_,_cc_(_lR_,_ar_)))
:add_str_lK_(0,_cc_(html2wiki_lS_(0,node_lQ_),_ap_))
:add_str_lK_(_ao_,html2wiki_lS_(0,node_lQ_))
:_dq_(ans_lz_,_an_);
var prefix_lT_=_cZ_((_lR_.safeGet(1)-48|0)+1|0,61);
return _dq_
(ans_lz_,
_cc_(prefix_lT_,_cc_(html2wiki_lS_(0,node_lQ_),_aj_)));}
return _dq_(ans_lz_,html2wiki_lS_(0,node_lQ_));}
return _dq_(ans_lz_,_am_);}
return add_str_lK_(_al_,html2wiki_lS_(0,node_lQ_));}
var
x_lV_=_kS_(node_lQ_),
el_lW_=_kL_(x_lV_,function(param_lU_){throw [0,_c_,_aD_];}),
_l6_=
function(s_l2_)
{function _lZ_(_lX_){return new MlWrappedString(_lX_);}
function _l0_(param_lY_){throw [0,_c_,_aP_];}
var
url_l1_=
_lw_(_kL_(el_lW_.getAttribute(_aO_.toString()),_l0_),_lZ_),
_l3_=new MlWrappedString(s_l2_);
if(caml_string_notequal(_l3_,_aN_))
{if(caml_string_notequal(_l3_,_aM_))
return _dq_(ans_lz_,_aL_);
var _l4_=_cz_(_dq_,ans_lz_);
return _lw_(_c2_(_aI_,[0,_aJ_,[0,url_l1_,_aK_]]),_l4_);}
return _dq_
(ans_lz_,
_c2_
(_aE_,
[0,
_aF_,
[0,url_l1_,[0,_aG_,[0,html2wiki_lS_(0,node_lQ_),_aH_]]]]));},
_l7_=function(param_l5_){return _dq_(ans_lz_,_aQ_);};
return _kK_(el_lW_.getAttribute(_ak_.toString()),_l7_,_l6_);}
var
_l__=node_lQ_.nodeValue,
_l$_=function(x_l8_){return [0,x_l8_];},
_ma_=_kK_(_l__,function(param_l9_){return 0;},_l$_);
return _ma_?_dq_(ans_lz_,new MlWrappedString(_ma_[1])):0;};
_kH_(childNodes_lM_.item(i_lP_),_mb_);
var _mc_=i_lP_+1|0;
if(_lO_!==i_lP_){var i_lP_=_mc_;continue;}
break;}}
return _do_(ans_lz_);}
window_k2_.onload=
handler_k1_
(function(param_nB_)
{function _me_(param_md_){throw [0,_c_,_m_];}
var
body_mf_=_kL_(document_k3_.getElementById(_l_.toString()),_me_),
_mg_=unsafeCreateElement_lp_(document_k3_,_a1_);
_mg_.style.border=_k_.toString();
_mg_.src=_j_.toString();
_mg_.id=_i_.toString();
appendChild_k0_(body_mf_,_mg_);
function _nA_(iDoc_mh_)
{iDoc_mh_.open();
iDoc_mh_.write(_S_.toString());
iDoc_mh_.close();
iDoc_mh_.designMode=_R_.toString();
var iWin_mi_=_mg_.contentWindow;
appendChild_k0_(body_mf_,createBr_ls_(document_k3_));
function createButton_ms_(_opt__mj_,_ml_,title_mo_,action_mq_)
{var
show_mk_=_opt__mj_?_opt__mj_[1]:_false_kN_,
value_mm_=_ml_?_ml_[1]:0,
_mn_=
unsafeCreateElementEx_ll_
([0,_T_.toString()],0,document_k3_,_aY_);
_mn_.value=title_mo_.toString();
_mn_.onclick=
handler_k1_
(function(param_mr_)
{iWin_mi_.focus();
var _mp_=value_mm_?_kS_(value_mm_[1].toString()):null_kz_;
iDoc_mh_.execCommand(action_mq_.toString(),show_mk_,_mp_);
return _true_kM_;});
appendChild_k0_(body_mf_,_mn_);
return _mn_;}
createButton_ms_(0,0,_P_,_Q_);
createButton_ms_(0,0,_N_,_O_);
createButton_ms_(0,0,_L_,_M_);
createButton_ms_(0,0,_J_,_K_);
appendChild_k0_(body_mf_,createBr_ls_(document_k3_));
createButton_ms_(0,_G_,_H_,_I_);
createButton_ms_(0,_D_,_E_,_F_);
createButton_ms_(0,_A_,_B_,_C_);
createButton_ms_(0,_x_,_y_,_z_);
var a8a7abff4_mB_=createButton_ms_(0,0,_v_,_w_);
a8a7abff4_mB_.onclick=
handler_k1_
(function(param_mA_)
{function _mu_(_mt_){return new MlWrappedString(_mt_);}
var
link_mw_=
_lw_(iWin_mi_.prompt(_$_.toString(),_aa_.toString()),_mu_);
function _mx_(_mv_){return new MlWrappedString(_mv_);}
var
link_my_=
_c2_
(_V_,
[0,
_W_,
[0,
link_mw_,
[0,
_X_,
[0,
_lw_(iWin_mi_.prompt(_Z_.toString(),___.toString()),_mx_),
_Y_]]]]);
iWin_mi_.alert(link_my_.toString());
var _mz_=_kS_(link_my_.toString());
iDoc_mh_.execCommand(_U_.toString(),_false_kN_,_mz_);
return _true_kM_;});
var a97a41b38_mI_=createButton_ms_(0,0,_t_,_u_);
a97a41b38_mI_.onclick=
handler_k1_
(function(param_mH_)
{function _mD_(_mC_){return new MlWrappedString(_mC_);}
var
link_mE_=
_lw_(iWin_mi_.prompt(_ag_.toString(),_ah_.toString()),_mD_),
link_mF_=
_lw_
([0,_ac_,[0,link_mE_,[0,_ad_,[0,link_mE_,_ae_]]]],
_cz_(_c2_,_af_));
iWin_mi_.alert(link_mF_.toString());
var _mG_=_kS_(link_mF_.toString());
iDoc_mh_.execCommand(_ab_.toString(),_false_kN_,_mG_);
return _true_kM_;});
appendChild_k0_(body_mf_,createBr_ls_(document_k3_));
var preview_mJ_=createTextarea_lr_(0,0,document_k3_);
preview_mJ_.readOnly=_true_kM_;
preview_mJ_.cols=34;
preview_mJ_.rows=10;
preview_mJ_.style.border=_s_.toString();
preview_mJ_.style.padding=_r_.toString();
appendChild_k0_(body_mf_,preview_mJ_);
var wikiFrame_mK_=createTextarea_lr_(0,0,document_k3_);
wikiFrame_mK_.id=_q_.toString();
wikiFrame_mK_.readOnly=_true_kM_;
wikiFrame_mK_.cols=34;
wikiFrame_mK_.rows=10;
preview_mJ_.style.border=_p_.toString();
preview_mJ_.style.padding=_o_.toString();
appendChild_k0_(body_mf_,wikiFrame_mK_);
function dyn_preview_mT_(old_text_mM_,n_mP_)
{var text_mL_=new MlWrappedString(iDoc_mh_.body.innerHTML);
if(caml_string_notequal(text_mL_,old_text_mM_))
{try
{preview_mJ_.value=text_mL_.toString();
wikiFrame_mK_.value=html2wiki_lS_(0,iDoc_mh_.body).toString();}
catch(_mO_){}
var n_mN_=20;}
else
{var
_mQ_=n_mP_-1|0,
_mR_=0,
_mS_=caml_greaterequal(_mR_,_mQ_)?_mR_:_mQ_,
n_mN_=_mS_;}
function _mV_(param_mU_){return dyn_preview_mT_(text_mL_,n_mN_);}
var
_mW_=0===n_mN_?0.5:0.1,
_mX_=[0,[2,[0,1,0,0,0]]],
_mZ_=_mW_*1000,
id_m0_=
window_k2_.setTimeout
(caml_js_wrap_callback
(function(param_mY_){return wakeup_kp_(_mX_,0);}),
_mZ_);
function _m2_(param_m1_){return window_k2_.clearTimeout(id_m0_);}
var _m3_=repr_j1_(_mX_)[1];
switch(_m3_[0])
{case 1:
var
_m4_=
_m3_[1][1]===Canceled_iZ_?(call_unsafe_jU_(_m2_,0),1):0;
break;
case 2:
var
sleeper_m5_=_m3_[1],
handler_m6_=[0,current_data_i0_[1],_m2_],
_m7_=sleeper_m5_[4],
_m8_=typeof _m7_==="number"?handler_m6_:[2,handler_m6_,_m7_];
sleeper_m5_[4]=_m8_;
var _m4_=1;
break;
default:var _m4_=0;}
_m4_;
var t_m9_=repr_j1_(_mX_),_m__=t_m9_[1];
switch(_m__[0])
{case 1:var _m$_=[0,_m__];break;
case 2:
var
sleeper_na_=_m__[1],
_nb_=[0,[2,[0,[0,[0,t_m9_]],0,0,0]]],
data_nd_=current_data_i0_[1],
_nx_=
[1,
function(state_nc_)
{switch(state_nc_[0])
{case 0:
var v_ne_=state_nc_[1];
current_data_i0_[1]=data_nd_;
try
{var _nf_=_mV_(v_ne_),_ng_=_nf_;}
catch(_nh_){var _ng_=[0,[1,_nh_]];}
var
t1_ni_=repr_j1_(_nb_),
t2_nj_=repr_j1_(_ng_),
_nk_=t1_ni_[1];
{if(2===_nk_[0])
{var sleeper1_nl_=_nk_[1];
if(t1_ni_===t2_nj_)
var _nm_=0;
else
{var _nn_=t2_nj_[1];
if(2===_nn_[0])
{var sleeper2_no_=_nn_[1];
t2_nj_[1]=[3,t1_ni_];
sleeper1_nl_[1]=sleeper2_no_[1];
var
waiters_np_=append_kn_(sleeper1_nl_[2],sleeper2_no_[2]),
removed_nq_=sleeper1_nl_[3]+sleeper2_no_[3]|0;
if(max_removed_j0_<removed_nq_)
{sleeper1_nl_[3]=0;
sleeper1_nl_[2]=cleanup_kk_(waiters_np_);}
else
{sleeper1_nl_[3]=removed_nq_;sleeper1_nl_[2]=waiters_np_;}
var
_nr_=sleeper2_no_[4],
_ns_=sleeper1_nl_[4],
_nt_=
typeof _ns_==="number"
?_nr_
:typeof _nr_==="number"?_ns_:[2,_ns_,_nr_];
sleeper1_nl_[4]=_nt_;
var _nm_=0;}
else
{t1_ni_[1]=_nn_;
var _nm_=unsafe_run_waiters_j2_(sleeper1_nl_,_nn_);}}
return _nm_;}
throw [0,_c_,_a4_];}
case 1:
var t_nu_=repr_j1_(_nb_),_nv_=t_nu_[1];
{if(2===_nv_[0])
{var sleeper_nw_=_nv_[1];
t_nu_[1]=state_nc_;
return unsafe_run_waiters_j2_(sleeper_nw_,state_nc_);}
throw [0,_c_,_a5_];}
default:throw [0,_c_,_a7_];}}],
_ny_=sleeper_na_[2],
_nz_=typeof _ny_==="number"?_nx_:[2,_nx_,_ny_];
sleeper_na_[2]=_nz_;
var _m$_=_nb_;
break;
case 3:throw [0,_c_,_a6_];
default:var _m$_=_mV_(_m__[1]);}
return _m$_;}
dyn_preview_mT_(_n_,0);
return 0;}
_kH_(_mg_.contentDocument,_nA_);
return _false_kN_;});
do_at_exit_cq_(0);
return;}
());
distrib
>
Fedora
>
18
>
x86_64
>
media
>
updates
>
by-pkgid
>
3866615ed9f87500bac83f78574eecc8
>
files
>
551
