Skip to content

Commit 6c5c000

Browse files
joshaberjoshaber
committed
Remake the world
Signed-Off-By: Josh Abernathy <joshaber@gmail.com>
1 parent e1921ca commit 6c5c000

Some content is hidden

Large Commits have some content hidden by default. Use the searchbox below for content that may be hidden.

67 files changed

+1784
-3568
lines changed

Diff for: ‎lib/js/arg.js

+43-86
Original file line numberDiff line numberDiff line change
@@ -28,14 +28,12 @@ function assoc3(x, _l) {
2828
var match = l[0];
2929
if (Caml_obj.caml_equal(match[0], x)) {
3030
return match[1];
31-
}
32-
else {
31+
} else {
3332
_l = l[1];
3433
continue ;
3534

3635
}
37-
}
38-
else {
36+
} else {
3937
throw Caml_builtin_exceptions.not_found;
4038
}
4139
};
@@ -46,8 +44,7 @@ function make_symlist(prefix, sep, suffix, l) {
4644
return List.fold_left(function (x, y) {
4745
return x + (sep + y);
4846
}, prefix + l[0], l[1]) + suffix;
49-
}
50-
else {
47+
} else {
5148
return "<none>";
5249
}
5350
}
@@ -75,8 +72,7 @@ function add_help(speclist) {
7572
],
7673
/* [] */0
7774
];
78-
}
79-
else {
75+
} else {
8076
throw exn;
8177
}
8278
}
@@ -95,8 +91,7 @@ function add_help(speclist) {
9591
],
9692
/* [] */0
9793
];
98-
}
99-
else {
94+
} else {
10095
throw exn$1;
10196
}
10297
}
@@ -144,8 +139,7 @@ function usage_b(buf, speclist, errmsg) {
144139
]),
145140
" %s %s%s\n"
146141
]), key, make_symlist("{", "|", "}", spec[0]), doc);
147-
}
148-
else {
142+
} else {
149143
return Curry._2(Printf.bprintf(buf$1, /* Format */[
150144
/* String_literal */Block.__(11, [
151145
" ",
@@ -166,8 +160,7 @@ function usage_b(buf, speclist, errmsg) {
166160
" %s %s\n"
167161
]), key, doc);
168162
}
169-
}
170-
else {
163+
} else {
171164
return 0;
172165
}
173166
}, add_help(speclist));
@@ -298,8 +291,7 @@ function parse_argv_dynamic($staropt$star, argv, speclist, anonfun, errmsg) {
298291
Help,
299292
Buffer.contents(b)
300293
];
301-
}
302-
else {
294+
} else {
303295
throw [
304296
Bad,
305297
Buffer.contents(b)
@@ -317,8 +309,7 @@ function parse_argv_dynamic($staropt$star, argv, speclist, anonfun, errmsg) {
317309
catch (exn){
318310
if (exn === Caml_builtin_exceptions.not_found) {
319311
action = stop(/* Unknown */Block.__(0, [s]));
320-
}
321-
else {
312+
} else {
322313
throw exn;
323314
}
324315
}
@@ -345,18 +336,15 @@ function parse_argv_dynamic($staropt$star, argv, speclist, anonfun, errmsg) {
345336
"a boolean"
346337
])
347338
];
348-
}
349-
else {
339+
} else {
350340
throw exn;
351341
}
352-
}
353-
else {
342+
} else {
354343
throw exn;
355344
}
356345
}
357346
return current$1[0] = current$1[0] + 1 | 0;
358-
}
359-
else {
347+
} else {
360348
throw [
361349
Stop,
362350
/* Missing */Block.__(2, [s])
@@ -373,8 +361,7 @@ function parse_argv_dynamic($staropt$star, argv, speclist, anonfun, errmsg) {
373361
if ((current$1[0] + 1 | 0) < l) {
374362
Curry._1(param[0], argv[current$1[0] + 1 | 0]);
375363
return current$1[0] = current$1[0] + 1 | 0;
376-
}
377-
else {
364+
} else {
378365
throw [
379366
Stop,
380367
/* Missing */Block.__(2, [s])
@@ -385,8 +372,7 @@ function parse_argv_dynamic($staropt$star, argv, speclist, anonfun, errmsg) {
385372
if ((current$1[0] + 1 | 0) < l) {
386373
param[0][0] = argv[current$1[0] + 1 | 0];
387374
return current$1[0] = current$1[0] + 1 | 0;
388-
}
389-
else {
375+
} else {
390376
throw [
391377
Stop,
392378
/* Missing */Block.__(2, [s])
@@ -410,18 +396,15 @@ function parse_argv_dynamic($staropt$star, argv, speclist, anonfun, errmsg) {
410396
"an integer"
411397
])
412398
];
413-
}
414-
else {
399+
} else {
415400
throw exn$1;
416401
}
417-
}
418-
else {
402+
} else {
419403
throw exn$1;
420404
}
421405
}
422406
return current$1[0] = current$1[0] + 1 | 0;
423-
}
424-
else {
407+
} else {
425408
throw [
426409
Stop,
427410
/* Missing */Block.__(2, [s])
@@ -445,18 +428,15 @@ function parse_argv_dynamic($staropt$star, argv, speclist, anonfun, errmsg) {
445428
"an integer"
446429
])
447430
];
448-
}
449-
else {
431+
} else {
450432
throw exn$2;
451433
}
452-
}
453-
else {
434+
} else {
454435
throw exn$2;
455436
}
456437
}
457438
return current$1[0] = current$1[0] + 1 | 0;
458-
}
459-
else {
439+
} else {
460440
throw [
461441
Stop,
462442
/* Missing */Block.__(2, [s])
@@ -480,18 +460,15 @@ function parse_argv_dynamic($staropt$star, argv, speclist, anonfun, errmsg) {
480460
"a float"
481461
])
482462
];
483-
}
484-
else {
463+
} else {
485464
throw exn$3;
486465
}
487-
}
488-
else {
466+
} else {
489467
throw exn$3;
490468
}
491469
}
492470
return current$1[0] = current$1[0] + 1 | 0;
493-
}
494-
else {
471+
} else {
495472
throw [
496473
Stop,
497474
/* Missing */Block.__(2, [s])
@@ -515,18 +492,15 @@ function parse_argv_dynamic($staropt$star, argv, speclist, anonfun, errmsg) {
515492
"a float"
516493
])
517494
];
518-
}
519-
else {
495+
} else {
520496
throw exn$4;
521497
}
522-
}
523-
else {
498+
} else {
524499
throw exn$4;
525500
}
526501
}
527502
return current$1[0] = current$1[0] + 1 | 0;
528-
}
529-
else {
503+
} else {
530504
throw [
531505
Stop,
532506
/* Missing */Block.__(2, [s])
@@ -542,8 +516,7 @@ function parse_argv_dynamic($staropt$star, argv, speclist, anonfun, errmsg) {
542516
if (List.mem(arg$5, symb)) {
543517
Curry._1(param[1], argv[current$1[0] + 1 | 0]);
544518
return current$1[0] = current$1[0] + 1 | 0;
545-
}
546-
else {
519+
} else {
547520
throw [
548521
Stop,
549522
/* Wrong */Block.__(1, [
@@ -553,8 +526,7 @@ function parse_argv_dynamic($staropt$star, argv, speclist, anonfun, errmsg) {
553526
])
554527
];
555528
}
556-
}
557-
else {
529+
} else {
558530
throw [
559531
Stop,
560532
/* Missing */Block.__(2, [s])
@@ -577,25 +549,21 @@ function parse_argv_dynamic($staropt$star, argv, speclist, anonfun, errmsg) {
577549
catch (exn$1){
578550
if (exn$1[0] === Bad) {
579551
stop(/* Message */Block.__(3, [exn$1[1]]));
580-
}
581-
else if (exn$1[0] === Stop) {
552+
} else if (exn$1[0] === Stop) {
582553
stop(exn$1[1]);
583-
}
584-
else {
554+
} else {
585555
throw exn$1;
586556
}
587557
}
588558
current$1[0] = current$1[0] + 1 | 0;
589-
}
590-
else {
559+
} else {
591560
try {
592561
Curry._1(anonfun, s);
593562
}
594563
catch (exn$2){
595564
if (exn$2[0] === Bad) {
596565
stop(/* Message */Block.__(3, [exn$2[1]]));
597-
}
598-
else {
566+
} else {
599567
throw exn$2;
600568
}
601569
}
@@ -624,8 +592,7 @@ function parse(l, f, msg) {
624592
"%s"
625593
]), exn[1]);
626594
return Pervasives.exit(2);
627-
}
628-
else if (exn[0] === Help) {
595+
} else if (exn[0] === Help) {
629596
Curry._1(Printf.printf(/* Format */[
630597
/* String */Block.__(2, [
631598
/* No_padding */0,
@@ -634,8 +601,7 @@ function parse(l, f, msg) {
634601
"%s"
635602
]), exn[1]);
636603
return Pervasives.exit(0);
637-
}
638-
else {
604+
} else {
639605
throw exn;
640606
}
641607
}
@@ -655,8 +621,7 @@ function parse_dynamic(l, f, msg) {
655621
"%s"
656622
]), exn[1]);
657623
return Pervasives.exit(2);
658-
}
659-
else if (exn[0] === Help) {
624+
} else if (exn[0] === Help) {
660625
Curry._1(Printf.printf(/* Format */[
661626
/* String */Block.__(2, [
662627
/* No_padding */0,
@@ -665,8 +630,7 @@ function parse_dynamic(l, f, msg) {
665630
"%s"
666631
]), exn[1]);
667632
return Pervasives.exit(0);
668-
}
669-
else {
633+
} else {
670634
throw exn;
671635
}
672636
}
@@ -680,22 +644,19 @@ function second_word(s) {
680644
var n = _n;
681645
if (n >= len) {
682646
return len;
683-
}
684-
else if (Caml_string.get(s, n) === /* " " */32) {
647+
} else if (Caml_string.get(s, n) === /* " " */32) {
685648
_n = n + 1 | 0;
686649
continue ;
687650

688-
}
689-
else {
651+
} else {
690652
return n;
691653
}
692654
};
693655
}
694656
catch (exn){
695657
if (exn === Caml_builtin_exceptions.not_found) {
696658
return len;
697-
}
698-
else {
659+
} else {
699660
throw exn;
700661
}
701662
}
@@ -705,8 +666,7 @@ function max_arg_len(cur, param) {
705666
var kwd = param[0];
706667
if (param[1].tag === 11) {
707668
return Pervasives.max(cur, kwd.length);
708-
}
709-
else {
669+
} else {
710670
return Pervasives.max(cur, kwd.length + second_word(param[2]) | 0);
711671
}
712672
}
@@ -723,8 +683,7 @@ function align($staropt$star, speclist) {
723683
var kwd = ksd[0];
724684
if (ksd[2] === "") {
725685
return ksd;
726-
}
727-
else if (spec.tag === 11) {
686+
} else if (spec.tag === 11) {
728687
var msg = ksd[2];
729688
var cutcol = second_word(msg);
730689
var n = Pervasives.max(0, len$2 - cutcol | 0) + 3 | 0;
@@ -734,8 +693,7 @@ function align($staropt$star, speclist) {
734693
spec,
735694
"\n" + (spaces + msg)
736695
];
737-
}
738-
else {
696+
} else {
739697
var msg$1 = ksd[2];
740698
var cutcol$1 = second_word(msg$1);
741699
var kwd_len = kwd.length;
@@ -746,8 +704,7 @@ function align($staropt$star, speclist) {
746704
spec,
747705
msg$1
748706
];
749-
}
750-
else {
707+
} else {
751708
var spaces$1 = Caml_string.bytes_to_string(Bytes.make(diff, /* " " */32));
752709
var prefix = $$String.sub(msg$1, 0, cutcol$1);
753710
var suffix = $$String.sub(msg$1, cutcol$1, msg$1.length - cutcol$1 | 0);

0 commit comments

Comments
 (0)