@mattpolzin/harmony 0.6.0 → 1.0.0
This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
- harmony-npm/harmony +641 -483
- harmony-npm/package.json +2 -2
harmony-npm/harmony
CHANGED
|
@@ -307,6 +307,13 @@ const git_remote_uri = (git, remoteName, onSuccess, onFailure) =>
|
|
|
307
307
|
onFailure
|
|
308
308
|
)
|
|
309
309
|
|
|
310
|
+
const git_list_remotes = (git, onSuccess, onFailure) =>
|
|
311
|
+
idris__git_unpromisify(
|
|
312
|
+
git.raw('remote'),
|
|
313
|
+
r => onSuccess(r.trim()),
|
|
314
|
+
onFailure
|
|
315
|
+
)
|
|
316
|
+
|
|
310
317
|
// Get the remote branch that the current local branch is tracking.
|
|
311
318
|
// Executes callback with branch name or empty string when no branch
|
|
312
319
|
// is being tracked.
|
|
@@ -320,6 +327,20 @@ const git_remote_tracking_branch = (git, onSuccess, onFailure) =>
|
|
|
320
327
|
onFailure
|
|
321
328
|
)
|
|
322
329
|
|
|
330
|
+
const git_user_email = (git, onSuccess, onFailure) =>
|
|
331
|
+
idris__git_unpromisify(
|
|
332
|
+
git.raw('config', '--get', 'user.email'),
|
|
333
|
+
r => onSuccess(r.trim()),
|
|
334
|
+
onFailure
|
|
335
|
+
)
|
|
336
|
+
|
|
337
|
+
const git_root_dir = (git, onSuccess, onFailure) =>
|
|
338
|
+
idris__git_unpromisify(
|
|
339
|
+
git.raw('rev-parse', '--show-toplevel'),
|
|
340
|
+
r => onSuccess(r.trim()),
|
|
341
|
+
onFailure
|
|
342
|
+
)
|
|
343
|
+
|
|
323
344
|
|
|
324
345
|
|
|
325
346
|
const { Octokit } = require('octokit')
|
|
@@ -359,7 +380,7 @@ const okit_get_repo_default_branch = (octokit, org, repo, onSuccess, onFailure)
|
|
|
359
380
|
const digTeams = teamsJson =>
|
|
360
381
|
teamsJson.map(t => t.slug)
|
|
361
382
|
|
|
362
|
-
// Executes callback with [String]
|
|
383
|
+
// Executes callback with [String] (string array)
|
|
363
384
|
const okit_list_teams = (octokit, org, onSuccess, onFailure) =>
|
|
364
385
|
idris__okit_unpromisify(
|
|
365
386
|
octokit.rest.teams.list({ org, per_page: 100 }),
|
|
@@ -367,6 +388,14 @@ const okit_list_teams = (octokit, org, onSuccess, onFailure) =>
|
|
|
367
388
|
idris__okit_stringify_error(onFailure)
|
|
368
389
|
)
|
|
369
390
|
|
|
391
|
+
// Executes callback with [String] (string array)
|
|
392
|
+
const okit_list_my_teams = (octokit, onSuccess, onFailure) =>
|
|
393
|
+
idris__okit_unpromisify(
|
|
394
|
+
octokit.rest.teams.listForAuthenticatedUser({per_page: 100}),
|
|
395
|
+
r => onSuccess(newline_delimited(digTeams(r.data))),
|
|
396
|
+
idris__okit_stringify_error(onFailure)
|
|
397
|
+
)
|
|
398
|
+
|
|
370
399
|
// list PRs for branch
|
|
371
400
|
const digPr = pr => {
|
|
372
401
|
return {
|
|
@@ -630,15 +659,19 @@ const FFI_GitHub_prim__listPullReviews = okit_list_pr_reviews;
|
|
|
630
659
|
const FFI_GitHub_prim__listPullRequests = okit_list_pull_requests;
|
|
631
660
|
const FFI_GitHub_prim__listPRsForBranch = okit_list_prs;
|
|
632
661
|
const FFI_GitHub_prim__listOrgMembers = okit_list_org_members;
|
|
662
|
+
const FFI_GitHub_prim__listMyTeams = okit_list_my_teams;
|
|
633
663
|
const FFI_GitHub_prim__getUser = okit_get_user;
|
|
634
664
|
const FFI_GitHub_prim__getSelf = okit_get_self;
|
|
635
665
|
const FFI_GitHub_prim__getRepoDefaultBranch = okit_get_repo_default_branch;
|
|
636
666
|
const FFI_GitHub_prim__createPR = okit_create_pr;
|
|
637
667
|
const FFI_GitHub_prim__createComment = okit_create_comment;
|
|
638
668
|
const FFI_GitHub_prim__addPullReviewers = okit_add_reviewers;
|
|
669
|
+
const FFI_Git_prim__userEmail = git_user_email;
|
|
670
|
+
const FFI_Git_prim__rootDir = git_root_dir;
|
|
639
671
|
const FFI_Git_prim__remoteURI = git_remote_uri;
|
|
640
672
|
const FFI_Git_prim__remoteTrackingBranch = git_remote_tracking_branch;
|
|
641
673
|
const FFI_Git_prim__pushNewBranch = git_push_new_branch;
|
|
674
|
+
const FFI_Git_prim__listRemotes = git_list_remotes;
|
|
642
675
|
const FFI_Git_prim__git = git_git;
|
|
643
676
|
const FFI_Git_prim__currentBranch = git_current_branch;
|
|
644
677
|
const FFI_Git_prim__checkoutBranch = git_checkout_branch;
|
|
@@ -670,30 +703,30 @@ function x24tcOpt_1($0) {
|
|
|
670
703
|
case 0: return {h: 0, a1: $0.a5};
|
|
671
704
|
default: {
|
|
672
705
|
const $18 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
|
|
673
|
-
const $1c = Data_List_DeleteBy_deleteByx27($1f => $20 => Prelude_Basics_on($23 => $24 => $0.a1.a1.a1($23)($24),
|
|
706
|
+
const $1c = Data_List_DeleteBy_deleteByx27($1f => $20 => Prelude_Basics_on($23 => $24 => $0.a1.a1.a1($23)($24), csegen_473(), $1f, $20), $18, $0.a6);
|
|
674
707
|
switch($1c.a1.h) {
|
|
675
708
|
case 0: {
|
|
676
709
|
switch($0.a8) {
|
|
677
|
-
case 0: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2:
|
|
710
|
+
case 0: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2: Reviewer_n__4753_1596_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $1c.a2, $0.a7, $0.a8)}};
|
|
678
711
|
case 1: return {h: 1, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a2, a6: $1c.a2, a7: $0.a7, a8: $0.a8};
|
|
679
712
|
}
|
|
680
713
|
}
|
|
681
|
-
case undefined: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3:
|
|
714
|
+
case undefined: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: Reviewer_n__4780_1748_calc($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a1.a1, $0.a5.a1.a3, $0.a5.a1.a2, $18, $0.a5.a2, $0.a8, $0.a7, $0.a6, $0.a5.a1.a3, $1c.a1.a1.a3)}, a2: Reviewer_n__4753_1596_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $1c.a2, $0.a7, $0.a8)}};
|
|
682
715
|
}
|
|
683
716
|
}
|
|
684
717
|
}
|
|
685
718
|
}
|
|
686
719
|
default: {
|
|
687
720
|
const $6b = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
|
|
688
|
-
const $6f = Data_List_DeleteBy_deleteByx27($72 => $73 => Prelude_Basics_on($76 => $77 => $0.a1.a1.a1($76)($77),
|
|
721
|
+
const $6f = Data_List_DeleteBy_deleteByx27($72 => $73 => Prelude_Basics_on($76 => $77 => $0.a1.a1.a1($76)($77), csegen_473(), $72, $73), $6b, $0.a6);
|
|
689
722
|
switch($6f.a1.h) {
|
|
690
723
|
case 0: {
|
|
691
724
|
switch($0.a8) {
|
|
692
|
-
case 0: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2:
|
|
725
|
+
case 0: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2: Reviewer_n__4753_1596_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $6f.a2, $0.a7, $0.a8)}};
|
|
693
726
|
case 1: return {h: 1, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a2, a6: $6f.a2, a7: $0.a7, a8: $0.a8};
|
|
694
727
|
}
|
|
695
728
|
}
|
|
696
|
-
case undefined: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3:
|
|
729
|
+
case undefined: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: Reviewer_n__4780_1748_calc($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a1.a1, $0.a5.a1.a3, $0.a5.a1.a2, $6b, $0.a5.a2, $0.a8, $0.a7, $0.a6, $0.a5.a1.a3, $6f.a1.a1.a3)}, a2: Reviewer_n__4753_1596_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $6f.a2, $0.a7, $0.a8)}};
|
|
697
730
|
}
|
|
698
731
|
}
|
|
699
732
|
}
|
|
@@ -710,30 +743,30 @@ function x24tcOpt_1($0) {
|
|
|
710
743
|
case 0: return {h: 0, a1: $0.a5};
|
|
711
744
|
default: {
|
|
712
745
|
const $c2 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
|
|
713
|
-
const $c6 = Data_List_DeleteBy_deleteByx27($c9 => $ca => Prelude_Basics_on($cd => $ce => $0.a1.a1.a1($cd)($ce),
|
|
746
|
+
const $c6 = Data_List_DeleteBy_deleteByx27($c9 => $ca => Prelude_Basics_on($cd => $ce => $0.a1.a1.a1($cd)($ce), csegen_473(), $c9, $ca), $c2, $0.a6);
|
|
714
747
|
switch($c6.a1.h) {
|
|
715
748
|
case 0: {
|
|
716
749
|
switch($0.a8) {
|
|
717
|
-
case 0: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2:
|
|
750
|
+
case 0: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2: Reviewer_n__4753_1596_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $c6.a2, $0.a7, $0.a8)}};
|
|
718
751
|
case 1: return {h: 1, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a2, a6: $c6.a2, a7: $0.a7, a8: $0.a8};
|
|
719
752
|
}
|
|
720
753
|
}
|
|
721
|
-
case undefined: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3:
|
|
754
|
+
case undefined: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: Reviewer_n__4780_1748_calc($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a1.a1, $0.a5.a1.a3, $0.a5.a1.a2, $c2, $0.a5.a2, $0.a8, $0.a7, $0.a6, $0.a5.a1.a3, $c6.a1.a1.a3)}, a2: Reviewer_n__4753_1596_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $c6.a2, $0.a7, $0.a8)}};
|
|
722
755
|
}
|
|
723
756
|
}
|
|
724
757
|
}
|
|
725
758
|
}
|
|
726
759
|
default: {
|
|
727
760
|
const $115 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
|
|
728
|
-
const $119 = Data_List_DeleteBy_deleteByx27($11c => $11d => Prelude_Basics_on($120 => $121 => $0.a1.a1.a1($120)($121),
|
|
761
|
+
const $119 = Data_List_DeleteBy_deleteByx27($11c => $11d => Prelude_Basics_on($120 => $121 => $0.a1.a1.a1($120)($121), csegen_473(), $11c, $11d), $115, $0.a6);
|
|
729
762
|
switch($119.a1.h) {
|
|
730
763
|
case 0: {
|
|
731
764
|
switch($0.a8) {
|
|
732
|
-
case 0: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2:
|
|
765
|
+
case 0: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2: Reviewer_n__4753_1596_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $119.a2, $0.a7, $0.a8)}};
|
|
733
766
|
case 1: return {h: 1, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a2, a6: $119.a2, a7: $0.a7, a8: $0.a8};
|
|
734
767
|
}
|
|
735
768
|
}
|
|
736
|
-
case undefined: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3:
|
|
769
|
+
case undefined: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: Reviewer_n__4780_1748_calc($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a1.a1, $0.a5.a1.a3, $0.a5.a1.a2, $115, $0.a5.a2, $0.a8, $0.a7, $0.a6, $0.a5.a1.a3, $119.a1.a1.a3)}, a2: Reviewer_n__4753_1596_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $119.a2, $0.a7, $0.a8)}};
|
|
737
770
|
}
|
|
738
771
|
}
|
|
739
772
|
}
|
|
@@ -741,7 +774,7 @@ function x24tcOpt_1($0) {
|
|
|
741
774
|
}
|
|
742
775
|
}
|
|
743
776
|
|
|
744
|
-
function
|
|
777
|
+
function Reviewer_n__4753_1596_zipReviews($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
745
778
|
return __tailRec(x24tcOpt_1, {h: 1, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4, a6: $5, a7: $6, a8: $7});
|
|
746
779
|
}
|
|
747
780
|
|
|
@@ -1503,6 +1536,10 @@ const csegen_111 = __lazy(function () {
|
|
|
1503
1536
|
return {a1: csegen_94(), a2: $3 => $4 => Prelude_EqOrd_compare_Ord_String($3, $4), a3: $9 => $a => Prelude_EqOrd_x3c_Ord_String($9, $a), a4: $f => $10 => Prelude_EqOrd_x3e_Ord_String($f, $10), a5: $15 => $16 => Prelude_EqOrd_x3cx3d_Ord_String($15, $16), a6: $1b => $1c => Prelude_EqOrd_x3ex3d_Ord_String($1b, $1c), a7: $21 => $22 => Prelude_EqOrd_max_Ord_String($21, $22), a8: $27 => $28 => Prelude_EqOrd_min_Ord_String($27, $28)};
|
|
1504
1537
|
});
|
|
1505
1538
|
|
|
1539
|
+
const csegen_112 = __lazy(function () {
|
|
1540
|
+
return $0 => Data_List_sort(csegen_111(), $0);
|
|
1541
|
+
});
|
|
1542
|
+
|
|
1506
1543
|
const csegen_113 = __lazy(function () {
|
|
1507
1544
|
return $0 => $1 => $2 => FFI_Concurrency_promiseAll(csegen_77(), $0, $1, $2);
|
|
1508
1545
|
});
|
|
@@ -1531,139 +1568,139 @@ const csegen_141 = __lazy(function () {
|
|
|
1531
1568
|
return $0 => $1 => Data_Date_compare_Ord_Date($0, $1);
|
|
1532
1569
|
});
|
|
1533
1570
|
|
|
1534
|
-
const csegen_156 = __lazy(function () {
|
|
1535
|
-
return $0 => $0.a2;
|
|
1536
|
-
});
|
|
1537
|
-
|
|
1538
1571
|
const csegen_159 = __lazy(function () {
|
|
1539
|
-
return $0 => $0.a1;
|
|
1540
|
-
});
|
|
1541
|
-
|
|
1542
|
-
const csegen_164 = __lazy(function () {
|
|
1543
|
-
return $0 => $1 => Prelude_Types_max_Ord_Nat($0, $1);
|
|
1544
|
-
});
|
|
1545
|
-
|
|
1546
|
-
const csegen_166 = __lazy(function () {
|
|
1547
|
-
return date => Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('earliest:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_Date_show_Show_Date(date)), a2: {h: 0}}}));
|
|
1548
|
-
});
|
|
1549
|
-
|
|
1550
|
-
const csegen_190 = __lazy(function () {
|
|
1551
1572
|
return {a1: {a1: b => a => func => $2 => Control_Monad_ST_map_Functor_x28STx20x24sx29(func, $2), a2: a => $7 => $8 => $7, a3: b => a => $a => $b => $c => Control_Monad_ST_x3cx2ax3e_Applicative_x28STx20x24sx29($a, $b, $c)}, a2: b => a => $12 => $13 => $14 => Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($12, $13, $14), a3: a => $1a => $1b => Control_Monad_ST_join_Monad_x28STx20x24sx29($1a, $1b)};
|
|
1552
1573
|
});
|
|
1553
1574
|
|
|
1554
|
-
const
|
|
1575
|
+
const csegen_172 = __lazy(function () {
|
|
1555
1576
|
return $0 => $1 => Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29($0, $1);
|
|
1556
1577
|
});
|
|
1557
1578
|
|
|
1558
|
-
const
|
|
1579
|
+
const csegen_176 = __lazy(function () {
|
|
1559
1580
|
return {a1: $1 => $2 => Prelude_EqOrd_x3dx3d_Eq_Char($1, $2), a2: $7 => $8 => Prelude_EqOrd_x2fx3d_Eq_Char($7, $8)};
|
|
1560
1581
|
});
|
|
1561
1582
|
|
|
1562
|
-
const
|
|
1583
|
+
const csegen_192 = __lazy(function () {
|
|
1563
1584
|
return $0 => $1 => ({a1: $0, a2: $1});
|
|
1564
1585
|
});
|
|
1565
1586
|
|
|
1566
|
-
const
|
|
1587
|
+
const csegen_193 = __lazy(function () {
|
|
1567
1588
|
return $0 => $1 => $2 => $0($1($2));
|
|
1568
1589
|
});
|
|
1569
1590
|
|
|
1570
|
-
const
|
|
1591
|
+
const csegen_246 = __lazy(function () {
|
|
1571
1592
|
return b => a => $0 => $1 => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($0, $1);
|
|
1572
1593
|
});
|
|
1573
1594
|
|
|
1574
|
-
const
|
|
1595
|
+
const csegen_247 = __lazy(function () {
|
|
1575
1596
|
return a => $0 => Prelude_Types_join_Monad_x28Eitherx20x24ex29($0);
|
|
1576
1597
|
});
|
|
1577
1598
|
|
|
1578
|
-
const
|
|
1599
|
+
const csegen_248 = __lazy(function () {
|
|
1579
1600
|
return $0 => Data_Either_maybeToEither(() => 'Failed to parse JSON', Language_JSON_parse($0));
|
|
1580
1601
|
});
|
|
1581
1602
|
|
|
1582
|
-
const
|
|
1603
|
+
const csegen_251 = __lazy(function () {
|
|
1583
1604
|
return b => a => func => $0 => Text_Bounded_map_Functor_WithBounds(func, $0);
|
|
1584
1605
|
});
|
|
1585
1606
|
|
|
1586
|
-
const
|
|
1607
|
+
const csegen_262 = __lazy(function () {
|
|
1587
1608
|
return {a1: {a1: $2 => $3 => Prelude_EqOrd_x3dx3d_Eq_Int($2, $3), a2: $8 => $9 => Prelude_EqOrd_x2fx3d_Eq_Int($8, $9)}, a2: $e => $f => Prelude_EqOrd_compare_Ord_Int($e, $f), a3: $14 => $15 => Prelude_EqOrd_x3c_Ord_Int($14, $15), a4: $1a => $1b => Prelude_EqOrd_x3e_Ord_Int($1a, $1b), a5: $20 => $21 => Prelude_EqOrd_x3cx3d_Ord_Int($20, $21), a6: $26 => $27 => Prelude_EqOrd_x3ex3d_Ord_Int($26, $27), a7: $2c => $2d => Prelude_EqOrd_max_Ord_Int($2c, $2d), a8: $32 => $33 => Prelude_EqOrd_min_Ord_Int($32, $33)};
|
|
1588
1609
|
});
|
|
1589
1610
|
|
|
1590
|
-
const
|
|
1611
|
+
const csegen_270 = __lazy(function () {
|
|
1591
1612
|
return {a1: $1 => Language_JSON_Tokens_TokType_TokenKind_JSONTokenKind($1), a2: kind => $5 => Language_JSON_Tokens_tokValue_TokenKind_JSONTokenKind(kind, $5)};
|
|
1592
1613
|
});
|
|
1593
1614
|
|
|
1594
|
-
const
|
|
1615
|
+
const csegen_273 = __lazy(function () {
|
|
1595
1616
|
return {a1: $1 => $2 => Language_JSON_Tokens_x3dx3d_Eq_JSONTokenKind($1, $2), a2: $7 => $8 => Language_JSON_Tokens_x2fx3d_Eq_JSONTokenKind($7, $8)};
|
|
1596
1617
|
});
|
|
1597
1618
|
|
|
1598
|
-
const
|
|
1619
|
+
const csegen_309 = __lazy(function () {
|
|
1599
1620
|
return {a1: $1 => Language_JSON_String_Tokens_TokType_TokenKind_JSONStringTokenKind($1), a2: kind => $5 => Language_JSON_String_Tokens_tokValue_TokenKind_JSONStringTokenKind(kind, $5)};
|
|
1600
1621
|
});
|
|
1601
1622
|
|
|
1602
|
-
const
|
|
1623
|
+
const csegen_312 = __lazy(function () {
|
|
1603
1624
|
return {a1: $1 => $2 => Language_JSON_String_Tokens_x3dx3d_Eq_JSONStringTokenKind($1, $2), a2: $7 => $8 => Language_JSON_String_Tokens_x2fx3d_Eq_JSONStringTokenKind($7, $8)};
|
|
1604
1625
|
});
|
|
1605
1626
|
|
|
1606
|
-
const
|
|
1627
|
+
const csegen_328 = __lazy(function () {
|
|
1607
1628
|
return $0 => $1 => $2 => $3 => Text_Bounded_map_Functor_WithBounds($2, $3);
|
|
1608
1629
|
});
|
|
1609
1630
|
|
|
1610
|
-
const
|
|
1631
|
+
const csegen_330 = __lazy(function () {
|
|
1611
1632
|
return {a1: {a1: 'End of input', a2: {h: 0}}, a2: {h: 0}};
|
|
1612
1633
|
});
|
|
1613
1634
|
|
|
1614
|
-
const
|
|
1615
|
-
return $0 =>
|
|
1635
|
+
const csegen_382 = __lazy(function () {
|
|
1636
|
+
return $0 => $0.a2;
|
|
1637
|
+
});
|
|
1638
|
+
|
|
1639
|
+
const csegen_385 = __lazy(function () {
|
|
1640
|
+
return $0 => $0.a1;
|
|
1641
|
+
});
|
|
1642
|
+
|
|
1643
|
+
const csegen_390 = __lazy(function () {
|
|
1644
|
+
return $0 => $1 => Prelude_Types_max_Ord_Nat($0, $1);
|
|
1645
|
+
});
|
|
1646
|
+
|
|
1647
|
+
const csegen_392 = __lazy(function () {
|
|
1648
|
+
return date => Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('earliest:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_Date_show_Show_Date(date)), a2: {h: 0}}}));
|
|
1616
1649
|
});
|
|
1617
1650
|
|
|
1618
1651
|
const csegen_404 = __lazy(function () {
|
|
1652
|
+
return $0 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($0));
|
|
1653
|
+
});
|
|
1654
|
+
|
|
1655
|
+
const csegen_406 = __lazy(function () {
|
|
1619
1656
|
return Prelude_IO_getLine(csegen_21());
|
|
1620
1657
|
});
|
|
1621
1658
|
|
|
1622
|
-
const
|
|
1659
|
+
const csegen_436 = __lazy(function () {
|
|
1623
1660
|
return $0 => Language_JSON_Accessors_array($3 => Data_PullRequest_parsePR($3), $0);
|
|
1624
1661
|
});
|
|
1625
1662
|
|
|
1626
|
-
const
|
|
1663
|
+
const csegen_456 = __lazy(function () {
|
|
1627
1664
|
return {a1: acc => elem => func => init => input => Prelude_Types_foldr_Foldable_x28Eitherx20x24ex29(func, init, input), a2: elem => acc => func => init => input => Prelude_Types_foldl_Foldable_x28Eitherx20x24ex29(func, init, input), a3: elem => $b => Prelude_Types_null_Foldable_x28Eitherx20x24ex29($b), a4: elem => acc => m => $f => funcM => init => input => Prelude_Types_foldlM_Foldable_x28Eitherx20x24ex29($f, funcM, init, input), a5: elem => $16 => Prelude_Types_toList_Foldable_x28Eitherx20x24ex29($16), a6: a => m => $1a => f => $1b => Prelude_Types_foldMap_Foldable_x28Eitherx20x24ex29($1a, f, $1b)};
|
|
1628
1665
|
});
|
|
1629
1666
|
|
|
1630
|
-
const
|
|
1667
|
+
const csegen_460 = __lazy(function () {
|
|
1631
1668
|
return b => a => f => $0 => $1 => $2 => Prelude_Types_traverse_Traversable_x28Eitherx20x24ex29($0, $1, $2);
|
|
1632
1669
|
});
|
|
1633
1670
|
|
|
1634
|
-
const
|
|
1671
|
+
const csegen_473 = __lazy(function () {
|
|
1635
1672
|
return $0 => $0.a1;
|
|
1636
1673
|
});
|
|
1637
1674
|
|
|
1638
|
-
const
|
|
1675
|
+
const csegen_481 = __lazy(function () {
|
|
1639
1676
|
return $0 => $1 => $2 => Data_Promise_either(csegen_115(), Data_PullRequest_parsePullRequestsString($0), $1, $2);
|
|
1640
1677
|
});
|
|
1641
1678
|
|
|
1642
|
-
const
|
|
1679
|
+
const csegen_482 = __lazy(function () {
|
|
1643
1680
|
return $0 => $1 => $2 => Data_Promise_either(csegen_115(), Data_User_parseUserString($0), $1, $2);
|
|
1644
1681
|
});
|
|
1645
1682
|
|
|
1646
|
-
const
|
|
1683
|
+
const csegen_515 = __lazy(function () {
|
|
1647
1684
|
return {a1: $1 => $2 => _add32s($1, $2), a2: $6 => $7 => _mul32s($6, $7), a3: $b => Number(_truncBigInt32($b))};
|
|
1648
1685
|
});
|
|
1649
1686
|
|
|
1650
|
-
const
|
|
1687
|
+
const csegen_530 = __lazy(function () {
|
|
1651
1688
|
return $0 => $0.a2;
|
|
1652
1689
|
});
|
|
1653
1690
|
|
|
1654
|
-
const
|
|
1691
|
+
const csegen_534 = __lazy(function () {
|
|
1655
1692
|
return $0 => $0.a1;
|
|
1656
1693
|
});
|
|
1657
1694
|
|
|
1658
|
-
const
|
|
1695
|
+
const csegen_537 = __lazy(function () {
|
|
1659
1696
|
return Prelude_Interfaces_x3cx24x3e(csegen_103(), $4 => Prelude_Cast_cast_Cast_Integer_Bits32($4), System_time(csegen_21()));
|
|
1660
1697
|
});
|
|
1661
1698
|
|
|
1662
|
-
const
|
|
1699
|
+
const csegen_541 = __lazy(function () {
|
|
1663
1700
|
return {a1: csegen_21(), a2: {a1: x => Data_Config_show_Show_Config(x), a2: d => x => Data_Config_showPrec_Show_Config(d, x)}};
|
|
1664
1701
|
});
|
|
1665
1702
|
|
|
1666
|
-
const
|
|
1703
|
+
const csegen_571 = __lazy(function () {
|
|
1667
1704
|
return {a1: {a1: '--checkout', a2: {a1: '-c', a2: {h: 0}}}};
|
|
1668
1705
|
});
|
|
1669
1706
|
|
|
@@ -1679,7 +1716,7 @@ function prim__mul_Integer($0, $1) {
|
|
|
1679
1716
|
return ($0*$1);
|
|
1680
1717
|
}
|
|
1681
1718
|
|
|
1682
|
-
function
|
|
1719
|
+
function Main_case__contribute_2186($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a) {
|
|
1683
1720
|
const $c = Data_List_headx27(Data_List_drop($6, Prelude_Types_List_tailRecAppend($a.a1, $a.a2)));
|
|
1684
1721
|
switch($c.h) {
|
|
1685
1722
|
case 0: return $16 => $17 => Data_Promise_reject('No open PRs to review!', $16, $17);
|
|
@@ -1696,16 +1733,16 @@ function Main_case__contribute_3129($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a)
|
|
|
1696
1733
|
}
|
|
1697
1734
|
}
|
|
1698
1735
|
|
|
1699
|
-
function
|
|
1736
|
+
function Main_n__6430_1831_putNameLn($0, $1, $2, $3) {
|
|
1700
1737
|
return Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_fillBreak(15, Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($3.a1))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines('-'), a2: {h: 0}}), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($3.a2), a2: {h: 0}}}});
|
|
1701
1738
|
}
|
|
1702
1739
|
|
|
1703
|
-
function
|
|
1740
|
+
function Main_n__6298_1721_partitionedArgs($0, $1, $2, $3, $4) {
|
|
1704
1741
|
const $5 = Data_List_partition($8 => Data_String_isPrefixOf('+', $8), $4);
|
|
1705
1742
|
return {a1: Prelude_Types_map_Functor_List($11 => Data_String_Extra_drop(1n, $11), $5.a1), a2: $5.a2};
|
|
1706
1743
|
}
|
|
1707
1744
|
|
|
1708
|
-
function
|
|
1745
|
+
function Main_n__6978_2384_parseSkipArg($0, $1) {
|
|
1709
1746
|
const $2 = Prelude_Types_fastUnpack($1);
|
|
1710
1747
|
switch($2.h) {
|
|
1711
1748
|
case undefined: {
|
|
@@ -1718,15 +1755,15 @@ function Main_n__6932_3327_parseSkipArg($0, $1) {
|
|
|
1718
1755
|
}
|
|
1719
1756
|
}
|
|
1720
1757
|
|
|
1721
|
-
function
|
|
1758
|
+
function Main_n__7177_2644_parsePg($0, $1, $2, $3, $4, $5) {
|
|
1722
1759
|
return Data_String_parsePositive(csegen_30(), $5);
|
|
1723
1760
|
}
|
|
1724
1761
|
|
|
1725
|
-
function
|
|
1762
|
+
function Main_n__7177_2643_parseLim($0, $1, $2, $3, $4) {
|
|
1726
1763
|
return Prelude_Interfaces_x3cx3dx3c(csegen_42(), x => Data_Fin_natToFin(x, Prelude_Types_prim__integerToNat(101n)), $f => Data_String_parsePositive(csegen_30(), $f));
|
|
1727
1764
|
}
|
|
1728
1765
|
|
|
1729
|
-
function
|
|
1766
|
+
function Main_n__6978_2383_parseCheckoutArg($0, $1) {
|
|
1730
1767
|
switch($1) {
|
|
1731
1768
|
case '-c': return {a1: {h: 0}};
|
|
1732
1769
|
case '--checkout': return {a1: {h: 0}};
|
|
@@ -1734,18 +1771,11 @@ function Main_n__6932_3326_parseCheckoutArg($0, $1) {
|
|
|
1734
1771
|
}
|
|
1735
1772
|
}
|
|
1736
1773
|
|
|
1737
|
-
function
|
|
1738
|
-
switch(Data_Config_rf__colors($2)) {
|
|
1739
|
-
case 1: return $3;
|
|
1740
|
-
case 0: return Text_PrettyPrint_Prettyprinter_Doc_unAnnotate($3);
|
|
1741
|
-
}
|
|
1742
|
-
}
|
|
1743
|
-
|
|
1744
|
-
function Main_n__6348_2730_forkedUser($0, $1, $2, $3) {
|
|
1774
|
+
function Main_n__6430_1830_forkedUser($0, $1, $2, $3) {
|
|
1745
1775
|
return FFI_Concurrency_fork(csegen_21(), ('user --json '+$3));
|
|
1746
1776
|
}
|
|
1747
1777
|
|
|
1748
|
-
function
|
|
1778
|
+
function Main_n__6168_1583_configuredOpts($0, $1, $2) {
|
|
1749
1779
|
const $10 = $11 => {
|
|
1750
1780
|
switch($11.h) {
|
|
1751
1781
|
case 1: return $0.a1.a1.a2(undefined)(BashCompletion_opts($11.a1, $2, $1));
|
|
@@ -1806,7 +1836,7 @@ function Main_parseContributeArgs($0) {
|
|
|
1806
1836
|
switch($0.a2.a2.h) {
|
|
1807
1837
|
case undefined: return {h: 0, a1: 'contribute\'s arguments must be either -<num> to skip num PRs or --checkout (-c) to checkout the branch needing review.'};
|
|
1808
1838
|
default: {
|
|
1809
|
-
const $6 = Prelude_Types_traverse_Traversable_List(csegen_37(), $b => Main_x3cx7cx7cx3e(csegen_80(), $10 =>
|
|
1839
|
+
const $6 = Prelude_Types_traverse_Traversable_List(csegen_37(), $b => Main_x3cx7cx7cx3e(csegen_80(), $10 => Main_n__6978_2384_parseSkipArg($0, $10), $15 => Main_n__6978_2383_parseCheckoutArg($0, $15), $b), $0);
|
|
1810
1840
|
switch($6.h) {
|
|
1811
1841
|
case undefined: return {h: 1, a1: $6.a1};
|
|
1812
1842
|
case 0: return {h: 0, a1: 'contribute\'s arguments must be either -<num> to skip num PRs or --checkout (-c) to checkout the branch needing review.'};
|
|
@@ -1815,7 +1845,7 @@ function Main_parseContributeArgs($0) {
|
|
|
1815
1845
|
}
|
|
1816
1846
|
}
|
|
1817
1847
|
default: {
|
|
1818
|
-
const $1d = Prelude_Types_traverse_Traversable_List(csegen_37(), $22 => Main_x3cx7cx7cx3e(csegen_80(), $27 =>
|
|
1848
|
+
const $1d = Prelude_Types_traverse_Traversable_List(csegen_37(), $22 => Main_x3cx7cx7cx3e(csegen_80(), $27 => Main_n__6978_2384_parseSkipArg($0, $27), $2c => Main_n__6978_2383_parseCheckoutArg($0, $2c), $22), $0);
|
|
1819
1849
|
switch($1d.h) {
|
|
1820
1850
|
case undefined: return {h: 1, a1: $1d.a1};
|
|
1821
1851
|
case 0: return {h: 0, a1: 'contribute\'s arguments must be either -<num> to skip num PRs or --checkout (-c) to checkout the branch needing review.'};
|
|
@@ -1824,7 +1854,7 @@ function Main_parseContributeArgs($0) {
|
|
|
1824
1854
|
}
|
|
1825
1855
|
}
|
|
1826
1856
|
default: {
|
|
1827
|
-
const $34 = Prelude_Types_traverse_Traversable_List(csegen_37(), $39 => Main_x3cx7cx7cx3e(csegen_80(), $3e =>
|
|
1857
|
+
const $34 = Prelude_Types_traverse_Traversable_List(csegen_37(), $39 => Main_x3cx7cx7cx3e(csegen_80(), $3e => Main_n__6978_2384_parseSkipArg($0, $3e), $43 => Main_n__6978_2383_parseCheckoutArg($0, $43), $39), $0);
|
|
1828
1858
|
switch($34.h) {
|
|
1829
1859
|
case undefined: return {h: 1, a1: $34.a1};
|
|
1830
1860
|
case 0: return {h: 0, a1: 'contribute\'s arguments must be either -<num> to skip num PRs or --checkout (-c) to checkout the branch needing review.'};
|
|
@@ -1879,7 +1909,7 @@ function Main_main($0) {
|
|
|
1879
1909
|
}
|
|
1880
1910
|
|
|
1881
1911
|
function Main_listTeam($0, $1, $2, $3, $4) {
|
|
1882
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(),
|
|
1912
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), csegen_112(), FFI_GitHub_listTeamMembers($1, $0.a2, $2)), teamMemberLogins => $13 => $14 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_15(), csegen_113(), Prelude_Types_traverse_Traversable_List(csegen_9(), $21 => Main_n__6430_1830_forkedUser($1, $2, $0, $21), teamMemberLogins)), teamMembersJson => $29 => $2a => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_traverse_Traversable_List(csegen_9(), $31 => $32 => $33 => Data_Promise_either(csegen_115(), Data_User_parseUser($31), $32, $33), teamMembersJson), teamMembers => Util_renderIO($0, csegen_21(), Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Interfaces_x3cx24x3e(csegen_119(), $49 => Main_n__6430_1831_putNameLn($1, $2, $0, $49), teamMembers))), $29, $2a), $13, $14), $3, $4);
|
|
1883
1913
|
}
|
|
1884
1914
|
|
|
1885
1915
|
function Main_handleConfiguredArgs($0, $1, $2, $3) {
|
|
@@ -1929,7 +1959,7 @@ function Main_handleConfiguredArgs($0, $1, $2, $3) {
|
|
|
1929
1959
|
case undefined: {
|
|
1930
1960
|
switch($3.a2.a2.a2.a2.h) {
|
|
1931
1961
|
case 0: {
|
|
1932
|
-
const $8d = Prelude_Types_x3cx2ax3e_Applicative_Maybe(Prelude_Types_x3cx2ax3e_Applicative_Maybe({a1: $93 => $94 => ({a1: $93, a2: $94})},
|
|
1962
|
+
const $8d = Prelude_Types_x3cx2ax3e_Applicative_Maybe(Prelude_Types_x3cx2ax3e_Applicative_Maybe({a1: $93 => $94 => ({a1: $93, a2: $94})}, Main_n__7177_2643_parseLim($1, $2, $3.a2.a2.a1, $3.a2.a2.a2.a1, $0)($3.a2.a2.a1)), Main_n__7177_2644_parsePg($1, $2, $3.a2.a2.a1, $3.a2.a2.a2.a1, $0, $3.a2.a2.a2.a1));
|
|
1933
1963
|
return $a8 => $a9 => {
|
|
1934
1964
|
switch($8d.h) {
|
|
1935
1965
|
case undefined: return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listPullRequestsJsonStr($2, $0.a2, $0.a3, {h: 0}, $8d.a1.a1, $8d.a1.a2), pullsJsonStr => Prelude_IO_putStr(csegen_21(), pullsJsonStr), $a8, $a9);
|
|
@@ -1977,131 +2007,139 @@ function Main_handleConfiguredArgs($0, $1, $2, $3) {
|
|
|
1977
2007
|
default: return $18e => $18f => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $18e, $18f);
|
|
1978
2008
|
}
|
|
1979
2009
|
}
|
|
1980
|
-
case '
|
|
2010
|
+
case 'whoami': {
|
|
1981
2011
|
return $1a4 => $1a5 => {
|
|
1982
2012
|
switch($3.a2.h) {
|
|
1983
|
-
case 0: return
|
|
2013
|
+
case 0: return User_Me_printInfoOnSelf($0, $2, $1, $1a4, $1a5);
|
|
1984
2014
|
default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $1a4, $1a5);
|
|
1985
2015
|
}
|
|
1986
2016
|
};
|
|
1987
2017
|
}
|
|
2018
|
+
case 'sync': {
|
|
2019
|
+
return $1c1 => $1c2 => {
|
|
2020
|
+
switch($3.a2.h) {
|
|
2021
|
+
case 0: return Data_Promise_map_Functor_Promise($1c6 => (undefined), $1c8 => $1c9 => Config_syncConfig($0, $2, 1, $1c8, $1c9), $1c1, $1c2);
|
|
2022
|
+
default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $1c1, $1c2);
|
|
2023
|
+
}
|
|
2024
|
+
};
|
|
2025
|
+
}
|
|
1988
2026
|
case 'branch': {
|
|
1989
|
-
return $
|
|
2027
|
+
return $1e6 => {
|
|
1990
2028
|
switch($3.a2.h) {
|
|
1991
|
-
case 0: return $
|
|
1992
|
-
default: return $
|
|
2029
|
+
case 0: return $1e8 => Main_printCurrentBranchURI($0, $1, $1e6, $1e8);
|
|
2030
|
+
default: return $1ee => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $1e6, $1ee);
|
|
1993
2031
|
}
|
|
1994
2032
|
};
|
|
1995
2033
|
}
|
|
1996
2034
|
case 'pr': {
|
|
1997
|
-
return $
|
|
2035
|
+
return $203 => $204 => {
|
|
1998
2036
|
switch($3.a2.h) {
|
|
1999
2037
|
case 0: {
|
|
2000
|
-
const $
|
|
2001
|
-
switch($
|
|
2038
|
+
const $21f = $220 => {
|
|
2039
|
+
switch($220.h) {
|
|
2002
2040
|
case undefined: {
|
|
2003
|
-
switch($
|
|
2004
|
-
case 0: return Prelude_IO_putStrLn(csegen_21(), Data_PullRequest_rf__webURI($0, $
|
|
2041
|
+
switch($220.a1) {
|
|
2042
|
+
case 0: return Prelude_IO_putStrLn(csegen_21(), Data_PullRequest_rf__webURI($0, $220.a2));
|
|
2005
2043
|
default: return csegen_128();
|
|
2006
2044
|
}
|
|
2007
2045
|
}
|
|
2008
2046
|
default: return csegen_128();
|
|
2009
2047
|
}
|
|
2010
2048
|
};
|
|
2011
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise($
|
|
2049
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise($208 => $209 => Data_Promise_x3ex3ex3d_Monad_Promise($20c => $20d => FFI_Git_currentBranch($1, $20c, $20d), $213 => $214 => $215 => PullRequest_identifyOrCreatePR($0, $1, $2, $213, $214, $215), $208, $209), $21f, $203, $204);
|
|
2012
2050
|
}
|
|
2013
|
-
default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $
|
|
2051
|
+
default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $203, $204);
|
|
2014
2052
|
}
|
|
2015
2053
|
};
|
|
2016
2054
|
}
|
|
2017
2055
|
case 'reflect': {
|
|
2018
|
-
return $
|
|
2056
|
+
return $242 => $243 => {
|
|
2019
2057
|
switch($3.a2.h) {
|
|
2020
|
-
case 0: return User_Reflect_reflectOnSelf($0, $2, $
|
|
2021
|
-
default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $
|
|
2058
|
+
case 0: return User_Reflect_reflectOnSelf($0, $2, $242, $243);
|
|
2059
|
+
default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $242, $243);
|
|
2022
2060
|
}
|
|
2023
2061
|
};
|
|
2024
2062
|
}
|
|
2025
2063
|
case 'config': {
|
|
2026
2064
|
switch($3.a2.h) {
|
|
2027
2065
|
case undefined: {
|
|
2028
|
-
return $
|
|
2066
|
+
return $25f => {
|
|
2029
2067
|
switch($3.a2.a2.h) {
|
|
2030
|
-
case 0: return $
|
|
2068
|
+
case 0: return $261 => Data_Promise_x3ex3ex3d_Monad_Promise($264 => Config_getConfig($0, $3.a2.a1, $264), value => Prelude_IO_putStrLn(csegen_21(), value), $25f, $261);
|
|
2031
2069
|
case undefined: {
|
|
2032
|
-
return $
|
|
2070
|
+
return $270 => {
|
|
2033
2071
|
switch($3.a2.a2.a2.h) {
|
|
2034
|
-
case 0: return Data_Promise_map_Functor_Promise($
|
|
2035
|
-
default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $
|
|
2072
|
+
case 0: return Data_Promise_map_Functor_Promise($274 => (undefined), Config_setConfig($0, $3.a2.a1, $3.a2.a2.a1), $25f, $270);
|
|
2073
|
+
default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $25f, $270);
|
|
2036
2074
|
}
|
|
2037
2075
|
};
|
|
2038
2076
|
}
|
|
2039
|
-
default: return $
|
|
2077
|
+
default: return $290 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $25f, $290);
|
|
2040
2078
|
}
|
|
2041
2079
|
};
|
|
2042
2080
|
}
|
|
2043
|
-
default: return $
|
|
2081
|
+
default: return $2a5 => $2a6 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $2a5, $2a6);
|
|
2044
2082
|
}
|
|
2045
2083
|
}
|
|
2046
2084
|
case 'contribute': {
|
|
2047
|
-
const $
|
|
2048
|
-
switch($
|
|
2049
|
-
case 1: return $
|
|
2050
|
-
case 0: return Main_exitError(csegen_21(), $
|
|
2085
|
+
const $2bb = Main_parseContributeArgs($3.a2);
|
|
2086
|
+
switch($2bb.h) {
|
|
2087
|
+
case 1: return $2be => $2bf => Main_contribute($0, $1, $2, $2bb.a1, $2be, $2bf);
|
|
2088
|
+
case 0: return Main_exitError(csegen_21(), $2bb.a1);
|
|
2051
2089
|
}
|
|
2052
2090
|
}
|
|
2053
2091
|
case 'list': {
|
|
2054
2092
|
switch($3.a2.h) {
|
|
2055
|
-
case 0: return $
|
|
2093
|
+
case 0: return $2cc => $2cd => Data_Promise_reject('The list command expects the name of a GitHub Team as an argument.', $2cc, $2cd);
|
|
2056
2094
|
case undefined: {
|
|
2057
|
-
return $
|
|
2095
|
+
return $2d2 => {
|
|
2058
2096
|
switch($3.a2.a2.h) {
|
|
2059
|
-
case 0: return $
|
|
2060
|
-
default: return $
|
|
2097
|
+
case 0: return $2d4 => Main_listTeam($0, $2, $3.a2.a1, $2d2, $2d4);
|
|
2098
|
+
default: return $2db => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $2d2, $2db);
|
|
2061
2099
|
}
|
|
2062
2100
|
};
|
|
2063
2101
|
}
|
|
2064
|
-
default: return $
|
|
2102
|
+
default: return $2f0 => $2f1 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $2f0, $2f1);
|
|
2065
2103
|
}
|
|
2066
2104
|
}
|
|
2067
2105
|
case 'graph': {
|
|
2068
2106
|
switch($3.a2.h) {
|
|
2069
|
-
case 0: return $
|
|
2107
|
+
case 0: return $307 => $308 => Data_Promise_reject('The graph command expects the name of a GitHub Team as an argument.', $307, $308);
|
|
2070
2108
|
case undefined: {
|
|
2071
|
-
return $
|
|
2109
|
+
return $30d => {
|
|
2072
2110
|
switch($3.a2.a2.h) {
|
|
2073
|
-
case 0: return $
|
|
2074
|
-
default: return $
|
|
2111
|
+
case 0: return $30f => Main_graphTeam($0, $2, $3.a2.a1, $30d, $30f);
|
|
2112
|
+
default: return $316 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $30d, $316);
|
|
2075
2113
|
}
|
|
2076
2114
|
};
|
|
2077
2115
|
}
|
|
2078
|
-
default: return $
|
|
2116
|
+
default: return $32b => $32c => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $32b, $32c);
|
|
2079
2117
|
}
|
|
2080
2118
|
}
|
|
2081
2119
|
case 'assign': {
|
|
2082
2120
|
switch($3.a2.h) {
|
|
2083
|
-
case 0: return $
|
|
2121
|
+
case 0: return $342 => $343 => Data_Promise_reject('The assign commaand expects one or more names of GitHub Teams or Users as arguments.', $342, $343);
|
|
2084
2122
|
case undefined: {
|
|
2085
2123
|
switch($3.a2.a1) {
|
|
2086
2124
|
case '--dry': {
|
|
2087
|
-
return $
|
|
2125
|
+
return $349 => {
|
|
2088
2126
|
switch($3.a2.a2.h) {
|
|
2089
|
-
case 0: return $
|
|
2090
|
-
case undefined: return $
|
|
2091
|
-
default: return $
|
|
2127
|
+
case 0: return $34b => Data_Promise_reject('The assign commaand expects one or more names of GitHub Teams or Users as arguments.', $349, $34b);
|
|
2128
|
+
case undefined: return $350 => Main_assign($0, $1, $2, {a1: $3.a2.a2.a1, a2: $3.a2.a2.a2}, 1, $349, $350);
|
|
2129
|
+
default: return $35b => Main_assign($0, $1, $2, {a1: $3.a2.a1, a2: $3.a2.a2}, 0, $349, $35b);
|
|
2092
2130
|
}
|
|
2093
2131
|
};
|
|
2094
2132
|
}
|
|
2095
|
-
default: return $
|
|
2133
|
+
default: return $366 => $367 => Main_assign($0, $1, $2, {a1: $3.a2.a1, a2: $3.a2.a2}, 0, $366, $367);
|
|
2096
2134
|
}
|
|
2097
2135
|
}
|
|
2098
|
-
default: return $
|
|
2136
|
+
default: return $372 => $373 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $372, $373);
|
|
2099
2137
|
}
|
|
2100
2138
|
}
|
|
2101
|
-
default: return $
|
|
2139
|
+
default: return $388 => $389 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $388, $389);
|
|
2102
2140
|
}
|
|
2103
2141
|
}
|
|
2104
|
-
default: return $
|
|
2142
|
+
default: return $39e => $39f => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $39e, $39f);
|
|
2105
2143
|
}
|
|
2106
2144
|
}
|
|
2107
2145
|
|
|
@@ -2139,7 +2177,7 @@ function Main_handleArgs($0, $1, $2, $3, $4) {
|
|
|
2139
2177
|
}
|
|
2140
2178
|
|
|
2141
2179
|
function Main_graphTeam($0, $1, $2, $3, $4) {
|
|
2142
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listTeamMembers($1, $0.a2, $2), teamMemberLogins => $d => $e => Data_Promise_x3ex3ex3d_Monad_Promise($11 => $12 => PullRequest_listReviewers($0, $1, 4n, csegen_134(), $11, $12), $1c =>
|
|
2180
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listTeamMembers($1, $0.a2, $2), teamMemberLogins => $d => $e => Data_Promise_x3ex3ex3d_Monad_Promise($11 => $12 => PullRequest_listReviewers($0, $1, 4n, csegen_134(), $11, $12), $1c => Util_renderIO($0, csegen_21(), Reviewer_reviewsGraph(csegen_111(), {a1: ann => $28 => Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($28), a2: ann => $2c => $2d => Text_PrettyPrint_Prettyprinter_Doc_prettyPrec_Pretty_String($2c, $2d)}, $1c.a2, $1c.a1, teamMemberLogins)), $d, $e), $3, $4);
|
|
2143
2181
|
}
|
|
2144
2182
|
|
|
2145
2183
|
function Main_exitError($0, $1) {
|
|
@@ -2179,7 +2217,7 @@ function Main_contribute($0, $1, $2, $3, $4, $5) {
|
|
|
2179
2217
|
};
|
|
2180
2218
|
const $35 = Prelude_Types_List_filter($37, openPrs);
|
|
2181
2219
|
const $3e = Data_List_partition($41 => Data_PullRequest_isRequestedReviewer(myLogin, $41), $35);
|
|
2182
|
-
return
|
|
2220
|
+
return Main_case__contribute_2186($1, $2, $3, $0, openPrs, myLogin, $21, $2f, $35, $3e, Prelude_Interfaces_mapHom({a1: d => b => c => a => $55 => $56 => $57 => ({a1: $55($57.a1), a2: $56($57.a2)}), a2: b => c => a => $60 => $61 => ({a1: $60($61.a1), a2: $61.a2}), a3: a => d => b => $68 => $69 => ({a1: $69.a1, a2: $68($69.a2)})}, $70 => Data_List_sortBy($73 => $74 => Prelude_Basics_on(csegen_141(), $79 => $79.a2, $73, $74), $70), $3e));
|
|
2183
2221
|
};
|
|
2184
2222
|
return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), csegen_139(), FFI_GitHub_getSelf($2)), $20, $14, $15);
|
|
2185
2223
|
};
|
|
@@ -2187,13 +2225,13 @@ function Main_contribute($0, $1, $2, $3, $4, $5) {
|
|
|
2187
2225
|
}
|
|
2188
2226
|
|
|
2189
2227
|
function Main_bashCompletion($0, $1, $2) {
|
|
2190
|
-
const $3 = Prelude_Types_maybe(() =>
|
|
2228
|
+
const $3 = Prelude_Types_maybe(() => Main_n__6168_1583_configuredOpts($0, $2, $1), () => $b => $0.a1.a1.a2(undefined)($b), BashCompletion_cmdOpts($1, $2));
|
|
2191
2229
|
return $0.a1.a2(undefined)(undefined)($3)($21 => Prelude_IO_putStr($0, Data_String_fastUnlines($21)));
|
|
2192
2230
|
}
|
|
2193
2231
|
|
|
2194
2232
|
function Main_assign($0, $1, $2, $3, $4, $5, $6) {
|
|
2195
2233
|
return Data_Promise_x3ex3ex3d_Monad_Promise($9 => $a => Data_Promise_x3ex3ex3d_Monad_Promise($d => $e => FFI_Git_currentBranch($1, $d, $e), $14 => $15 => $16 => PullRequest_identifyOrCreatePR($0, $1, $2, $14, $15, $16), $9, $a), $21 => $22 => $24 => {
|
|
2196
|
-
const $25 =
|
|
2234
|
+
const $25 = Main_n__6298_1721_partitionedArgs($0, $1, $2, $4, $3);
|
|
2197
2235
|
return PullRequest_requestReviewers($0, $2, $21.a2, $25.a2, $25.a1, $4, $22, $24);
|
|
2198
2236
|
}, $5, $6);
|
|
2199
2237
|
}
|
|
@@ -2202,88 +2240,11 @@ function Main_x3cx7cx7cx3e($0, $1, $2, $3) {
|
|
|
2202
2240
|
return $0.a3(undefined)($1($3))(() => $2($3));
|
|
2203
2241
|
}
|
|
2204
2242
|
|
|
2205
|
-
|
|
2206
|
-
const $b = Prelude_Interfaces_mapHom({a1: d => b => c => a => $f => $10 => $11 => ({a1: $f($11.a1), a2: $10($11.a2)}), a2: b => c => a => $1a => $1b => ({a1: $1a($1b.a1), a2: $1b.a2}), a3: a => d => b => $22 => $23 => ({a1: $23.a1, a2: $22($23.a2)})}, $2a => Data_List_headx27(Data_List_sort({a1: {a1: $31 => $32 => Data_Date_x3dx3d_Eq_Date($31, $32), a2: $37 => $38 => Data_Date_x2fx3d_Eq_Date($37, $38)}, a2: $3d => $3e => Data_Date_compare_Ord_Date($3d, $3e), a3: $43 => $44 => Data_Date_x3c_Ord_Date($43, $44), a4: $49 => $4a => Data_Date_x3e_Ord_Date($49, $4a), a5: $4f => $50 => Data_Date_x3cx3d_Ord_Date($4f, $50), a6: $55 => $56 => Data_Date_x3ex3d_Ord_Date($55, $56), a7: $5b => $5c => Data_Date_max_Ord_Date($5b, $5c), a8: $61 => $62 => Data_Date_min_Ord_Date($61, $62)}, Prelude_Types_map_Functor_List(csegen_156(), $2a))), {a1: $7, a2: $9.a1});
|
|
2207
|
-
return Prelude_IO_putStrLn(csegen_21(), Util_renderString($0, User_Reflect_print(Prelude_Types_String_length(User_Reflect_intro()), Prelude_Types_List_lengthTR($4), Prelude_Types_List_lengthTR($9.a1), Prelude_Types_List_lengthTR($9.a2), Prelude_Types_List_lengthTR($8), Prelude_Types_List_lengthTR($7), $5, $b.a1, $b.a2)));
|
|
2208
|
-
}
|
|
2209
|
-
|
|
2210
|
-
function User_Reflect_n__5315_1432_ital($0, $1) {
|
|
2211
|
-
return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($1));
|
|
2212
|
-
}
|
|
2213
|
-
|
|
2214
|
-
const User_Reflect_rightTitle = __lazy(function () {
|
|
2215
|
-
return 'authored';
|
|
2216
|
-
});
|
|
2217
|
-
|
|
2218
|
-
const User_Reflect_reviewDetailsCount = __lazy(function () {
|
|
2219
|
-
return 25n;
|
|
2220
|
-
});
|
|
2221
|
-
|
|
2222
|
-
function User_replicatex27($0, $1, $2) {
|
|
2223
|
-
return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color($0), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_String_replicate($1, $2)));
|
|
2224
|
-
}
|
|
2225
|
-
|
|
2226
|
-
function User_Reflect_reflectOnSelf($0, $1, $2, $3) {
|
|
2227
|
-
const $c = prs => $d => $e => {
|
|
2228
|
-
const $19 = myLogin => $1a => $1b => {
|
|
2229
|
-
const $37 = reviews => {
|
|
2230
|
-
const $38 = Prelude_Types_map_Functor_Maybe(csegen_159(), Data_List_headx27(Data_List_sortBy($41 => $42 => Prelude_Basics_on(csegen_141(), csegen_159(), $41, $42), reviews)));
|
|
2231
|
-
const $4b = PullRequest_tuple(prs);
|
|
2232
|
-
const $4e = Prelude_Interfaces_mapHom({a1: d => b => c => a => $52 => $53 => $54 => ({a1: $52($54.a1), a2: $53($54.a2)}), a2: b => c => a => $5d => $5e => ({a1: $5d($5e.a1), a2: $5e.a2}), a3: a => d => b => $65 => $66 => ({a1: $66.a1, a2: $65($66.a2)})}, $6d => Prelude_Types_List_filter($70 => Prelude_EqOrd_x3dx3d_Eq_String($70.a3, myLogin), $6d), $4b);
|
|
2233
|
-
return User_Reflect_case__casex20blockx20inx20reflectOnSelf_2238($0, $1, prs, myLogin, reviews, $38, $4b, $4e.a1, $4e.a2, Prelude_Interfaces_mapHom({a1: d => b => c => a => $85 => $86 => $87 => ({a1: $85($87.a1), a2: $86($87.a2)}), a2: b => c => a => $90 => $91 => ({a1: $90($91.a1), a2: $91.a2}), a3: a => d => b => $98 => $99 => ({a1: $99.a1, a2: $98($99.a2)})}, $a0 => Prelude_Types_List_filter($a3 => Prelude_Interfaces_any(csegen_77(), $a8 => Prelude_EqOrd_x3dx3d_Eq_String($a8, myLogin), $a3.a5), $a0), $4b));
|
|
2234
|
-
};
|
|
2235
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_reviewsForUser($0, $1, myLogin, Data_List_take(User_Reflect_reviewDetailsCount(), Prelude_Types_List_reverse(Data_List_sortBy($2b => $2c => Prelude_Basics_on(csegen_141(), csegen_156(), $2b, $2c), PullRequest_combined(prs))))), $37, $1a, $1b);
|
|
2236
|
-
};
|
|
2237
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), csegen_139(), FFI_GitHub_getSelf($1)), $19, $d, $e);
|
|
2238
|
-
};
|
|
2239
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_listPartitionedPRs($0, $1, 4n, User_Reflect_prCount()), $c, $2, $3);
|
|
2240
|
-
}
|
|
2241
|
-
|
|
2242
|
-
function User_Reflect_print($0, $1, $2, $3, $4, $5, $6, $7, $8) {
|
|
2243
|
-
return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Reflect_graph($0, $1, $2, $3, $4, $5), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Reflect_details($0, $1, $2, $3, $4, $5, $6, $7, $8), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}});
|
|
2244
|
-
}
|
|
2245
|
-
|
|
2246
|
-
const User_Reflect_prCount = __lazy(function () {
|
|
2247
|
-
return csegen_134();
|
|
2248
|
-
});
|
|
2249
|
-
|
|
2250
|
-
const User_Reflect_leftTitle = __lazy(function () {
|
|
2251
|
-
return 'requested';
|
|
2252
|
-
});
|
|
2253
|
-
|
|
2254
|
-
const User_Reflect_intro = __lazy(function () {
|
|
2255
|
-
return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Your current pull request summary (out of the past ', a2: {a1: Data_Fin_show_Show_x28Finx20x24nx29(User_Reflect_prCount()), a2: {a1: ' PRs):', a2: {h: 0}}}});
|
|
2256
|
-
});
|
|
2257
|
-
|
|
2258
|
-
function User_Reflect_header($0) {
|
|
2259
|
-
return Text_PrettyPrint_Prettyprinter_Doc_indent(Prelude_Cast_cast_Cast_Nat_Int($0), Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: User_Reflect_n__5315_1432_ital($0, User_Reflect_leftTitle()), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(' '), a2: {a1: User_Reflect_n__5315_1432_ital($0, User_Reflect_rightTitle()), a2: {h: 0}}}}));
|
|
2260
|
-
}
|
|
2261
|
-
|
|
2262
|
-
function User_Reflect_graph($0, $1, $2, $3, $4, $5) {
|
|
2263
|
-
const $6 = ($2+$3);
|
|
2264
|
-
const $9 = ($5+$4);
|
|
2265
|
-
const $c = Prelude_Types_foldr_Foldable_List(csegen_164(), Prelude_Types_String_length(User_Reflect_leftTitle()), {a1: ($6+$1), a2: {a1: $9, a2: {h: 0}}});
|
|
2266
|
-
const $1b = Prelude_Types_foldr_Foldable_List(csegen_164(), Prelude_Types_String_length(User_Reflect_rightTitle()), {a1: $6, a2: {a1: $9, a2: {h: 0}}});
|
|
2267
|
-
const $28 = (($c+$1b)+3n);
|
|
2268
|
-
const $2d = ((Prelude_Cast_cast_Cast_Nat_Double($0)/2.0)-(Prelude_Cast_cast_Cast_Nat_Double($28)/2.0));
|
|
2269
|
-
const $38 = (Prelude_Cast_cast_Cast_Double_Nat($2d)+Prelude_Types_prim__integerToNat(($c-Prelude_Types_String_length(User_Reflect_leftTitle()))));
|
|
2270
|
-
const $44 = (Prelude_Cast_cast_Cast_Double_Nat($2d)+Prelude_Types_prim__integerToNat(($c-($6+$1))));
|
|
2271
|
-
return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: User_Reflect_header($38), a2: {a1: User_Reflect_chart($0, $1, $2, $3, $4, $5, $44), a2: {h: 0}}});
|
|
2272
|
-
}
|
|
2273
|
-
|
|
2274
|
-
function User_Reflect_details($0, $1, $2, $3, $4, $5, $6, $7, $8) {
|
|
2275
|
-
return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(User_Reflect_intro()), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Requested Reviews:')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('unreviewed:')}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('open:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($2)), a2: {h: 0}}})}, a2: {a1: Prelude_Interfaces_x3cx26x3e(csegen_18(), $8, csegen_166()), a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('closed:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(1), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($3)), a2: {h: 0}}})}, a2: {h: 0}}}})))}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('reviews*:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($1)), a2: {h: 0}}})}, a2: {a1: Prelude_Interfaces_x3cx26x3e(csegen_18(), $6, date => Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('most recent:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_Date_show_Show_Date(date)), a2: {h: 0}}}))), a2: {h: 0}}}}}))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Authored Pulls:')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('open:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($5)), a2: {h: 0}}})}, a2: {a1: Prelude_Interfaces_x3cx26x3e(csegen_18(), $7, csegen_166()), a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('closed:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($4)), a2: {h: 0}}})}, a2: {h: 0}}}}))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: '*review count (not PR count) of most recent ', a2: {a1: Data_Fin_show_Show_x28Finx20x24nx29(User_Reflect_reviewDetailsCount()), a2: {a1: ' PRs.', a2: {h: 0}}}}))), a2: {h: 0}}}}}}}}}});
|
|
2276
|
-
}
|
|
2277
|
-
|
|
2278
|
-
function User_Reflect_chart($0, $1, $2, $3, $4, $5, $6) {
|
|
2279
|
-
return Text_PrettyPrint_Prettyprinter_Doc_indent(Prelude_Cast_cast_Cast_Nat_Int($6), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(User_replicatex27(2, $1, '\u{b7}'), User_replicatex27(1, $3, '\u{25e6}')), User_replicatex27(3, $2, '<')), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('|'), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(User_replicatex27(3, $5, '>'), User_replicatex27(2, $4, '\u{b7}')))));
|
|
2280
|
-
}
|
|
2281
|
-
|
|
2282
|
-
const Util_n__4424_1177_startOver = __lazy(function () {
|
|
2243
|
+
const Util_n__4483_1237_startOver = __lazy(function () {
|
|
2283
2244
|
return {a1: 0, a2: {h: 0}};
|
|
2284
2245
|
});
|
|
2285
2246
|
|
|
2286
|
-
function
|
|
2247
|
+
function Util_n__4483_1238_guardSuccess($0) {
|
|
2287
2248
|
switch($0.h) {
|
|
2288
2249
|
case undefined: {
|
|
2289
2250
|
switch($0.a1) {
|
|
@@ -2296,12 +2257,12 @@ function Util_n__4424_1178_guardSuccess($0) {
|
|
|
2296
2257
|
}
|
|
2297
2258
|
}
|
|
2298
2259
|
|
|
2299
|
-
function
|
|
2260
|
+
function Util_n__4483_1239_go($0, $1) {
|
|
2300
2261
|
switch($0.a1) {
|
|
2301
2262
|
case 0: {
|
|
2302
2263
|
switch(Prelude_Types_isAlpha($1)) {
|
|
2303
2264
|
case 1: return {a1: 1, a2: {a1: $1, a2: $0.a2}};
|
|
2304
|
-
case 0: return
|
|
2265
|
+
case 0: return Util_n__4483_1237_startOver();
|
|
2305
2266
|
}
|
|
2306
2267
|
}
|
|
2307
2268
|
case 1: {
|
|
@@ -2310,7 +2271,7 @@ function Util_n__4424_1179_go($0, $1) {
|
|
|
2310
2271
|
default: {
|
|
2311
2272
|
switch(Prelude_Types_isAlpha($1)) {
|
|
2312
2273
|
case 1: return {a1: 1, a2: {a1: $1, a2: $0.a2}};
|
|
2313
|
-
case 0: return
|
|
2274
|
+
case 0: return Util_n__4483_1237_startOver();
|
|
2314
2275
|
}
|
|
2315
2276
|
}
|
|
2316
2277
|
}
|
|
@@ -2318,7 +2279,7 @@ function Util_n__4424_1179_go($0, $1) {
|
|
|
2318
2279
|
case 2: {
|
|
2319
2280
|
switch(Prelude_Types_isDigit($1)) {
|
|
2320
2281
|
case 1: return {a1: 3, a2: {a1: $1, a2: $0.a2}};
|
|
2321
|
-
case 0: return
|
|
2282
|
+
case 0: return Util_n__4483_1237_startOver();
|
|
2322
2283
|
}
|
|
2323
2284
|
}
|
|
2324
2285
|
case 3: {
|
|
@@ -2331,7 +2292,7 @@ function Util_n__4424_1179_go($0, $1) {
|
|
|
2331
2292
|
}
|
|
2332
2293
|
}
|
|
2333
2294
|
|
|
2334
|
-
function
|
|
2295
|
+
function Util_n__4370_1128_getMoreLines($0, $1, $2) {
|
|
2335
2296
|
switch($2.h) {
|
|
2336
2297
|
case 0: return $0.a1.a1.a2(undefined)(Prelude_Types_List_reverse($1));
|
|
2337
2298
|
case undefined: {
|
|
@@ -2342,13 +2303,13 @@ function Util_n__4311_1068_getMoreLines($0, $1, $2) {
|
|
|
2342
2303
|
case '': {
|
|
2343
2304
|
switch(line) {
|
|
2344
2305
|
case '': return $0.a1.a1.a2(undefined)(Prelude_Types_List_reverse($1.a2));
|
|
2345
|
-
default: return
|
|
2306
|
+
default: return Util_n__4370_1128_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
|
|
2346
2307
|
}
|
|
2347
2308
|
}
|
|
2348
|
-
default: return
|
|
2309
|
+
default: return Util_n__4370_1128_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
|
|
2349
2310
|
}
|
|
2350
2311
|
}
|
|
2351
|
-
default: return
|
|
2312
|
+
default: return Util_n__4370_1128_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
|
|
2352
2313
|
}
|
|
2353
2314
|
};
|
|
2354
2315
|
return $0.a1.a2(undefined)(undefined)(Prelude_Interfaces_x3cx24x3e($0.a1.a1.a1, $1c => Data_String_trim($1c), Prelude_IO_getLine($0)))($22);
|
|
@@ -2372,12 +2333,28 @@ function Util_renderString($0, $1) {
|
|
|
2372
2333
|
return Text_PrettyPrint_Prettyprinter_Render_Terminal_renderString($3);
|
|
2373
2334
|
}
|
|
2374
2335
|
|
|
2336
|
+
function Util_renderIO($0, $1, $2) {
|
|
2337
|
+
let $9;
|
|
2338
|
+
switch(Data_Config_rf__colors($0)) {
|
|
2339
|
+
case 1: {
|
|
2340
|
+
$9 = $2;
|
|
2341
|
+
break;
|
|
2342
|
+
}
|
|
2343
|
+
case 0: {
|
|
2344
|
+
$9 = Text_PrettyPrint_Prettyprinter_Doc_unAnnotate($2);
|
|
2345
|
+
break;
|
|
2346
|
+
}
|
|
2347
|
+
}
|
|
2348
|
+
const $7 = Text_PrettyPrint_Prettyprinter_Render_Terminal_putDoc($9);
|
|
2349
|
+
return $1.a2(undefined)($7);
|
|
2350
|
+
}
|
|
2351
|
+
|
|
2375
2352
|
function Util_parseJiraPrefix($0) {
|
|
2376
|
-
return Prelude_Types_map_Functor_Maybe($3 => Prelude_Types_fastPack(Prelude_Types_List_reverse($3)),
|
|
2353
|
+
return Prelude_Types_map_Functor_Maybe($3 => Prelude_Types_fastPack(Prelude_Types_List_reverse($3)), Util_n__4483_1238_guardSuccess(Prelude_Types_foldl_Foldable_List($d => $e => Util_n__4483_1239_go($d, $e), Util_n__4483_1237_startOver(), Prelude_Types_fastUnpack($0))));
|
|
2377
2354
|
}
|
|
2378
2355
|
|
|
2379
2356
|
function Util_getManyLines($0, $1) {
|
|
2380
|
-
return
|
|
2357
|
+
return Util_n__4370_1128_getMoreLines($0, {h: 0}, $1);
|
|
2381
2358
|
}
|
|
2382
2359
|
|
|
2383
2360
|
function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5087_writeOutput($0, $1, $2, $3) {
|
|
@@ -2391,7 +2368,7 @@ function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5084_push($0, $1
|
|
|
2391
2368
|
function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5086_pop($0, $1, $2) {
|
|
2392
2369
|
const $9 = $a => {
|
|
2393
2370
|
switch($a.h) {
|
|
2394
|
-
case undefined: return Prelude_Interfaces_x3ex3e(
|
|
2371
|
+
case undefined: return Prelude_Interfaces_x3ex3e(csegen_159(), $10 => ($1.value=$a.a2), () => $16 => ({a1: $a.a1}));
|
|
2395
2372
|
case 0: return $18 => ({h: 0});
|
|
2396
2373
|
}
|
|
2397
2374
|
};
|
|
@@ -2411,16 +2388,16 @@ function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5085_peek($0, $1
|
|
|
2411
2388
|
function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5088_go($0, $1, $2, $3) {
|
|
2412
2389
|
switch($3.h) {
|
|
2413
2390
|
case 0: return $5 => (undefined);
|
|
2414
|
-
case 1: return Prelude_Interfaces_x3ex3e(
|
|
2415
|
-
case 2: return Prelude_Interfaces_x3ex3e(
|
|
2416
|
-
case 3: return Prelude_Interfaces_x3ex3e(
|
|
2391
|
+
case 1: return Prelude_Interfaces_x3ex3e(csegen_159(), $a => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5087_writeOutput($0, $2, Data_String_singleton($3.a1), $a), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5088_go($0, $1, $2, $3.a2()));
|
|
2392
|
+
case 2: return Prelude_Interfaces_x3ex3e(csegen_159(), $1d => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5087_writeOutput($0, $2, $3.a2, $1d), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5088_go($0, $1, $2, $3.a3()));
|
|
2393
|
+
case 3: return Prelude_Interfaces_x3ex3e(csegen_159(), $2e => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5087_writeOutput($0, $2, (Data_String_singleton('\n')+Text_PrettyPrint_Prettyprinter_Doc_textSpaces($3.a1)), $2e), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5088_go($0, $1, $2, $3.a2));
|
|
2417
2394
|
case 4: {
|
|
2418
2395
|
return $40 => {
|
|
2419
2396
|
const $48 = $49 => {
|
|
2420
2397
|
switch($49.h) {
|
|
2421
2398
|
case undefined: {
|
|
2422
2399
|
const $4b = Prelude_Types_List_tailRecAppend($3.a1, $49.a1);
|
|
2423
|
-
return Prelude_Interfaces_x3ex3e(
|
|
2400
|
+
return Prelude_Interfaces_x3ex3e(csegen_159(), $53 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5084_push($0, $1, $4b, $53), () => Prelude_Interfaces_x3ex3e(csegen_159(), $5e => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5087_writeOutput($0, $2, Control_ANSI_SGR_escapeSGR($4b), $5e), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5088_go($0, $1, $2, $3.a2)));
|
|
2424
2401
|
}
|
|
2425
2402
|
case 0: return $6c => ($1.value={h: 0});
|
|
2426
2403
|
}
|
|
@@ -2433,7 +2410,7 @@ function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5088_go($0, $1,
|
|
|
2433
2410
|
const $7a = _ => $7b => {
|
|
2434
2411
|
const $83 = $84 => {
|
|
2435
2412
|
switch($84.h) {
|
|
2436
|
-
case undefined: return Prelude_Interfaces_x3ex3e(
|
|
2413
|
+
case undefined: return Prelude_Interfaces_x3ex3e(csegen_159(), $8a => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5087_writeOutput($0, $2, Control_ANSI_SGR_escapeSGR({a1: {h: 0}, a2: $84.a1}), $8a), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5088_go($0, $1, $2, $3.a1));
|
|
2437
2414
|
case 0: return $9a => ($1.value={h: 0});
|
|
2438
2415
|
}
|
|
2439
2416
|
};
|
|
@@ -2450,7 +2427,7 @@ const Text_PrettyPrint_Prettyprinter_Render_Terminal_underline = __lazy(function
|
|
|
2450
2427
|
});
|
|
2451
2428
|
|
|
2452
2429
|
function Text_PrettyPrint_Prettyprinter_Render_Terminal_renderString($0) {
|
|
2453
|
-
return Data_Maybe_fromMaybe(() => '<internal pretty printing error>', Control_Monad_ST_runST($6 => $7 => Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($a => Control_Monad_ST_newSTRef({a1: {h: 0}, a2: {h: 0}}, $a), styleStackRef => $11 => Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($14 => Control_Monad_ST_newSTRef('', $14), outputRef => Prelude_Interfaces_x3ex3e(
|
|
2430
|
+
return Data_Maybe_fromMaybe(() => '<internal pretty printing error>', Control_Monad_ST_runST($6 => $7 => Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($a => Control_Monad_ST_newSTRef({a1: {h: 0}, a2: {h: 0}}, $a), styleStackRef => $11 => Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($14 => Control_Monad_ST_newSTRef('', $14), outputRef => Prelude_Interfaces_x3ex3e(csegen_159(), Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5088_go($0, styleStackRef, outputRef, $0), () => $23 => {
|
|
2454
2431
|
const $2a = $2b => {
|
|
2455
2432
|
switch($2b.h) {
|
|
2456
2433
|
case 0: return $2d => ({h: 0});
|
|
@@ -2694,7 +2671,7 @@ function Text_PrettyPrint_Prettyprinter_Doc_hsep($0) {
|
|
|
2694
2671
|
}
|
|
2695
2672
|
|
|
2696
2673
|
function Text_PrettyPrint_Prettyprinter_Doc_hcat($0) {
|
|
2697
|
-
return Text_PrettyPrint_Prettyprinter_Doc_concatWith(
|
|
2674
|
+
return Text_PrettyPrint_Prettyprinter_Doc_concatWith(csegen_172(), $0);
|
|
2698
2675
|
}
|
|
2699
2676
|
|
|
2700
2677
|
function Text_PrettyPrint_Prettyprinter_Doc_hang($0, $1) {
|
|
@@ -2739,10 +2716,10 @@ function Text_PrettyPrint_Prettyprinter_Doc_encloseSep($0, $1, $2, $3) {
|
|
|
2739
2716
|
case undefined: {
|
|
2740
2717
|
switch($3.a2.h) {
|
|
2741
2718
|
case 0: return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29($0, $3.a1), $1);
|
|
2742
|
-
default: return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_cat(Data_List_zipWith_Zippable_List(
|
|
2719
|
+
default: return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_cat(Data_List_zipWith_Zippable_List(csegen_172(), {a1: $0, a2: Data_List_replicate(Prelude_Types_prim__integerToNat((Prelude_Types_List_lengthTR($3)-1n)), $2)}, $3)), $1);
|
|
2743
2720
|
}
|
|
2744
2721
|
}
|
|
2745
|
-
default: return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_cat(Data_List_zipWith_Zippable_List(
|
|
2722
|
+
default: return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_cat(Data_List_zipWith_Zippable_List(csegen_172(), {a1: $0, a2: Data_List_replicate(Prelude_Types_prim__integerToNat((Prelude_Types_List_lengthTR($3)-1n)), $2)}, $3)), $1);
|
|
2746
2723
|
}
|
|
2747
2724
|
}
|
|
2748
2725
|
|
|
@@ -2969,11 +2946,11 @@ function Data_String_lines($0) {
|
|
|
2969
2946
|
}
|
|
2970
2947
|
|
|
2971
2948
|
function Data_String_isSuffixOf($0, $1) {
|
|
2972
|
-
return Data_List_isSuffixOf(
|
|
2949
|
+
return Data_List_isSuffixOf(csegen_176(), Prelude_Types_fastUnpack($0), Prelude_Types_fastUnpack($1));
|
|
2973
2950
|
}
|
|
2974
2951
|
|
|
2975
2952
|
function Data_String_isPrefixOf($0, $1) {
|
|
2976
|
-
return Data_List_isPrefixOf(
|
|
2953
|
+
return Data_List_isPrefixOf(csegen_176(), Prelude_Types_fastUnpack($0), Prelude_Types_fastUnpack($1));
|
|
2977
2954
|
}
|
|
2978
2955
|
|
|
2979
2956
|
function Data_String_indent($0, $1) {
|
|
@@ -3078,7 +3055,7 @@ function Prelude_Types_n__9361_8543_hexChars($0) {
|
|
|
3078
3055
|
function Prelude_Types_traverse_Traversable_List($0, $1, $2) {
|
|
3079
3056
|
switch($2.h) {
|
|
3080
3057
|
case 0: return $0.a2(undefined)({h: 0});
|
|
3081
|
-
case undefined: return $0.a3(undefined)(undefined)($0.a3(undefined)(undefined)($0.a2(undefined)(
|
|
3058
|
+
case undefined: return $0.a3(undefined)(undefined)($0.a3(undefined)(undefined)($0.a2(undefined)(csegen_192()))($1($2.a1)))(Prelude_Types_traverse_Traversable_List($0, $1, $2.a2));
|
|
3082
3059
|
}
|
|
3083
3060
|
}
|
|
3084
3061
|
|
|
@@ -3090,11 +3067,11 @@ function Prelude_Types_traverse_Traversable_x28Eitherx20x24ex29($0, $1, $2) {
|
|
|
3090
3067
|
}
|
|
3091
3068
|
|
|
3092
3069
|
function Prelude_Types_toList_Foldable_Maybe($0) {
|
|
3093
|
-
return Prelude_Types_foldr_Foldable_Maybe(
|
|
3070
|
+
return Prelude_Types_foldr_Foldable_Maybe(csegen_192(), {h: 0}, $0);
|
|
3094
3071
|
}
|
|
3095
3072
|
|
|
3096
3073
|
function Prelude_Types_toList_Foldable_x28Eitherx20x24ex29($0) {
|
|
3097
|
-
return Prelude_Types_foldr_Foldable_x28Eitherx20x24ex29(
|
|
3074
|
+
return Prelude_Types_foldr_Foldable_x28Eitherx20x24ex29(csegen_192(), {h: 0}, $0);
|
|
3098
3075
|
}
|
|
3099
3076
|
|
|
3100
3077
|
function Prelude_Types_rangeFromTo_Range_x24a($0, $1, $2) {
|
|
@@ -3213,7 +3190,7 @@ function Prelude_Types_foldr_Foldable_x28Eitherx20x24ex29($0, $1, $2) {
|
|
|
3213
3190
|
}
|
|
3214
3191
|
|
|
3215
3192
|
function Prelude_Types_foldl_Foldable_x28Eitherx20x24ex29($0, $1, $2) {
|
|
3216
|
-
return Prelude_Types_foldr_Foldable_x28Eitherx20x24ex29($6 => $7 => Prelude_Basics_flip(
|
|
3193
|
+
return Prelude_Types_foldr_Foldable_x28Eitherx20x24ex29($6 => $7 => Prelude_Basics_flip(csegen_193(), $c => Prelude_Basics_flip($0, $6, $c), $7), $13 => $13, $2)($1);
|
|
3217
3194
|
}
|
|
3218
3195
|
|
|
3219
3196
|
function Prelude_Types_foldlM_Foldable_List($0, $1, $2, $3) {
|
|
@@ -3422,7 +3399,7 @@ function Prelude_Types_isLower($0) {
|
|
|
3422
3399
|
}
|
|
3423
3400
|
|
|
3424
3401
|
function Prelude_Types_isHexDigit($0) {
|
|
3425
|
-
return Prelude_Types_elem(csegen_77(),
|
|
3402
|
+
return Prelude_Types_elem(csegen_77(), csegen_176(), Prelude_Types_toUpper($0), Prelude_Types_n__9361_8543_hexChars($0));
|
|
3426
3403
|
}
|
|
3427
3404
|
|
|
3428
3405
|
function Prelude_Types_isDigit($0) {
|
|
@@ -4751,18 +4728,19 @@ const Data_Fuel_forever = __lazy(function () {
|
|
|
4751
4728
|
return {a1: () => Data_Fuel_forever()};
|
|
4752
4729
|
});
|
|
4753
4730
|
|
|
4754
|
-
function
|
|
4731
|
+
function Data_Config_n__5282_8046_parseConfigJson($0, $1) {
|
|
4755
4732
|
switch($1.h) {
|
|
4756
4733
|
case 5: {
|
|
4757
4734
|
const $18 = $19 => {
|
|
4758
|
-
const $
|
|
4759
|
-
|
|
4760
|
-
|
|
4761
|
-
case
|
|
4735
|
+
const $23 = Data_List_lookup(csegen_94(), 'defaultRemote', $1.a1);
|
|
4736
|
+
const $2c = $2d => $2e => $2f => $30 => {
|
|
4737
|
+
switch($30.h) {
|
|
4738
|
+
case 0: return {h: 0, a1: $30.a1};
|
|
4739
|
+
case 1: return {h: 1, a1: $2f($30.a1)};
|
|
4762
4740
|
}
|
|
4763
4741
|
};
|
|
4764
|
-
const $
|
|
4765
|
-
return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($
|
|
4742
|
+
const $2a = Prelude_Interfaces_x3cx24x3e($2c, $37 => Prelude_Cast_cast_Cast_Integer_Bits32($37), Language_JSON_Accessors_integer($19.a1));
|
|
4743
|
+
return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($2a, ua => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($19.a2.a1), o => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($19.a2.a2.a1), r => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Types_maybe(() => ({h: 1, a1: {h: 0}}), () => $4e => Language_JSON_Accessors_optional($51 => Language_JSON_Accessors_string($51), $4e), $23), dr => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($19.a2.a2.a2.a1), mb => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_bool($19.a2.a2.a2.a2.a1), at => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_bool($19.a2.a2.a2.a2.a2.a1), ca => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_array($6a => Language_JSON_Accessors_string($6a), $19.a2.a2.a2.a2.a2.a2.a1), ts => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_array($73 => Language_JSON_Accessors_string($73), $19.a2.a2.a2.a2.a2.a2.a2.a1), om => ({h: 1, a1: {a1: ua, a2: o, a3: r, a4: dr, a5: mb, a6: at, a7: ca, a8: ts, a9: om, a10: $0}}))))))))));
|
|
4766
4744
|
};
|
|
4767
4745
|
return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_lookupAll({a1: 'updatedAt', a2: {a1: 'org', a2: {a1: 'repo', a2: {a1: 'mainBranch', a2: {a1: 'assignTeams', a2: {a1: 'commentOnAssign', a2: {a1: 'teamSlugs', a2: {a1: 'orgMembers', a2: {h: 0}}}}}}}}}, $1.a1), $18);
|
|
4768
4746
|
}
|
|
@@ -4771,8 +4749,12 @@ function Data_Config_n__5186_7922_parseConfigJson($0, $1) {
|
|
|
4771
4749
|
}
|
|
4772
4750
|
}
|
|
4773
4751
|
|
|
4752
|
+
function Data_Config_n__4943_7723_defaultRemote($0) {
|
|
4753
|
+
return Prelude_Types_maybe(() => 'Not set (defaults to \"origin\")', () => $4 => Prelude_Show_show_Show_String($4), $0.a4);
|
|
4754
|
+
}
|
|
4755
|
+
|
|
4774
4756
|
function Data_Config_show_Show_Config($0) {
|
|
4775
|
-
return Data_String_fastUnlines({a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' updatedAt: ', a2: {a1: Prelude_Show_show_Show_Bits32($0.a1), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' org: ', a2: {a1: Prelude_Show_show_Show_String($0.a2), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' repo: ', a2: {a1: Prelude_Show_show_Show_String($0.a3), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' mainBranch: ', a2: {a1: Prelude_Show_show_Show_String($0.
|
|
4757
|
+
return Data_String_fastUnlines({a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' updatedAt: ', a2: {a1: Prelude_Show_show_Show_Bits32($0.a1), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' org: ', a2: {a1: Prelude_Show_show_Show_String($0.a2), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' repo: ', a2: {a1: Prelude_Show_show_Show_String($0.a3), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' defaultRemote: ', a2: {a1: Data_Config_n__4943_7723_defaultRemote($0), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' mainBranch: ', a2: {a1: Prelude_Show_show_Show_String($0.a5), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' assignTeams: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a6), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'commentOnAssign: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a7), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' teamSlugs: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $0.a8), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' orgMembers: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $0.a9), a2: {h: 0}}}), a2: {h: 0}}}}}}}}}});
|
|
4776
4758
|
}
|
|
4777
4759
|
|
|
4778
4760
|
function Data_Config_showPrec_Show_Config($0, $1) {
|
|
@@ -4780,19 +4762,19 @@ function Data_Config_showPrec_Show_Config($0, $1) {
|
|
|
4780
4762
|
}
|
|
4781
4763
|
|
|
4782
4764
|
function Data_Config_rf__filepath($0) {
|
|
4783
|
-
return $0.
|
|
4765
|
+
return $0.a10.a1;
|
|
4784
4766
|
}
|
|
4785
4767
|
|
|
4786
4768
|
function Data_Config_rf__editor($0) {
|
|
4787
|
-
return $0.
|
|
4769
|
+
return $0.a10.a3;
|
|
4788
4770
|
}
|
|
4789
4771
|
|
|
4790
4772
|
function Data_Config_rf__colors($0) {
|
|
4791
|
-
return $0.
|
|
4773
|
+
return $0.a10.a2;
|
|
4792
4774
|
}
|
|
4793
4775
|
|
|
4794
4776
|
const Data_Config_settableProps = __lazy(function () {
|
|
4795
|
-
return {a1: 'assignTeams', a2: {a1: 'commentOnAssign', a2: {h: 0}}};
|
|
4777
|
+
return {a1: 'assignTeams', a2: {a1: 'commentOnAssign', a2: {a1: 'defaultRemote', a2: {h: 0}}}};
|
|
4796
4778
|
});
|
|
4797
4779
|
|
|
4798
4780
|
function Data_Config_parseConfig($0, $1) {
|
|
@@ -4814,12 +4796,12 @@ function Data_Config_parseConfig($0, $1) {
|
|
|
4814
4796
|
}
|
|
4815
4797
|
};
|
|
4816
4798
|
const $4 = {a1: $5, a2: a => $d => ({h: 1, a1: $d}), a3: $f};
|
|
4817
|
-
const $3 = {a1: $4, a2:
|
|
4818
|
-
return Prelude_Interfaces_x3ex3dx3e($3,
|
|
4799
|
+
const $3 = {a1: $4, a2: csegen_246(), a3: csegen_247()};
|
|
4800
|
+
return Prelude_Interfaces_x3ex3dx3e($3, csegen_248(), $20 => Data_Config_n__5282_8046_parseConfigJson($0, $20), $1);
|
|
4819
4801
|
}
|
|
4820
4802
|
|
|
4821
4803
|
function Data_Config_json($0) {
|
|
4822
|
-
return {h: 5, a1: {a1: {a1: '
|
|
4804
|
+
return {h: 5, a1: {a1: {a1: 'assignTeams', a2: {h: 1, a1: $0.a6}}, a2: {a1: {a1: 'commentOnAssign', a2: {h: 1, a1: $0.a7}}, a2: {a1: {a1: 'org', a2: {h: 3, a1: $0.a2}}, a2: {a1: {a1: 'repo', a2: {h: 3, a1: $0.a3}}, a2: {a1: {a1: 'defaultRemote', a2: Prelude_Types_maybe(() => ({h: 0}), () => $1d => ({h: 3, a1: $1d}), $0.a4)}, a2: {a1: {a1: 'mainBranch', a2: {h: 3, a1: $0.a5}}, a2: {a1: {a1: 'orgMembers', a2: {h: 4, a1: Prelude_Interfaces_x3cx24x3e(csegen_119(), $2e => ({h: 3, a1: $2e}), Data_List_sort(csegen_111(), $0.a9))}}, a2: {a1: {a1: 'teamSlugs', a2: {h: 4, a1: Prelude_Interfaces_x3cx24x3e(csegen_119(), $3e => ({h: 3, a1: $3e}), Data_List_sort(csegen_111(), $0.a8))}}, a2: {a1: {a1: 'updatedAt', a2: {h: 2, a1: Prelude_Cast_cast_Cast_Bits32_Double($0.a1)}}, a2: {h: 0}}}}}}}}}}};
|
|
4823
4805
|
}
|
|
4824
4806
|
|
|
4825
4807
|
const Data_Config_filename = __lazy(function () {
|
|
@@ -4837,6 +4819,21 @@ function Language_JSON_Accessors_string($0) {
|
|
|
4837
4819
|
}
|
|
4838
4820
|
}
|
|
4839
4821
|
|
|
4822
|
+
function Language_JSON_Accessors_optional($0, $1) {
|
|
4823
|
+
switch($1.h) {
|
|
4824
|
+
case 0: return {h: 1, a1: {h: 0}};
|
|
4825
|
+
default: {
|
|
4826
|
+
const $5 = $6 => $7 => $8 => $9 => {
|
|
4827
|
+
switch($9.h) {
|
|
4828
|
+
case 0: return {h: 0, a1: $9.a1};
|
|
4829
|
+
case 1: return {h: 1, a1: $8($9.a1)};
|
|
4830
|
+
}
|
|
4831
|
+
};
|
|
4832
|
+
return Prelude_Interfaces_x3cx24x3e($5, $10 => ({a1: $10}), $0($1));
|
|
4833
|
+
}
|
|
4834
|
+
}
|
|
4835
|
+
}
|
|
4836
|
+
|
|
4840
4837
|
function Language_JSON_Accessors_object($0) {
|
|
4841
4838
|
switch($0.h) {
|
|
4842
4839
|
case 5: return {h: 1, a1: $0.a1};
|
|
@@ -4943,17 +4940,17 @@ function Text_Bounded_mergeBounds($0, $1) {
|
|
|
4943
4940
|
switch($1.h) {
|
|
4944
4941
|
case undefined: {
|
|
4945
4942
|
switch($1.a2) {
|
|
4946
|
-
case 1: return Prelude_Interfaces_x3cx24x3e(
|
|
4943
|
+
case 1: return Prelude_Interfaces_x3cx24x3e(csegen_251(), $e => $1.a1, $0);
|
|
4947
4944
|
default: {
|
|
4948
|
-
const $10 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(
|
|
4949
|
-
const $1c = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(
|
|
4945
|
+
const $10 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_262(), csegen_262(), Text_Bounded_start($0), Text_Bounded_start($1));
|
|
4946
|
+
const $1c = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_262(), csegen_262(), Text_Bounded_end($0), Text_Bounded_end($1));
|
|
4950
4947
|
return {a1: $1.a1, a2: 0, a3: {a1: $10.a1, a2: $10.a2, a3: $1c.a1, a4: $1c.a2}};
|
|
4951
4948
|
}
|
|
4952
4949
|
}
|
|
4953
4950
|
}
|
|
4954
4951
|
default: {
|
|
4955
|
-
const $30 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(
|
|
4956
|
-
const $3c = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(
|
|
4952
|
+
const $30 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_262(), csegen_262(), Text_Bounded_start($0), Text_Bounded_start($1));
|
|
4953
|
+
const $3c = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_262(), csegen_262(), Text_Bounded_end($0), Text_Bounded_end($1));
|
|
4957
4954
|
return {a1: $1.a1, a2: 0, a3: {a1: $30.a1, a2: $30.a2, a3: $3c.a1, a4: $3c.a2}};
|
|
4958
4955
|
}
|
|
4959
4956
|
}
|
|
@@ -4964,17 +4961,17 @@ function Text_Bounded_mergeBounds($0, $1) {
|
|
|
4964
4961
|
switch($1.h) {
|
|
4965
4962
|
case undefined: {
|
|
4966
4963
|
switch($1.a2) {
|
|
4967
|
-
case 1: return Prelude_Interfaces_x3cx24x3e(
|
|
4964
|
+
case 1: return Prelude_Interfaces_x3cx24x3e(csegen_251(), $56 => $1.a1, $0);
|
|
4968
4965
|
default: {
|
|
4969
|
-
const $58 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(
|
|
4970
|
-
const $64 = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(
|
|
4966
|
+
const $58 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_262(), csegen_262(), Text_Bounded_start($0), Text_Bounded_start($1));
|
|
4967
|
+
const $64 = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_262(), csegen_262(), Text_Bounded_end($0), Text_Bounded_end($1));
|
|
4971
4968
|
return {a1: $1.a1, a2: 0, a3: {a1: $58.a1, a2: $58.a2, a3: $64.a1, a4: $64.a2}};
|
|
4972
4969
|
}
|
|
4973
4970
|
}
|
|
4974
4971
|
}
|
|
4975
4972
|
default: {
|
|
4976
|
-
const $78 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(
|
|
4977
|
-
const $84 = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(
|
|
4973
|
+
const $78 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_262(), csegen_262(), Text_Bounded_start($0), Text_Bounded_start($1));
|
|
4974
|
+
const $84 = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_262(), csegen_262(), Text_Bounded_end($0), Text_Bounded_end($1));
|
|
4978
4975
|
return {a1: $1.a1, a2: 0, a3: {a1: $78.a1, a2: $78.a2, a3: $84.a1, a4: $84.a2}};
|
|
4979
4976
|
}
|
|
4980
4977
|
}
|
|
@@ -5193,7 +5190,7 @@ const Language_JSON_Parser_string = __lazy(function () {
|
|
|
5193
5190
|
});
|
|
5194
5191
|
|
|
5195
5192
|
const Language_JSON_Parser_rawString = __lazy(function () {
|
|
5196
|
-
return {h: 8, a1: 0, a2: Text_Parser_match(
|
|
5193
|
+
return {h: 8, a1: 0, a2: Text_Parser_match(csegen_270(), csegen_273(), {h: 2}), a3: () => mstr => {
|
|
5197
5194
|
switch(mstr.h) {
|
|
5198
5195
|
case undefined: return {h: 0, a1: mstr.a1};
|
|
5199
5196
|
case 0: return {h: 4, a1: {h: 0}, a2: 0, a3: 'invalid string'};
|
|
@@ -5202,7 +5199,7 @@ const Language_JSON_Parser_rawString = __lazy(function () {
|
|
|
5202
5199
|
});
|
|
5203
5200
|
|
|
5204
5201
|
function Language_JSON_Parser_punct($0) {
|
|
5205
|
-
return Text_Parser_match(
|
|
5202
|
+
return Text_Parser_match(csegen_270(), csegen_273(), {h: 4, a1: $0});
|
|
5206
5203
|
}
|
|
5207
5204
|
|
|
5208
5205
|
function Language_JSON_Parser_parseJSON($0) {
|
|
@@ -5235,11 +5232,11 @@ const Language_JSON_Parser_object = __lazy(function () {
|
|
|
5235
5232
|
});
|
|
5236
5233
|
|
|
5237
5234
|
const Language_JSON_Parser_number = __lazy(function () {
|
|
5238
|
-
return Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29(1, $3 => ({h: 2, a1: $3}), Text_Parser_match(
|
|
5235
|
+
return Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29(1, $3 => ({h: 2, a1: $3}), Text_Parser_match(csegen_270(), csegen_273(), {h: 1}));
|
|
5239
5236
|
});
|
|
5240
5237
|
|
|
5241
5238
|
const Language_JSON_Parser_null = __lazy(function () {
|
|
5242
|
-
return Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29(1, $3 => ({h: 0}), Text_Parser_match(
|
|
5239
|
+
return Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29(1, $3 => ({h: 0}), Text_Parser_match(csegen_270(), csegen_273(), {h: 3}));
|
|
5243
5240
|
});
|
|
5244
5241
|
|
|
5245
5242
|
const Language_JSON_Parser_json = __lazy(function () {
|
|
@@ -5247,7 +5244,7 @@ const Language_JSON_Parser_json = __lazy(function () {
|
|
|
5247
5244
|
});
|
|
5248
5245
|
|
|
5249
5246
|
const Language_JSON_Parser_boolean = __lazy(function () {
|
|
5250
|
-
return Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29(1, $3 => ({h: 1, a1: $3}), Text_Parser_match(
|
|
5247
|
+
return Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29(1, $3 => ({h: 1, a1: $3}), Text_Parser_match(csegen_270(), csegen_273(), {h: 0}));
|
|
5251
5248
|
});
|
|
5252
5249
|
|
|
5253
5250
|
const Language_JSON_Parser_array = __lazy(function () {
|
|
@@ -5423,7 +5420,7 @@ function Text_Lexer_opt($0) {
|
|
|
5423
5420
|
}
|
|
5424
5421
|
|
|
5425
5422
|
function Text_Lexer_oneOf($0) {
|
|
5426
|
-
return Text_Lexer_Core_pred(x => Prelude_Types_elem(csegen_77(),
|
|
5423
|
+
return Text_Lexer_Core_pred(x => Prelude_Types_elem(csegen_77(), csegen_176(), x, Prelude_Types_fastUnpack($0)));
|
|
5427
5424
|
}
|
|
5428
5425
|
|
|
5429
5426
|
function Text_Lexer_non($0) {
|
|
@@ -5700,11 +5697,11 @@ function Language_JSON_String_Tokens_charValue($0) {
|
|
|
5700
5697
|
}
|
|
5701
5698
|
|
|
5702
5699
|
const Language_JSON_String_Parser_stringChar = __lazy(function () {
|
|
5703
|
-
return {h: 12, a1: 1, a2: 1, a3: Text_Parser_match(
|
|
5700
|
+
return {h: 12, a1: 1, a2: 1, a3: Text_Parser_match(csegen_309(), csegen_312(), 1), a4: () => ({h: 12, a1: 1, a2: 1, a3: Text_Parser_match(csegen_309(), csegen_312(), 2), a4: () => Text_Parser_match(csegen_309(), csegen_312(), 3)})};
|
|
5704
5701
|
});
|
|
5705
5702
|
|
|
5706
5703
|
const Language_JSON_String_Parser_quotedString = __lazy(function () {
|
|
5707
|
-
const $0 = Text_Parser_match(
|
|
5704
|
+
const $0 = Text_Parser_match(csegen_309(), csegen_312(), 0);
|
|
5708
5705
|
return {h: 8, a1: 0, a2: Text_Parser_between(0, $0, $0, Text_Parser_many(Language_JSON_String_Parser_stringChar())), a3: () => chars => ({h: 11, a1: 0, a2: 0, a3: {h: 3}, a4: {h: 0, a1: Prelude_Types_fastPack(chars)}})};
|
|
5709
5706
|
});
|
|
5710
5707
|
|
|
@@ -5766,7 +5763,7 @@ function Text_Parser_between($0, $1, $2, $3) {
|
|
|
5766
5763
|
function Text_Parser_Core_case__doParse_5194($0, $1, $2, $3, $4, $5) {
|
|
5767
5764
|
switch($5.h) {
|
|
5768
5765
|
case 0: return {h: 0, a1: $5.a1, a2: $5.a2, a3: $5.a3};
|
|
5769
|
-
case 1: return {h: 1, a1: $5.a1, a2: $5.a2, a3: Prelude_Interfaces_x3cx24x3e(
|
|
5766
|
+
case 1: return {h: 1, a1: $5.a1, a2: $5.a2, a3: Prelude_Interfaces_x3cx24x3e(csegen_328(), $11 => $5.a3, $5.a3), a4: $5.a4};
|
|
5770
5767
|
}
|
|
5771
5768
|
}
|
|
5772
5769
|
|
|
@@ -6190,12 +6187,12 @@ function Text_Parser_Core_doParse($0, $1, $2, $3, $4) {
|
|
|
6190
6187
|
case 7: return Text_Parser_Core_case__doParse_4048($0, $1, $3.a1, $4, $2, Text_Parser_Core_doParse($0, $1, $2, $3.a1, $4));
|
|
6191
6188
|
case 1: {
|
|
6192
6189
|
switch($4.h) {
|
|
6193
|
-
case 0: return {h: 0, a1: $2, a2: 0, a3:
|
|
6190
|
+
case 0: return {h: 0, a1: $2, a2: 0, a3: csegen_330()};
|
|
6194
6191
|
case undefined: {
|
|
6195
6192
|
const $44 = $3.a2($4.a1.a1);
|
|
6196
6193
|
switch($44.h) {
|
|
6197
6194
|
case 0: return {h: 0, a1: $2, a2: 0, a3: {a1: {a1: $3.a1, a2: {a1: $4.a1.a3}}, a2: {h: 0}}};
|
|
6198
|
-
case undefined: return {h: 1, a1: $1, a2: $2, a3: Prelude_Interfaces_x3cx24x3e(
|
|
6195
|
+
case undefined: return {h: 1, a1: $1, a2: $2, a3: Prelude_Interfaces_x3cx24x3e(csegen_328(), $58 => $44.a1, $4.a1), a4: $4.a2};
|
|
6199
6196
|
}
|
|
6200
6197
|
}
|
|
6201
6198
|
}
|
|
@@ -6208,7 +6205,7 @@ function Text_Parser_Core_doParse($0, $1, $2, $3, $4) {
|
|
|
6208
6205
|
}
|
|
6209
6206
|
case 2: {
|
|
6210
6207
|
switch($4.h) {
|
|
6211
|
-
case 0: return {h: 0, a1: $2, a2: 0, a3:
|
|
6208
|
+
case 0: return {h: 0, a1: $2, a2: 0, a3: csegen_330()};
|
|
6212
6209
|
case undefined: {
|
|
6213
6210
|
switch($3.a2($4.a1.a1)) {
|
|
6214
6211
|
case 1: return {h: 1, a1: $1, a2: $2, a3: Text_Bounded_removeIrrelevance($4.a1), a4: {a1: $4.a1, a2: $4.a2}};
|
|
@@ -6237,7 +6234,7 @@ function Text_Parser_Core_doParse($0, $1, $2, $3, $4) {
|
|
|
6237
6234
|
case 13: return Text_Parser_Core_case__doParse_5194($0, $1, $3.a1, $4, $2, Text_Parser_Core_doParse($0, $1, $2, $3.a1, $4));
|
|
6238
6235
|
case 14: {
|
|
6239
6236
|
switch($4.h) {
|
|
6240
|
-
case 0: return {h: 0, a1: $2, a2: 0, a3:
|
|
6237
|
+
case 0: return {h: 0, a1: $2, a2: 0, a3: csegen_330()};
|
|
6241
6238
|
case undefined: return {h: 1, a1: $1, a2: $2, a3: Text_Bounded_irrelevantBounds($4.a1.a3), a4: {a1: $4.a1, a2: $4.a2}};
|
|
6242
6239
|
}
|
|
6243
6240
|
}
|
|
@@ -6343,7 +6340,7 @@ function Decidable_Equality_decEq_DecEq_FromEqx24a($0, $1, $2) {
|
|
|
6343
6340
|
}
|
|
6344
6341
|
|
|
6345
6342
|
function Decidable_Equality_decEq_DecEq_Char($0, $1) {
|
|
6346
|
-
return Decidable_Equality_decEq_DecEq_FromEqx24a(
|
|
6343
|
+
return Decidable_Equality_decEq_DecEq_FromEqx24a(csegen_176(), $0, $1);
|
|
6347
6344
|
}
|
|
6348
6345
|
|
|
6349
6346
|
function Data_Either_maybeToEither($0, $1) {
|
|
@@ -6353,6 +6350,137 @@ function Data_Either_maybeToEither($0, $1) {
|
|
|
6353
6350
|
}
|
|
6354
6351
|
}
|
|
6355
6352
|
|
|
6353
|
+
function User_Reflect_case__casex20blockx20inx20reflectOnSelf_2298($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
|
|
6354
|
+
const $b = Prelude_Interfaces_mapHom({a1: d => b => c => a => $f => $10 => $11 => ({a1: $f($11.a1), a2: $10($11.a2)}), a2: b => c => a => $1a => $1b => ({a1: $1a($1b.a1), a2: $1b.a2}), a3: a => d => b => $22 => $23 => ({a1: $23.a1, a2: $22($23.a2)})}, $2a => Data_List_headx27(Data_List_sort({a1: {a1: $31 => $32 => Data_Date_x3dx3d_Eq_Date($31, $32), a2: $37 => $38 => Data_Date_x2fx3d_Eq_Date($37, $38)}, a2: $3d => $3e => Data_Date_compare_Ord_Date($3d, $3e), a3: $43 => $44 => Data_Date_x3c_Ord_Date($43, $44), a4: $49 => $4a => Data_Date_x3e_Ord_Date($49, $4a), a5: $4f => $50 => Data_Date_x3cx3d_Ord_Date($4f, $50), a6: $55 => $56 => Data_Date_x3ex3d_Ord_Date($55, $56), a7: $5b => $5c => Data_Date_max_Ord_Date($5b, $5c), a8: $61 => $62 => Data_Date_min_Ord_Date($61, $62)}, Prelude_Types_map_Functor_List(csegen_382(), $2a))), {a1: $7, a2: $9.a1});
|
|
6355
|
+
return Util_renderIO($0, csegen_21(), User_Reflect_print(Prelude_Types_String_length(User_Reflect_intro()), Prelude_Types_List_lengthTR($4), Prelude_Types_List_lengthTR($9.a1), Prelude_Types_List_lengthTR($9.a2), Prelude_Types_List_lengthTR($8), Prelude_Types_List_lengthTR($7), $5, $b.a1, $b.a2));
|
|
6356
|
+
}
|
|
6357
|
+
|
|
6358
|
+
function User_Me_n__6263_2415_ul($0, $1, $2, $3) {
|
|
6359
|
+
return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($3));
|
|
6360
|
+
}
|
|
6361
|
+
|
|
6362
|
+
function User_Me_n__6263_2421_teams($0, $1, $2) {
|
|
6363
|
+
return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: User_Me_n__6263_2415_ul($0, $1, $2, 'GitHub Teams:'), a2: Prelude_Types_map_Functor_List($e => User_Me_n__6263_2416_it($0, $1, $2, $e), $0)});
|
|
6364
|
+
}
|
|
6365
|
+
|
|
6366
|
+
function User_Me_n__6263_2420_login($0, $1, $2) {
|
|
6367
|
+
return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('GitHub Login:'), User_Me_n__6263_2417_green($0, $1, $2, $1.a1));
|
|
6368
|
+
}
|
|
6369
|
+
|
|
6370
|
+
function User_Reflect_n__5356_1492_ital($0, $1) {
|
|
6371
|
+
return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($1));
|
|
6372
|
+
}
|
|
6373
|
+
|
|
6374
|
+
function User_Me_n__6263_2416_it($0, $1, $2, $3) {
|
|
6375
|
+
return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($3));
|
|
6376
|
+
}
|
|
6377
|
+
|
|
6378
|
+
function User_Me_n__6403_2571_handleUnsetEmail($0, $1, $2, $3) {
|
|
6379
|
+
switch($3) {
|
|
6380
|
+
case '': return {h: 0};
|
|
6381
|
+
default: return {a1: $3};
|
|
6382
|
+
}
|
|
6383
|
+
}
|
|
6384
|
+
|
|
6385
|
+
function User_Me_n__6263_2417_green($0, $1, $2, $3) {
|
|
6386
|
+
return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($3));
|
|
6387
|
+
}
|
|
6388
|
+
|
|
6389
|
+
function User_Me_n__6263_2419_fullName($0, $1, $2) {
|
|
6390
|
+
return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('GitHub Name:'), User_Me_n__6263_2417_green($0, $1, $2, $1.a2));
|
|
6391
|
+
}
|
|
6392
|
+
|
|
6393
|
+
function User_Me_n__6263_2418_email($0, $1, $2) {
|
|
6394
|
+
let $7;
|
|
6395
|
+
switch($2.h) {
|
|
6396
|
+
case undefined: {
|
|
6397
|
+
$7 = User_Me_n__6263_2417_green($0, $1, $2, $2.a1);
|
|
6398
|
+
break;
|
|
6399
|
+
}
|
|
6400
|
+
case 0: {
|
|
6401
|
+
$7 = User_Me_n__6263_2416_it($0, $1, $2, 'Not set');
|
|
6402
|
+
break;
|
|
6403
|
+
}
|
|
6404
|
+
}
|
|
6405
|
+
return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Git Email:'), $7);
|
|
6406
|
+
}
|
|
6407
|
+
|
|
6408
|
+
const User_Reflect_rightTitle = __lazy(function () {
|
|
6409
|
+
return 'authored';
|
|
6410
|
+
});
|
|
6411
|
+
|
|
6412
|
+
const User_Reflect_reviewDetailsCount = __lazy(function () {
|
|
6413
|
+
return 25n;
|
|
6414
|
+
});
|
|
6415
|
+
|
|
6416
|
+
function User_replicatex27($0, $1, $2) {
|
|
6417
|
+
return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color($0), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_String_replicate($1, $2)));
|
|
6418
|
+
}
|
|
6419
|
+
|
|
6420
|
+
function User_Reflect_reflectOnSelf($0, $1, $2, $3) {
|
|
6421
|
+
const $c = prs => $d => $e => {
|
|
6422
|
+
const $19 = myLogin => $1a => $1b => {
|
|
6423
|
+
const $37 = reviews => {
|
|
6424
|
+
const $38 = Prelude_Types_map_Functor_Maybe(csegen_385(), Data_List_headx27(Data_List_sortBy($41 => $42 => Prelude_Basics_on(csegen_141(), csegen_385(), $41, $42), reviews)));
|
|
6425
|
+
const $4b = PullRequest_tuple(prs);
|
|
6426
|
+
const $4e = Prelude_Interfaces_mapHom({a1: d => b => c => a => $52 => $53 => $54 => ({a1: $52($54.a1), a2: $53($54.a2)}), a2: b => c => a => $5d => $5e => ({a1: $5d($5e.a1), a2: $5e.a2}), a3: a => d => b => $65 => $66 => ({a1: $66.a1, a2: $65($66.a2)})}, $6d => Prelude_Types_List_filter($70 => Prelude_EqOrd_x3dx3d_Eq_String($70.a3, myLogin), $6d), $4b);
|
|
6427
|
+
return User_Reflect_case__casex20blockx20inx20reflectOnSelf_2298($0, $1, prs, myLogin, reviews, $38, $4b, $4e.a1, $4e.a2, Prelude_Interfaces_mapHom({a1: d => b => c => a => $85 => $86 => $87 => ({a1: $85($87.a1), a2: $86($87.a2)}), a2: b => c => a => $90 => $91 => ({a1: $90($91.a1), a2: $91.a2}), a3: a => d => b => $98 => $99 => ({a1: $99.a1, a2: $98($99.a2)})}, $a0 => Prelude_Types_List_filter($a3 => Prelude_Interfaces_any(csegen_77(), $a8 => Prelude_EqOrd_x3dx3d_Eq_String($a8, myLogin), $a3.a5), $a0), $4b));
|
|
6428
|
+
};
|
|
6429
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_reviewsForUser($0, $1, myLogin, Data_List_take(User_Reflect_reviewDetailsCount(), Prelude_Types_List_reverse(Data_List_sortBy($2b => $2c => Prelude_Basics_on(csegen_141(), csegen_382(), $2b, $2c), PullRequest_combined(prs))))), $37, $1a, $1b);
|
|
6430
|
+
};
|
|
6431
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), csegen_139(), FFI_GitHub_getSelf($1)), $19, $d, $e);
|
|
6432
|
+
};
|
|
6433
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_listPartitionedPRs($0, $1, 4n, User_Reflect_prCount()), $c, $2, $3);
|
|
6434
|
+
}
|
|
6435
|
+
|
|
6436
|
+
function User_Me_printInfoOnSelf($0, $1, $2, $3, $4) {
|
|
6437
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $b => User_Me_n__6403_2571_handleUnsetEmail($0, $1, $2, $b), $12 => $13 => FFI_Git_userEmail($2, $12, $13)), gitEmail => $19 => $1a => Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_getSelf($1), githubUser => $20 => $21 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), csegen_112(), FFI_GitHub_listMyTeams($1)), githubTeams => Util_renderIO($0, csegen_21(), User_Me_print(gitEmail, githubUser, githubTeams)), $20, $21), $19, $1a), $3, $4);
|
|
6438
|
+
}
|
|
6439
|
+
|
|
6440
|
+
function User_Reflect_print($0, $1, $2, $3, $4, $5, $6, $7, $8) {
|
|
6441
|
+
return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Reflect_graph($0, $1, $2, $3, $4, $5), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Reflect_details($0, $1, $2, $3, $4, $5, $6, $7, $8), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}});
|
|
6442
|
+
}
|
|
6443
|
+
|
|
6444
|
+
function User_Me_print($0, $1, $2) {
|
|
6445
|
+
return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Me_n__6263_2418_email($2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Me_n__6263_2419_fullName($2, $1, $0), a2: {a1: User_Me_n__6263_2420_login($2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Me_n__6263_2421_teams($2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}}}}});
|
|
6446
|
+
}
|
|
6447
|
+
|
|
6448
|
+
const User_Reflect_prCount = __lazy(function () {
|
|
6449
|
+
return csegen_134();
|
|
6450
|
+
});
|
|
6451
|
+
|
|
6452
|
+
const User_Reflect_leftTitle = __lazy(function () {
|
|
6453
|
+
return 'requested';
|
|
6454
|
+
});
|
|
6455
|
+
|
|
6456
|
+
const User_Reflect_intro = __lazy(function () {
|
|
6457
|
+
return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Your current pull request summary (out of the past ', a2: {a1: Data_Fin_show_Show_x28Finx20x24nx29(User_Reflect_prCount()), a2: {a1: ' PRs):', a2: {h: 0}}}});
|
|
6458
|
+
});
|
|
6459
|
+
|
|
6460
|
+
function User_Reflect_header($0) {
|
|
6461
|
+
return Text_PrettyPrint_Prettyprinter_Doc_indent(Prelude_Cast_cast_Cast_Nat_Int($0), Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: User_Reflect_n__5356_1492_ital($0, User_Reflect_leftTitle()), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(' '), a2: {a1: User_Reflect_n__5356_1492_ital($0, User_Reflect_rightTitle()), a2: {h: 0}}}}));
|
|
6462
|
+
}
|
|
6463
|
+
|
|
6464
|
+
function User_Reflect_graph($0, $1, $2, $3, $4, $5) {
|
|
6465
|
+
const $6 = ($2+$3);
|
|
6466
|
+
const $9 = ($5+$4);
|
|
6467
|
+
const $c = Prelude_Types_foldr_Foldable_List(csegen_390(), Prelude_Types_String_length(User_Reflect_leftTitle()), {a1: ($6+$1), a2: {a1: $9, a2: {h: 0}}});
|
|
6468
|
+
const $1b = Prelude_Types_foldr_Foldable_List(csegen_390(), Prelude_Types_String_length(User_Reflect_rightTitle()), {a1: $6, a2: {a1: $9, a2: {h: 0}}});
|
|
6469
|
+
const $28 = (($c+$1b)+3n);
|
|
6470
|
+
const $2d = ((Prelude_Cast_cast_Cast_Nat_Double($0)/2.0)-(Prelude_Cast_cast_Cast_Nat_Double($28)/2.0));
|
|
6471
|
+
const $38 = (Prelude_Cast_cast_Cast_Double_Nat($2d)+Prelude_Types_prim__integerToNat(($c-Prelude_Types_String_length(User_Reflect_leftTitle()))));
|
|
6472
|
+
const $44 = (Prelude_Cast_cast_Cast_Double_Nat($2d)+Prelude_Types_prim__integerToNat(($c-($6+$1))));
|
|
6473
|
+
return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: User_Reflect_header($38), a2: {a1: User_Reflect_chart($0, $1, $2, $3, $4, $5, $44), a2: {h: 0}}});
|
|
6474
|
+
}
|
|
6475
|
+
|
|
6476
|
+
function User_Reflect_details($0, $1, $2, $3, $4, $5, $6, $7, $8) {
|
|
6477
|
+
return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(User_Reflect_intro()), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Requested Reviews:')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('unreviewed:')}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('open:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($2)), a2: {h: 0}}})}, a2: {a1: Prelude_Interfaces_x3cx26x3e(csegen_18(), $8, csegen_392()), a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('closed:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(1), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($3)), a2: {h: 0}}})}, a2: {h: 0}}}})))}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('reviews*:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($1)), a2: {h: 0}}})}, a2: {a1: Prelude_Interfaces_x3cx26x3e(csegen_18(), $6, date => Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('most recent:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_Date_show_Show_Date(date)), a2: {h: 0}}}))), a2: {h: 0}}}}}))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Authored Pulls:')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('open:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($5)), a2: {h: 0}}})}, a2: {a1: Prelude_Interfaces_x3cx26x3e(csegen_18(), $7, csegen_392()), a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('closed:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($4)), a2: {h: 0}}})}, a2: {h: 0}}}}))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: '*review count (not PR count) of most recent ', a2: {a1: Data_Fin_show_Show_x28Finx20x24nx29(User_Reflect_reviewDetailsCount()), a2: {a1: ' PRs.', a2: {h: 0}}}}))), a2: {h: 0}}}}}}}}}});
|
|
6478
|
+
}
|
|
6479
|
+
|
|
6480
|
+
function User_Reflect_chart($0, $1, $2, $3, $4, $5, $6) {
|
|
6481
|
+
return Text_PrettyPrint_Prettyprinter_Doc_indent(Prelude_Cast_cast_Cast_Nat_Int($6), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(User_replicatex27(2, $1, '\u{b7}'), User_replicatex27(1, $3, '\u{25e6}')), User_replicatex27(3, $2, '<')), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('|'), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(User_replicatex27(3, $5, '>'), User_replicatex27(2, $4, '\u{b7}')))));
|
|
6482
|
+
}
|
|
6483
|
+
|
|
6356
6484
|
function PullRequest_with__withx20blockx20inx20listPartitionedPRs_1206($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
6357
6485
|
switch($2.h) {
|
|
6358
6486
|
case 1: return $9 => PullRequest_partitionx27(Data_Pagination_metaPages($0, 1n, $4, 1n, $4), $7, $9);
|
|
@@ -6372,107 +6500,100 @@ function PullRequest_with__listPartitionedPRs_1144($0, $1, $2, $3, $4) {
|
|
|
6372
6500
|
}
|
|
6373
6501
|
}
|
|
6374
6502
|
|
|
6375
|
-
function
|
|
6503
|
+
function PullRequest_case__identifyOrCreatePRx2ccreatePR_2353($0, $1, $2, $3, $4, $5) {
|
|
6376
6504
|
switch($5.h) {
|
|
6377
6505
|
case undefined: return ($5.a1+$5.a2);
|
|
6378
|
-
default: return $3.
|
|
6506
|
+
default: return $3.a5;
|
|
6379
6507
|
}
|
|
6380
6508
|
}
|
|
6381
6509
|
|
|
6382
|
-
function
|
|
6510
|
+
function PullRequest_n__6867_1428_userNotice($0, $1, $2, $3, $4, $5, $6) {
|
|
6383
6511
|
switch($6.h) {
|
|
6384
6512
|
case 0: {
|
|
6385
6513
|
switch($2.h) {
|
|
6386
6514
|
case 0: return 'no users';
|
|
6387
|
-
default: return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1:
|
|
6515
|
+
default: return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: PullRequest_n__6867_1427_csv($0, $1, $2, $3, $4, $5, $2), a2: {h: 0}});
|
|
6388
6516
|
}
|
|
6389
6517
|
}
|
|
6390
|
-
case undefined: return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1:
|
|
6518
|
+
case undefined: return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: PullRequest_n__6867_1427_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: $2}), a2: {h: 0}});
|
|
6391
6519
|
}
|
|
6392
6520
|
}
|
|
6393
6521
|
|
|
6394
|
-
function
|
|
6522
|
+
function PullRequest_n__6867_1429_teamNotice($0, $1, $2, $3, $4, $5, $6) {
|
|
6395
6523
|
switch($6.h) {
|
|
6396
6524
|
case 0: return '';
|
|
6397
6525
|
case undefined: {
|
|
6398
6526
|
switch($6.a2.h) {
|
|
6399
|
-
case 0: return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' and team ', a2: {a1:
|
|
6400
|
-
default: return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' and teams ', a2: {a1:
|
|
6527
|
+
case 0: return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' and team ', a2: {a1: PullRequest_n__6867_1427_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: {h: 0}}), a2: {h: 0}}});
|
|
6528
|
+
default: return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' and teams ', a2: {a1: PullRequest_n__6867_1427_csv($0, $1, $2, $3, $4, $5, $6), a2: {h: 0}}});
|
|
6401
6529
|
}
|
|
6402
6530
|
}
|
|
6403
|
-
default: return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' and teams ', a2: {a1:
|
|
6531
|
+
default: return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' and teams ', a2: {a1: PullRequest_n__6867_1427_csv($0, $1, $2, $3, $4, $5, $6), a2: {h: 0}}});
|
|
6404
6532
|
}
|
|
6405
6533
|
}
|
|
6406
6534
|
|
|
6407
|
-
function
|
|
6408
|
-
return $4.a1.a2(undefined)(undefined)(System_File_Meta_exists($4,
|
|
6535
|
+
function PullRequest_n__7480_2016_prepareDescriptionFile($0, $1, $2, $3, $4, $5) {
|
|
6536
|
+
return $4.a1.a2(undefined)(undefined)(System_File_Meta_exists($4, $5))($13 => Prelude_Interfaces_when($4.a1.a1, $13, () => $4.a1.a1.a1(undefined)(undefined)($24 => (undefined))(System_File_copyFile($4, $5, 'pr_description.tmp.md'))));
|
|
6409
6537
|
}
|
|
6410
6538
|
|
|
6411
|
-
function
|
|
6539
|
+
function PullRequest_n__6867_1430_prComment($0, $1, $2, $3, $4, $5, $6) {
|
|
6412
6540
|
return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ':musical_note: Harmoniously assigned @', a2: {a1: $6, a2: {a1: ' to review this PR.', a2: {h: 0}}}});
|
|
6413
6541
|
}
|
|
6414
6542
|
|
|
6415
|
-
function
|
|
6416
|
-
const $7 = $8 => {
|
|
6417
|
-
switch(Data_Config_rf__colors($5)) {
|
|
6418
|
-
case 1: return $8;
|
|
6419
|
-
case 0: return Text_PrettyPrint_Prettyprinter_Doc_unAnnotate($8);
|
|
6420
|
-
}
|
|
6421
|
-
};
|
|
6422
|
-
return Text_PrettyPrint_Prettyprinter_Render_Terminal_renderString(Text_PrettyPrint_Prettyprinter_Doc_layoutPretty(Text_PrettyPrint_Prettyprinter_Doc_defaultLayoutOptions(), $7($6)));
|
|
6423
|
-
}
|
|
6424
|
-
|
|
6425
|
-
function PullRequest_n__7474_2029_inlineDescription($0, $1, $2, $3, $4) {
|
|
6543
|
+
function PullRequest_n__7480_2015_inlineDescription($0, $1, $2, $3, $4) {
|
|
6426
6544
|
return Prelude_Interfaces_x3ex3e($4.a1, Prelude_IO_putStrLn($4, 'What would you like the description to be (two blank lines to finish)?'), () => Prelude_Interfaces_x3cx24x3e($4.a1.a1.a1, $13 => Data_String_fastUnlines($13), Util_getManyLines($4, Data_Fuel_limit(Prelude_Types_prim__integerToNat(100n)))));
|
|
6427
6545
|
}
|
|
6428
6546
|
|
|
6429
|
-
function
|
|
6547
|
+
function PullRequest_n__6760_1302_forkedReviews($0, $1, $2, $3, $4) {
|
|
6430
6548
|
return FFI_Concurrency_fork(csegen_21(), ('reviews --json '+Prelude_Show_show_Show_Integer($4.a1)));
|
|
6431
6549
|
}
|
|
6432
6550
|
|
|
6433
|
-
function
|
|
6434
|
-
const $
|
|
6435
|
-
const $
|
|
6436
|
-
switch($
|
|
6437
|
-
case 0: return $4.a1.a2(undefined)(undefined)(System_File_ReadWrite_readFile($4, 'pr_description.tmp.md'))(description => Prelude_Interfaces_x3ex3e($4.a1, $4.a1.a2(undefined)(undefined)(System_File_Meta_exists($4, 'pr_description.tmp.md'))($
|
|
6438
|
-
default: return $4.a1.a1.a2(undefined)({h: 0, a1: {h: 0, a1: $
|
|
6551
|
+
function PullRequest_n__7480_2017_editorDescription($0, $1, $2, $3, $4, $5, $6) {
|
|
6552
|
+
const $12 = () => {
|
|
6553
|
+
const $29 = $2a => {
|
|
6554
|
+
switch($2a) {
|
|
6555
|
+
case 0: return $4.a1.a2(undefined)(undefined)(System_File_ReadWrite_readFile($4, 'pr_description.tmp.md'))(description => Prelude_Interfaces_x3ex3e($4.a1, $4.a1.a2(undefined)(undefined)(System_File_Meta_exists($4, 'pr_description.tmp.md'))($4a => Prelude_Interfaces_when($4.a1.a1, $4a, () => System_File_Node_removeFile($4, 'pr_description.tmp.md'))), () => $4.a1.a1.a2(undefined)(description)));
|
|
6556
|
+
default: return $4.a1.a1.a2(undefined)({h: 0, a1: {h: 0, a1: $2a}});
|
|
6439
6557
|
}
|
|
6440
6558
|
};
|
|
6441
|
-
return $4.a1.a2(undefined)(undefined)(System_Node_system($4, Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: $5, a2: {a1: ' pr_description.tmp.md', a2: {h: 0}}})))($
|
|
6559
|
+
return $4.a1.a2(undefined)(undefined)(System_Node_system($4, Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: $5, a2: {a1: ' pr_description.tmp.md', a2: {h: 0}}})))($29);
|
|
6442
6560
|
};
|
|
6443
|
-
return Prelude_Interfaces_x3ex3e($4.a1,
|
|
6561
|
+
return Prelude_Interfaces_x3ex3e($4.a1, PullRequest_n__7480_2016_prepareDescriptionFile($0, $1, $2, $3, $4, $6), $12);
|
|
6444
6562
|
}
|
|
6445
6563
|
|
|
6446
|
-
function
|
|
6447
|
-
return
|
|
6564
|
+
function PullRequest_n__6867_1427_csv($0, $1, $2, $3, $4, $5, $6) {
|
|
6565
|
+
return Util_renderString($5, Text_PrettyPrint_Prettyprinter_Doc_encloseSep(Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(', '), Prelude_Types_map_Functor_List(csegen_404(), $6)));
|
|
6448
6566
|
}
|
|
6449
6567
|
|
|
6450
|
-
function
|
|
6451
|
-
return Prelude_Interfaces_x3ex3e(csegen_15(), $8 => $9 => Data_Promise_x3ex3ex3d_Monad_Promise($c => $d => FFI_Git_remoteTrackingBranch($0, $c, $d), $13 => Prelude_Interfaces_when(csegen_9(), Prelude_Types_x3dx3d_Eq_x28Maybex20x24ax29(csegen_94(), $13, {h: 0}), () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), 'Creating a new remote branch...'), () => $27 => $28 => FFI_Git_pushNewBranch($0, 'origin', $2, $27, $28))), $8, $9), () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Creating a new PR for the current branch (', a2: {a1: $2, a2: {a1: ').', a2: {h: 0}}}})), () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'What branch are you merging into (ENTER for default: ', a2: {a1: $3.
|
|
6452
|
-
const $
|
|
6453
|
-
const $
|
|
6454
|
-
const $
|
|
6455
|
-
const $
|
|
6456
|
-
const $
|
|
6457
|
-
const $
|
|
6458
|
-
|
|
6459
|
-
|
|
6460
|
-
|
|
6461
|
-
|
|
6462
|
-
|
|
6463
|
-
|
|
6464
|
-
|
|
6465
|
-
|
|
6466
|
-
|
|
6568
|
+
function PullRequest_n__7480_2018_createPR($0, $1, $2, $3) {
|
|
6569
|
+
return Prelude_Interfaces_x3ex3e(csegen_15(), $8 => $9 => Data_Promise_x3ex3ex3d_Monad_Promise($c => $d => FFI_Git_remoteTrackingBranch($0, $c, $d), $13 => Prelude_Interfaces_when(csegen_9(), Prelude_Types_x3dx3d_Eq_x28Maybex20x24ax29(csegen_94(), $13, {h: 0}), () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), 'Creating a new remote branch...'), () => $27 => $28 => FFI_Git_pushNewBranch($0, Data_Maybe_fromMaybe(() => 'origin', $3.a4), $2, $27, $28))), $8, $9), () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Creating a new PR for the current branch (', a2: {a1: $2, a2: {a1: ').', a2: {h: 0}}}})), () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'What branch are you merging into (ENTER for default: ', a2: {a1: $3.a5, a2: {a1: ')?', a2: {h: 0}}}})), () => $61 => $62 => {
|
|
6570
|
+
const $6e = baseBranchInput => {
|
|
6571
|
+
const $6f = PullRequest_case__identifyOrCreatePRx2ccreatePR_2353($0, $1, $2, $3, baseBranchInput, Data_String_strM(baseBranchInput));
|
|
6572
|
+
const $82 = Data_Maybe_fromMaybe(() => '', Prelude_Interfaces_x3cx24x3e(csegen_18(), $8a => ($8a+' - '), Util_parseJiraPrefix($2)));
|
|
6573
|
+
const $81 = () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStr(csegen_21(), $82), () => $99 => $9a => {
|
|
6574
|
+
const $a8 = title => $a9 => $aa => {
|
|
6575
|
+
const $b0 = templateFilePath => $b1 => $b2 => {
|
|
6576
|
+
const $b5 = Data_Config_rf__editor($3);
|
|
6577
|
+
let $b4;
|
|
6578
|
+
switch($b5.h) {
|
|
6579
|
+
case 0: {
|
|
6580
|
+
$b4 = PullRequest_n__7480_2015_inlineDescription($0, $1, $2, $3, csegen_21());
|
|
6581
|
+
break;
|
|
6582
|
+
}
|
|
6583
|
+
case undefined: {
|
|
6584
|
+
$b4 = Prelude_Interfaces_x3cx24x3e(csegen_103(), $c3 => Prelude_Types_either(() => $c6 => '', () => $c8 => $c8, $c3), PullRequest_n__7480_2017_editorDescription($0, $1, $2, $3, csegen_21(), $b5.a1, templateFilePath));
|
|
6585
|
+
break;
|
|
6586
|
+
}
|
|
6467
6587
|
}
|
|
6468
|
-
|
|
6469
|
-
|
|
6588
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise($b4, description => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), 'Creating PR...'), () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), $2), () => FFI_GitHub_createPR($1, $3.a2, $3.a3, $2, $6f, title, description))), $b1, $b2);
|
|
6589
|
+
};
|
|
6590
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_relativeToRoot($0, '.github/PULL_REQUEST_TEMPLATE.md'), $b0, $a9, $aa);
|
|
6470
6591
|
};
|
|
6471
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $
|
|
6592
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $a1 => ($82+Data_String_trim($a1)), csegen_406()), $a8, $99, $9a);
|
|
6472
6593
|
});
|
|
6473
|
-
return Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), 'What would you like the title to be?'), $
|
|
6594
|
+
return Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), 'What would you like the title to be?'), $81);
|
|
6474
6595
|
};
|
|
6475
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $
|
|
6596
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $69 => Data_String_trim($69), csegen_406()), $6e, $61, $62);
|
|
6476
6597
|
})));
|
|
6477
6598
|
}
|
|
6478
6599
|
|
|
@@ -6529,7 +6650,7 @@ function PullRequest_reviewsForUser($0, $1, $2, $3) {
|
|
|
6529
6650
|
};
|
|
6530
6651
|
return Data_Promise_x3ex3ex3d_Monad_Promise($2a, reviews => $53 => $54 => Data_Promise_pure_Applicative_Promise(Prelude_Types_List_filter($59 => Data_Review_isAuthor($2, $59), Prelude_Types_join_Monad_List(reviews)), $53, $54), $27, $28);
|
|
6531
6652
|
};
|
|
6532
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_15(), csegen_113(), Prelude_Types_traverse_Traversable_List(csegen_9(), $1e =>
|
|
6653
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_15(), csegen_113(), Prelude_Types_traverse_Traversable_List(csegen_9(), $1e => PullRequest_n__6760_1302_forkedReviews($1, $3, $2, $0, $1e), $4)), $26, $10, $11);
|
|
6533
6654
|
};
|
|
6534
6655
|
}
|
|
6535
6656
|
|
|
@@ -6541,7 +6662,7 @@ function PullRequest_requestReviewers($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
|
6541
6662
|
const $41 = chosenUser => {
|
|
6542
6663
|
const $42 = Prelude_Types_List_tailRecAppend(Prelude_Types_toList_Foldable_Maybe(chosenUser), $4);
|
|
6543
6664
|
let $48;
|
|
6544
|
-
switch($0.
|
|
6665
|
+
switch($0.a6) {
|
|
6545
6666
|
case 1: {
|
|
6546
6667
|
$48 = $3;
|
|
6547
6668
|
break;
|
|
@@ -6562,20 +6683,20 @@ function PullRequest_requestReviewers($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
|
6562
6683
|
break;
|
|
6563
6684
|
}
|
|
6564
6685
|
}
|
|
6565
|
-
const $4e = Prelude_Interfaces_when(csegen_9(), $52, () => Prelude_Interfaces_x3ex3e(csegen_15(), $59 => $5a => Data_Promise_map_Functor_Promise($5d => (undefined), FFI_GitHub_addPullReviewers($1, $0.a2, $0.a3, $2.a1, $42, $48), $59, $5a), () => Prelude_Interfaces_when(csegen_9(), $0.
|
|
6686
|
+
const $4e = Prelude_Interfaces_when(csegen_9(), $52, () => Prelude_Interfaces_x3ex3e(csegen_15(), $59 => $5a => Data_Promise_map_Functor_Promise($5d => (undefined), FFI_GitHub_addPullReviewers($1, $0.a2, $0.a3, $2.a1, $42, $48), $59, $5a), () => Prelude_Interfaces_when(csegen_9(), $0.a7, () => $72 => $73 => {
|
|
6566
6687
|
switch(chosenUser.h) {
|
|
6567
|
-
case undefined: return FFI_GitHub_createComment($1, $0.a2, $0.a3, $2.a1,
|
|
6688
|
+
case undefined: return FFI_GitHub_createComment($1, $0.a2, $0.a3, $2.a1, PullRequest_n__6867_1430_prComment($1, $5, $4, $3, $2, $0, chosenUser.a1), $72, $73);
|
|
6568
6689
|
case 0: return Data_Promise_pure_Applicative_Promise(undefined, $72, $73);
|
|
6569
6690
|
}
|
|
6570
6691
|
})));
|
|
6571
6692
|
let $8c;
|
|
6572
6693
|
switch(Prelude_Types_null_Foldable_List($42)) {
|
|
6573
6694
|
case 1: {
|
|
6574
|
-
$8c = () => Prelude_IO_putStrLn(csegen_21(),
|
|
6695
|
+
$8c = () => Prelude_IO_putStrLn(csegen_21(), Util_renderString($0, Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Could not pick a user from the given Team ')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('(perhaps the only option was the author of the pull request?).'), a2: {h: 0}}})));
|
|
6575
6696
|
break;
|
|
6576
6697
|
}
|
|
6577
6698
|
case 0: {
|
|
6578
|
-
$8c = () => Prelude_IO_putStrLn(csegen_21(),
|
|
6699
|
+
$8c = () => Prelude_IO_putStrLn(csegen_21(), Util_renderString($0, Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Assigned ', a2: {a1: PullRequest_n__6867_1428_userNotice($1, $5, $4, $3, $2, $0, chosenUser), a2: {a1: PullRequest_n__6867_1429_teamNotice($1, $5, $4, $3, $2, $0, $48), a2: {a1: ' to the open PR ', a2: {h: 0}}}}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'for the current branch (', a2: {a1: Data_PullRequest_rf__webURI($0, $2), a2: {a1: ').', a2: {h: 0}}}})), a2: {h: 0}}})));
|
|
6579
6700
|
break;
|
|
6580
6701
|
}
|
|
6581
6702
|
}
|
|
@@ -6589,6 +6710,10 @@ function PullRequest_requestReviewers($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
|
6589
6710
|
return Data_Promise_x3ex3ex3d_Monad_Promise($a => $b => PullRequest_listReviewers($0, $1, 4n, csegen_134(), $a, $b), $14, $6, $7);
|
|
6590
6711
|
}
|
|
6591
6712
|
|
|
6713
|
+
function PullRequest_relativeToRoot($0, $1) {
|
|
6714
|
+
return Prelude_Interfaces_x3cx26x3e(csegen_103(), $6 => $7 => FFI_Git_rootDir($0, $6, $7), $d => ($d+Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: '/', a2: {a1: $1, a2: {h: 0}}})));
|
|
6715
|
+
}
|
|
6716
|
+
|
|
6592
6717
|
function PullRequest_partitionx27($0, $1, $2) {
|
|
6593
6718
|
const $40 = prJsons => $41 => $42 => {
|
|
6594
6719
|
const $44 = $45 => $46 => {
|
|
@@ -6610,7 +6735,7 @@ function PullRequest_partitionx27($0, $1, $2) {
|
|
|
6610
6735
|
}
|
|
6611
6736
|
};
|
|
6612
6737
|
const $4c = {a1: $4d, a2: a => $55 => ({h: 1, a1: $55}), a3: $57};
|
|
6613
|
-
const $4a = Prelude_Types_traverse_Traversable_List($4c,
|
|
6738
|
+
const $4a = Prelude_Types_traverse_Traversable_List($4c, csegen_436(), prJsons);
|
|
6614
6739
|
return Data_Promise_either(csegen_115(), $4a, $45, $46);
|
|
6615
6740
|
};
|
|
6616
6741
|
return Data_Promise_x3ex3ex3d_Monad_Promise($44, pulls => $67 => $68 => Data_Promise_pure_Applicative_Promise(PullRequest_partition(Prelude_Types_join_Monad_List(pulls)), $67, $68), $41, $42);
|
|
@@ -6637,12 +6762,12 @@ function PullRequest_identifyOrCreatePR($0, $1, $2, $3, $4, $5) {
|
|
|
6637
6762
|
return $12 => $13 => {
|
|
6638
6763
|
switch($10.a2.h) {
|
|
6639
6764
|
case 0: return Data_Promise_pure_Applicative_Promise({a1: 0, a2: $10.a1}, $12, $13);
|
|
6640
|
-
default: return Data_Promise_reject('Multiple PRs for the current brach.
|
|
6765
|
+
default: return Data_Promise_reject('Multiple PRs for the current brach. Harmony only handles 1 PR per branch currently.', $12, $13);
|
|
6641
6766
|
}
|
|
6642
6767
|
};
|
|
6643
6768
|
}
|
|
6644
|
-
case 0: return Prelude_Interfaces_x3cx24x3e(csegen_103(), $23 => ({a1: 1, a2: $23}),
|
|
6645
|
-
default: return $2c => $2d => Data_Promise_reject('Multiple PRs for the current brach.
|
|
6769
|
+
case 0: return Prelude_Interfaces_x3cx24x3e(csegen_103(), $23 => ({a1: 1, a2: $23}), PullRequest_n__7480_2018_createPR($1, $2, $3, $0));
|
|
6770
|
+
default: return $2c => $2d => Data_Promise_reject('Multiple PRs for the current brach. Harmony only handles 1 PR per branch currently.', $2c, $2d);
|
|
6646
6771
|
}
|
|
6647
6772
|
};
|
|
6648
6773
|
return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listPRsForBranch($2, $0.a2, $0.a3, $3), $f, $4, $5);
|
|
@@ -6717,14 +6842,14 @@ function System_File_ReadWrite_readLinesOnto($0, $1, $2, $3, $4) {
|
|
|
6717
6842
|
}
|
|
6718
6843
|
};
|
|
6719
6844
|
const $26 = {a1: $27, a2: a => $2f => ({h: 1, a1: $2f}), a3: $31};
|
|
6720
|
-
const $25 = {a1: $26, a2:
|
|
6845
|
+
const $25 = {a1: $26, a2: csegen_246(), a3: csegen_247()};
|
|
6721
6846
|
const $40 = b => a => func => $41 => {
|
|
6722
6847
|
switch($41.h) {
|
|
6723
6848
|
case 0: return {h: 0, a1: $41.a1};
|
|
6724
6849
|
case 1: return {h: 1, a1: func($41.a1)};
|
|
6725
6850
|
}
|
|
6726
6851
|
};
|
|
6727
|
-
const $3f = {a1: $40, a2:
|
|
6852
|
+
const $3f = {a1: $40, a2: csegen_456(), a3: csegen_460()};
|
|
6728
6853
|
return Prelude_Interfaces_Monad_x3ex3ex3d_Monad_Composex28x28x2ex20x24mx29x20x24tx29($0.a1, $25, $3f, System_File_ReadWrite_fGetLine($0, $4), str => System_File_ReadWrite_readLinesOnto($0, {a1: str, a2: $1}, 0n, $3.a1(), $4));
|
|
6729
6854
|
}
|
|
6730
6855
|
default: {
|
|
@@ -7073,18 +7198,18 @@ function System_Node_system($0, $1) {
|
|
|
7073
7198
|
return $0.a2(undefined)($7 => System_Node_prim__system($1, $7));
|
|
7074
7199
|
}
|
|
7075
7200
|
|
|
7076
|
-
function
|
|
7201
|
+
function Reviewer_with__scoredReviewersx2czipReviewsx2ccalc_1758($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a, $b, $c, $d, $e) {
|
|
7077
7202
|
switch($c.h) {
|
|
7078
7203
|
case 0: return ($e+$d);
|
|
7079
7204
|
case 1: return Prelude_Types_prim__integerToNat(($e-$d));
|
|
7080
7205
|
}
|
|
7081
7206
|
}
|
|
7082
7207
|
|
|
7083
|
-
function
|
|
7208
|
+
function Reviewer_n__5330_2143_yellowDot($0, $1, $2, $3, $4) {
|
|
7084
7209
|
return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\u{b7}'));
|
|
7085
7210
|
}
|
|
7086
7211
|
|
|
7087
|
-
function
|
|
7212
|
+
function Reviewer_n__4753_1591_weightReviews($0, $1, $2, $3, $4, $5) {
|
|
7088
7213
|
const $6 = Data_List_groupAllWith($0, $a => $a, $5);
|
|
7089
7214
|
const $10 = xs => {
|
|
7090
7215
|
const $11 = (Prelude_Types_List_lengthTR(Data_List1_forget(xs))*$4);
|
|
@@ -7093,43 +7218,43 @@ function Reviewer_n__4747_1531_weightReviews($0, $1, $2, $3, $4, $5) {
|
|
|
7093
7218
|
return Prelude_Interfaces_x3cx26x3e(csegen_119(), $6, $10);
|
|
7094
7219
|
}
|
|
7095
7220
|
|
|
7096
|
-
function
|
|
7221
|
+
function Reviewer_n__4753_1592_sortx27($0, $1, $2, $3, $4) {
|
|
7097
7222
|
return Data_List_sortBy($7 => $8 => Prelude_Basics_on($b => $c => Prelude_EqOrd_compare_Ord_Integer($b, $c), $11 => $11.a3, $7, $8), $4);
|
|
7098
7223
|
}
|
|
7099
7224
|
|
|
7100
|
-
function
|
|
7225
|
+
function Reviewer_n__5330_2144_redDot($0, $1, $2, $3, $4) {
|
|
7101
7226
|
return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(1), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\u{25e6}'));
|
|
7102
7227
|
}
|
|
7103
7228
|
|
|
7104
|
-
function
|
|
7105
|
-
return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Weighted review workload.'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('4x the
|
|
7229
|
+
function Reviewer_n__5330_2145_header($0, $1, $2, $3, $4) {
|
|
7230
|
+
return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Weighted review workload.'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('4x the number of open review requests'), Text_PrettyPrint_Prettyprinter_Symbols_parens(Reviewer_n__5330_2143_yellowDot($0, $1, $2, $3, $4))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('1x the number of closed PRs with unanswered review requests'), Text_PrettyPrint_Prettyprinter_Symbols_parens(Reviewer_n__5330_2144_redDot($0, $1, $2, $3, $4))), a2: {a1: Text_PrettyPrint_Prettyprinter_Symbols_parens(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Reviewer_n__5330_2144_redDot($0, $1, $2, $3, $4), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('overlayed on'), Reviewer_n__5330_2143_yellowDot($0, $1, $2, $3, $4)))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}}}});
|
|
7106
7231
|
}
|
|
7107
7232
|
|
|
7108
|
-
function
|
|
7233
|
+
function Reviewer_n__5330_2147_graphOne($0, $1, $2, $3, $4, $5, $6) {
|
|
7109
7234
|
const $8 = Prelude_Types_prim__integerToNat(($5-$6.a2));
|
|
7110
7235
|
const $d = Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), $1.a1(undefined)($6.a1));
|
|
7111
7236
|
const $17 = Prelude_Types_prim__integerToNat(($6.a2-$6.a3));
|
|
7112
7237
|
const $1c = Prelude_Types_prim__integerToNat(($5-$6.a3));
|
|
7113
|
-
return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(
|
|
7238
|
+
return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Reviewer_n__5330_2146_bar($0, $1, $2, $3, $4, $8, $6.a3, Prelude_Types_min_Ord_Nat($1c, $17)), $d);
|
|
7114
7239
|
}
|
|
7115
7240
|
|
|
7116
|
-
function
|
|
7117
|
-
return Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Types_map_Functor_List($b =>
|
|
7241
|
+
function Reviewer_n__5330_2148_graph($0, $1, $2, $3, $4, $5, $6) {
|
|
7242
|
+
return Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Types_map_Functor_List($b => Reviewer_n__5330_2147_graphOne($0, $1, $2, $3, $4, $5, $b), $6));
|
|
7118
7243
|
}
|
|
7119
7244
|
|
|
7120
|
-
function
|
|
7121
|
-
return
|
|
7245
|
+
function Reviewer_n__4780_1748_calc($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a, $b, $c, $d) {
|
|
7246
|
+
return Reviewer_with__scoredReviewersx2czipReviewsx2ccalc_1758(undefined, $0, $1, $2, $3, $4, $5, $6, $8, $9, $a, $b, $a, $d, $c);
|
|
7122
7247
|
}
|
|
7123
7248
|
|
|
7124
|
-
function
|
|
7249
|
+
function Reviewer_n__5330_2146_bar($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
7125
7250
|
return Text_PrettyPrint_Prettyprinter_Doc_indent(Prelude_Cast_cast_Cast_Nat_Int($5), Text_PrettyPrint_Prettyprinter_Doc_hcat({a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(1), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_String_replicate($7, '\u{25e6}'))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_String_replicate($6, '\u{b7}'))), a2: {h: 0}}}));
|
|
7126
7251
|
}
|
|
7127
7252
|
|
|
7128
7253
|
function Reviewer_scoredReviewers($0, $1, $2, $3) {
|
|
7129
|
-
const $4 =
|
|
7130
|
-
const $c =
|
|
7131
|
-
const $14 =
|
|
7132
|
-
return
|
|
7254
|
+
const $4 = Reviewer_n__4753_1591_weightReviews($0, $3, $2, $1, 1n, $1);
|
|
7255
|
+
const $c = Reviewer_n__4753_1591_weightReviews($0, $3, $2, $1, 4n, $2);
|
|
7256
|
+
const $14 = Reviewer_n__4753_1596_zipReviews($0, $3, $2, $1, $c, $4, {h: 1, a1: $0, a2: $3, a3: $2, a4: $1}, 0);
|
|
7257
|
+
return Reviewer_n__4753_1592_sortx27($0, $3, $2, $1, Reviewer_n__4753_1596_zipReviews($0, $3, $2, $1, $14, Reviewer_n__4753_1591_weightReviews($0, $3, $2, $1, 0n, $3), {h: 0, a1: $0, a2: $3, a3: $2, a4: $1}, 1));
|
|
7133
7258
|
}
|
|
7134
7259
|
|
|
7135
7260
|
function Reviewer_reviewsGraph($0, $1, $2, $3, $4) {
|
|
@@ -7149,8 +7274,8 @@ function Reviewer_reviewsGraph($0, $1, $2, $3, $4) {
|
|
|
7149
7274
|
break;
|
|
7150
7275
|
}
|
|
7151
7276
|
}
|
|
7152
|
-
const $28 =
|
|
7153
|
-
const $1f = Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(
|
|
7277
|
+
const $28 = Reviewer_n__5330_2148_graph($0, $1, $4, $3, $2, $2f, $5);
|
|
7278
|
+
const $1f = Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Reviewer_n__5330_2145_header($0, $1, $4, $3, $2), $28);
|
|
7154
7279
|
return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29($1f, Text_PrettyPrint_Prettyprinter_Doc_line());
|
|
7155
7280
|
}
|
|
7156
7281
|
}
|
|
@@ -7250,23 +7375,27 @@ function FFI_GitHub_listPullRequestsJsonStr($0, $1, $2, $3, $4, $5) {
|
|
|
7250
7375
|
}
|
|
7251
7376
|
|
|
7252
7377
|
function FFI_GitHub_listPullRequests($0, $1, $2, $3, $4, $5) {
|
|
7253
|
-
return Prelude_Interfaces_x3dx3cx3c(csegen_15(),
|
|
7378
|
+
return Prelude_Interfaces_x3dx3cx3c(csegen_15(), csegen_481(), FFI_GitHub_listPullRequestsJsonStr($0, $1, $2, $3, $4, $5));
|
|
7254
7379
|
}
|
|
7255
7380
|
|
|
7256
7381
|
function FFI_GitHub_listPRsForBranch($0, $1, $2, $3) {
|
|
7257
|
-
return Prelude_Interfaces_x3dx3cx3c(csegen_15(),
|
|
7382
|
+
return Prelude_Interfaces_x3dx3cx3c(csegen_15(), csegen_481(), $a => $b => FFI_promiseIO($e => $f => $10 => FFI_GitHub_prim__listPRsForBranch($0, $1, $2, $3, $e, $f, $10), $a, $b));
|
|
7258
7383
|
}
|
|
7259
7384
|
|
|
7260
7385
|
function FFI_GitHub_listOrgMembers($0, $1) {
|
|
7261
7386
|
return Prelude_Interfaces_x3cx24x3e(csegen_103(), $6 => Data_String_lines($6), $a => $b => FFI_promiseIO($e => $f => $10 => FFI_GitHub_prim__listOrgMembers($0, $1, $e, $f, $10), $a, $b));
|
|
7262
7387
|
}
|
|
7263
7388
|
|
|
7389
|
+
function FFI_GitHub_listMyTeams($0) {
|
|
7390
|
+
return Prelude_Interfaces_x3cx24x3e(csegen_103(), $5 => Data_String_lines($5), $9 => $a => FFI_promiseIO($d => $e => $f => FFI_GitHub_prim__listMyTeams($0, $d, $e, $f), $9, $a));
|
|
7391
|
+
}
|
|
7392
|
+
|
|
7264
7393
|
function FFI_GitHub_getUser($0) {
|
|
7265
|
-
return Prelude_Interfaces_x3cx3dx3c(csegen_15(),
|
|
7394
|
+
return Prelude_Interfaces_x3cx3dx3c(csegen_15(), csegen_482(), $7 => $8 => $9 => FFI_promiseIO($c => $d => $e => FFI_GitHub_prim__getUser($0, $7, $c, $d, $e), $8, $9));
|
|
7266
7395
|
}
|
|
7267
7396
|
|
|
7268
7397
|
function FFI_GitHub_getSelf($0) {
|
|
7269
|
-
return Prelude_Interfaces_x3dx3cx3c(csegen_15(),
|
|
7398
|
+
return Prelude_Interfaces_x3dx3cx3c(csegen_15(), csegen_482(), $7 => $8 => FFI_promiseIO($b => $c => $d => FFI_GitHub_prim__getSelf($0, $b, $c, $d), $7, $8));
|
|
7270
7399
|
}
|
|
7271
7400
|
|
|
7272
7401
|
function FFI_GitHub_getRepoDefaultBranch($0, $1, $2, $3, $4) {
|
|
@@ -7360,8 +7489,8 @@ function Data_User_parseUserString($0) {
|
|
|
7360
7489
|
}
|
|
7361
7490
|
};
|
|
7362
7491
|
const $3 = {a1: $4, a2: a => $c => ({h: 1, a1: $c}), a3: $e};
|
|
7363
|
-
const $2 = {a1: $3, a2:
|
|
7364
|
-
return Prelude_Interfaces_x3ex3dx3e($2,
|
|
7492
|
+
const $2 = {a1: $3, a2: csegen_246(), a3: csegen_247()};
|
|
7493
|
+
return Prelude_Interfaces_x3ex3dx3e($2, csegen_248(), $1f => Data_User_parseUser($1f), $0);
|
|
7365
7494
|
}
|
|
7366
7495
|
|
|
7367
7496
|
function Data_User_parseUser($0) {
|
|
@@ -7408,7 +7537,7 @@ function Data_Review_parseReview($0) {
|
|
|
7408
7537
|
}
|
|
7409
7538
|
};
|
|
7410
7539
|
const $20 = {a1: $21, a2: a => $29 => ({h: 1, a1: $29}), a3: $2b};
|
|
7411
|
-
const $1f = {a1: $20, a2:
|
|
7540
|
+
const $1f = {a1: $20, a2: csegen_246(), a3: csegen_247()};
|
|
7412
7541
|
const $1d = Prelude_Interfaces_x3dx3cx3c($1f, $3a => Data_Review_parseState($3a), Language_JSON_Accessors_string($12.a2.a1));
|
|
7413
7542
|
const $40 = state => {
|
|
7414
7543
|
const $46 = b => a => func => $47 => {
|
|
@@ -7429,7 +7558,7 @@ function Data_Review_parseReview($0) {
|
|
|
7429
7558
|
}
|
|
7430
7559
|
};
|
|
7431
7560
|
const $45 = {a1: $46, a2: a => $4e => ({h: 1, a1: $4e}), a3: $50};
|
|
7432
|
-
const $44 = {a1: $45, a2:
|
|
7561
|
+
const $44 = {a1: $45, a2: csegen_246(), a3: csegen_247()};
|
|
7433
7562
|
const $42 = Prelude_Interfaces_x3dx3cx3c($44, $5f => Data_Review_parseDateTime($5f), Language_JSON_Accessors_string($12.a2.a2.a1));
|
|
7434
7563
|
return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($42, submittedAt => ({h: 1, a1: {a1: submittedAt, a2: author, a3: state}}));
|
|
7435
7564
|
};
|
|
@@ -7682,8 +7811,8 @@ function Data_PullRequest_parsePullRequestsString($0) {
|
|
|
7682
7811
|
}
|
|
7683
7812
|
};
|
|
7684
7813
|
const $3 = {a1: $4, a2: a => $c => ({h: 1, a1: $c}), a3: $e};
|
|
7685
|
-
const $2 = {a1: $3, a2:
|
|
7686
|
-
return Prelude_Interfaces_x3ex3dx3e($2,
|
|
7814
|
+
const $2 = {a1: $3, a2: csegen_246(), a3: csegen_247()};
|
|
7815
|
+
return Prelude_Interfaces_x3ex3dx3e($2, csegen_248(), csegen_436(), $0);
|
|
7687
7816
|
}
|
|
7688
7817
|
|
|
7689
7818
|
function Data_PullRequest_parsePullRequestString($0) {
|
|
@@ -7705,8 +7834,8 @@ function Data_PullRequest_parsePullRequestString($0) {
|
|
|
7705
7834
|
}
|
|
7706
7835
|
};
|
|
7707
7836
|
const $3 = {a1: $4, a2: a => $c => ({h: 1, a1: $c}), a3: $e};
|
|
7708
|
-
const $2 = {a1: $3, a2:
|
|
7709
|
-
return Prelude_Interfaces_x3ex3dx3e($2,
|
|
7837
|
+
const $2 = {a1: $3, a2: csegen_246(), a3: csegen_247()};
|
|
7838
|
+
return Prelude_Interfaces_x3ex3dx3e($2, csegen_248(), $1f => Data_PullRequest_parsePR($1f), $0);
|
|
7710
7839
|
}
|
|
7711
7840
|
|
|
7712
7841
|
function Data_PullRequest_parsePR($0) {
|
|
@@ -7732,7 +7861,7 @@ function Data_PullRequest_parsePR($0) {
|
|
|
7732
7861
|
}
|
|
7733
7862
|
};
|
|
7734
7863
|
const $2e = {a1: $2f, a2: a => $37 => ({h: 1, a1: $37}), a3: $39};
|
|
7735
|
-
const $2d = {a1: $2e, a2:
|
|
7864
|
+
const $2d = {a1: $2e, a2: csegen_246(), a3: csegen_247()};
|
|
7736
7865
|
const $2b = Prelude_Interfaces_x3dx3cx3c($2d, $48 => Data_PullRequest_parseState($48), Language_JSON_Accessors_string($18.a2.a2.a1));
|
|
7737
7866
|
const $4e = state => {
|
|
7738
7867
|
const $54 = b => a => func => $55 => {
|
|
@@ -7753,7 +7882,7 @@ function Data_PullRequest_parsePR($0) {
|
|
|
7753
7882
|
}
|
|
7754
7883
|
};
|
|
7755
7884
|
const $53 = {a1: $54, a2: a => $5c => ({h: 1, a1: $5c}), a3: $5e};
|
|
7756
|
-
const $52 = {a1: $53, a2:
|
|
7885
|
+
const $52 = {a1: $53, a2: csegen_246(), a3: csegen_247()};
|
|
7757
7886
|
const $50 = Prelude_Interfaces_x3dx3cx3c($52, $6d => Data_PullRequest_parseDateTime($6d), Language_JSON_Accessors_string($18.a2.a2.a2.a1));
|
|
7758
7887
|
return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($50, createdAt => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_array($78 => Language_JSON_Accessors_string($78), $18.a2.a2.a2.a2.a1), reviewers => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($18.a2.a2.a2.a2.a2.a1), headRef => ({h: 1, a1: {a1: number, a2: createdAt, a3: author, a4: state, a5: reviewers, a6: headRef}}))));
|
|
7759
7888
|
};
|
|
@@ -7780,7 +7909,7 @@ function Data_PullRequest_isAuthor($0, $1) {
|
|
|
7780
7909
|
return Prelude_EqOrd_x3dx3d_Eq_String($1.a3, $0);
|
|
7781
7910
|
}
|
|
7782
7911
|
|
|
7783
|
-
function
|
|
7912
|
+
function FFI_Git_case__remoteTrackingBranch_1782($0, $1, $2) {
|
|
7784
7913
|
switch($1) {
|
|
7785
7914
|
case '': {
|
|
7786
7915
|
switch($2.h) {
|
|
@@ -7792,18 +7921,30 @@ function FFI_Git_case__remoteTrackingBranch_1746($0, $1, $2) {
|
|
|
7792
7921
|
}
|
|
7793
7922
|
}
|
|
7794
7923
|
|
|
7924
|
+
function FFI_Git_userEmail($0, $1, $2) {
|
|
7925
|
+
return FFI_promiseIO($5 => $6 => $7 => FFI_Git_prim__userEmail($0, $5, $6, $7), $1, $2);
|
|
7926
|
+
}
|
|
7927
|
+
|
|
7928
|
+
function FFI_Git_rootDir($0, $1, $2) {
|
|
7929
|
+
return FFI_promiseIO($5 => $6 => $7 => FFI_Git_prim__rootDir($0, $5, $6, $7), $1, $2);
|
|
7930
|
+
}
|
|
7931
|
+
|
|
7795
7932
|
function FFI_Git_remoteURI($0, $1, $2, $3) {
|
|
7796
7933
|
return FFI_promiseIO($6 => $7 => $8 => FFI_Git_prim__remoteURI($0, $1, $6, $7, $8), $2, $3);
|
|
7797
7934
|
}
|
|
7798
7935
|
|
|
7799
7936
|
function FFI_Git_remoteTrackingBranch($0, $1, $2) {
|
|
7800
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise($5 => $6 => FFI_promiseIO($9 => $a => $b => FFI_Git_prim__remoteTrackingBranch($0, $9, $a, $b), $5, $6), str => $14 => $15 => Data_Promise_pure_Applicative_Promise(
|
|
7937
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise($5 => $6 => FFI_promiseIO($9 => $a => $b => FFI_Git_prim__remoteTrackingBranch($0, $9, $a, $b), $5, $6), str => $14 => $15 => Data_Promise_pure_Applicative_Promise(FFI_Git_case__remoteTrackingBranch_1782($0, str, Data_String_strM(str)), $14, $15), $1, $2);
|
|
7801
7938
|
}
|
|
7802
7939
|
|
|
7803
7940
|
function FFI_Git_pushNewBranch($0, $1, $2, $3, $4) {
|
|
7804
7941
|
return Data_Promise_map_Functor_Promise($7 => (undefined), $9 => $a => FFI_promiseIO($d => $e => $f => FFI_Git_prim__pushNewBranch($0, $1, $2, $d, $e, $f), $9, $a), $3, $4);
|
|
7805
7942
|
}
|
|
7806
7943
|
|
|
7944
|
+
function FFI_Git_listRemotes($0) {
|
|
7945
|
+
return Prelude_Interfaces_x3cx24x3e(csegen_103(), $5 => Data_String_lines($5), $9 => $a => FFI_promiseIO($d => $e => $f => FFI_Git_prim__listRemotes($0, $d, $e, $f), $9, $a));
|
|
7946
|
+
}
|
|
7947
|
+
|
|
7807
7948
|
function FFI_Git_git($0) {
|
|
7808
7949
|
return Prelude_Interfaces_x3cx24x3e($0.a1.a1.a1, $7 => $7, $0.a2(undefined)($e => FFI_Git_prim__git($e)));
|
|
7809
7950
|
}
|
|
@@ -7879,7 +8020,7 @@ function Data_Pagination_with__lemma_5493($0, $1, $2, $3, $4) {
|
|
|
7879
8020
|
}
|
|
7880
8021
|
|
|
7881
8022
|
function Data_Pagination_toList_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($0) {
|
|
7882
|
-
return Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29(
|
|
8023
|
+
return Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29(csegen_192(), {h: 0}, $0);
|
|
7883
8024
|
}
|
|
7884
8025
|
|
|
7885
8026
|
function Data_Pagination_null_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($0) {
|
|
@@ -7894,7 +8035,7 @@ function Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24p
|
|
|
7894
8035
|
}
|
|
7895
8036
|
|
|
7896
8037
|
function Data_Pagination_foldl_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($0, $1, $2) {
|
|
7897
|
-
return Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($6 => $7 => Prelude_Basics_flip(
|
|
8038
|
+
return Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($6 => $7 => Prelude_Basics_flip(csegen_193(), $c => Prelude_Basics_flip($0, $6, $c), $7), $13 => $13, $2)($1);
|
|
7898
8039
|
}
|
|
7899
8040
|
|
|
7900
8041
|
function Data_Pagination_foldlM_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($0, $1, $2, $3) {
|
|
@@ -7986,7 +8127,7 @@ function System_getEnv($0, $1) {
|
|
|
7986
8127
|
function System_getArgs($0) {
|
|
7987
8128
|
const $12 = n => {
|
|
7988
8129
|
switch(Prelude_EqOrd_x3e_Ord_Int(n, Number(_truncBigInt32(0n)))) {
|
|
7989
|
-
case 1: return Prelude_Interfaces_for($0.a1.a1, {a1: b => a => func => $1e => Prelude_Types_map_Functor_List(func, $1e), a2: csegen_77(), a3: b => a => f => $25 => $26 => $27 => Prelude_Types_traverse_Traversable_List($25, $26, $27)}, Prelude_Types_rangeFromTo_Range_x24a({a1: {a1:
|
|
8130
|
+
case 1: return Prelude_Interfaces_for($0.a1.a1, {a1: b => a => func => $1e => Prelude_Types_map_Functor_List(func, $1e), a2: csegen_77(), a3: b => a => f => $25 => $26 => $27 => Prelude_Types_traverse_Traversable_List($25, $26, $27)}, Prelude_Types_rangeFromTo_Range_x24a({a1: {a1: csegen_515(), a2: $33 => $34 => Prelude_Num_div_Integral_Int($33, $34), a3: $39 => $3a => Prelude_Num_mod_Integral_Int($39, $3a)}, a2: {a1: csegen_262(), a2: {a1: csegen_515(), a2: $45 => _sub32s(0, $45), a3: $49 => $4a => _sub32s($49, $4a)}}}, 0, _sub32s(n, 1)), $52 => $0.a2(undefined)($58 => System_prim__getArg($52, $58)));
|
|
7990
8131
|
case 0: return $0.a1.a1.a2(undefined)({h: 0});
|
|
7991
8132
|
}
|
|
7992
8133
|
};
|
|
@@ -8008,59 +8149,59 @@ function System_exitFailure($0) {
|
|
|
8008
8149
|
return System_exitWith($0, {a1: 1, a2: undefined});
|
|
8009
8150
|
}
|
|
8010
8151
|
|
|
8011
|
-
function
|
|
8012
|
-
return
|
|
8152
|
+
function Help_n__4281_1021_subcommand($0, $1) {
|
|
8153
|
+
return Help_n__4281_1019_maybeDecorate($0, $5 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(5), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($5)), $1);
|
|
8013
8154
|
}
|
|
8014
8155
|
|
|
8015
|
-
function
|
|
8016
|
-
return
|
|
8156
|
+
function Help_n__4281_1024_shell($0, $1) {
|
|
8157
|
+
return Help_n__4281_1019_maybeDecorate($0, $5 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($5)), $1);
|
|
8017
8158
|
}
|
|
8018
8159
|
|
|
8019
|
-
function
|
|
8020
|
-
return
|
|
8160
|
+
function Help_n__4281_1020_option($0, $1) {
|
|
8161
|
+
return Help_n__4281_1019_maybeDecorate($0, $5 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_bold(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($5)), $1);
|
|
8021
8162
|
}
|
|
8022
8163
|
|
|
8023
|
-
function
|
|
8164
|
+
function Help_n__4281_1019_maybeDecorate($0, $1, $2) {
|
|
8024
8165
|
switch($0) {
|
|
8025
8166
|
case 1: return Text_PrettyPrint_Prettyprinter_Render_Terminal_renderString(Text_PrettyPrint_Prettyprinter_Doc_layoutPretty(Text_PrettyPrint_Prettyprinter_Doc_defaultLayoutOptions(), $1($2)));
|
|
8026
8167
|
case 0: return $2;
|
|
8027
8168
|
}
|
|
8028
8169
|
}
|
|
8029
8170
|
|
|
8030
|
-
function
|
|
8031
|
-
return
|
|
8171
|
+
function Help_n__4281_1023_heading($0, $1) {
|
|
8172
|
+
return Help_n__4281_1019_maybeDecorate($0, $5 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($5)), $1);
|
|
8032
8173
|
}
|
|
8033
8174
|
|
|
8034
|
-
function
|
|
8035
|
-
return
|
|
8175
|
+
function Help_n__4281_1022_argument($0, $1) {
|
|
8176
|
+
return Help_n__4281_1019_maybeDecorate($0, csegen_404(), $1);
|
|
8036
8177
|
}
|
|
8037
8178
|
|
|
8038
8179
|
function Help_help($0) {
|
|
8039
|
-
return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'harmony ', a2: {a1:
|
|
8180
|
+
return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'harmony ', a2: {a1: Help_n__4281_1021_subcommand($0, '<subcommand>'), a2: {a1: '\n\n', a2: {a1: Help_n__4281_1023_heading($0, 'Subcommands'), a2: {a1: ':\n ', a2: {a1: Help_n__4281_1021_subcommand($0, 'help'), a2: {a1: '\n - Print help\n ', a2: {a1: Help_n__4281_1021_subcommand($0, 'version'), a2: {a1: '\n - Print version\n ', a2: {a1: Help_n__4281_1021_subcommand($0, 'config'), a2: {a1: ' {', a2: {a1: Help_n__4281_1022_argument($0, '<property>'), a2: {a1: '} [', a2: {a1: Help_n__4281_1022_argument($0, '<value>'), a2: {a1: ']\n - Get or set the value of a configuration property. Not all properties\n can be set and read via this subcommand.\n ', a2: {a1: Help_n__4281_1022_argument($0, 'properties'), a2: {a1: ': ', a2: {a1: Data_String_Extra_join(', ', csegen_77(), Prelude_Interfaces_x3cx24x3e(csegen_119(), $4b => Help_n__4281_1020_option($0, $4b), Data_Config_settableProps())), a2: {a1: '.\n ', a2: {a1: Help_n__4281_1021_subcommand($0, 'sync'), a2: {a1: '\n - Synchronize local config with information from GitHub.\n ', a2: {a1: Help_n__4281_1021_subcommand($0, 'branch'), a2: {a1: '\n - Print the GitHub URI for the currently checked out branch.\n ', a2: {a1: Help_n__4281_1021_subcommand($0, 'pr'), a2: {a1: '\n - Identify an existing PR or create a new one for the current branch.\n ', a2: {a1: Help_n__4281_1021_subcommand($0, 'contribute'), a2: {a1: ' [', a2: {a1: Help_n__4281_1022_argument($0, '-c/--checkout'), a2: {a1: '] [', a2: {a1: Help_n__4281_1022_argument($0, '-<num>'), a2: {a1: ']\n - Contribute to an open PR. Prints a URL. Prioritizes PRs you are\n requested to review but will also return other PRs.\n ', a2: {a1: Help_n__4281_1021_subcommand($0, 'whoami'), a2: {a1: '\n - Print information about the configured and authenticated user.\n ', a2: {a1: Help_n__4281_1021_subcommand($0, 'reflect'), a2: {a1: '\n - Reflect on the current state of ones own PRs and review requests.\n ', a2: {a1: Help_n__4281_1021_subcommand($0, 'list'), a2: {a1: ' {', a2: {a1: Help_n__4281_1022_argument($0, '<team-slug>'), a2: {a1: '}\n - List the members of the given GitHub Team.\n ', a2: {a1: Help_n__4281_1021_subcommand($0, 'graph'), a2: {a1: ' {', a2: {a1: Help_n__4281_1022_argument($0, '<team-slug>'), a2: {a1: '}\n - Graph the relative review workload of the members of the given GitHub Team.\n ', a2: {a1: Help_n__4281_1021_subcommand($0, 'assign'), a2: {a1: ' {', a2: {a1: Help_n__4281_1022_argument($0, '<team-slug>'), a2: {a1: ' | ', a2: {a1: Help_n__4281_1022_argument($0, '+<user-login>'), a2: {a1: '} [...]\n - Assign the given team(s) and one lucky member from one of those teams\n to review the PR for the current branch.\n \n Also assign any users with logins specified. You specify these\n additional users by prefixing their logins with \'+\'.\n \n', a2: {a1: Help_n__4281_1023_heading($0, 'Bash Completion'), a2: {a1: ':\n You can set up bash completion by adding the following to your resource\n or bash profile:\n \n ', a2: {a1: Help_n__4281_1024_shell($0, 'eval \"$(harmony --bash-completion-script)\"'), a2: {a1: '\n \n Zsh users will also need to have the following in their resource or\n zsh profile before the above eval:\n \n ', a2: {a1: Help_n__4281_1024_shell($0, 'autoload -U +X compinit && compinit'), a2: {a1: '\n ', a2: {a1: Help_n__4281_1024_shell($0, 'autoload -U +X bashcompinit && bashcompinit'), a2: {a1: '\n ', a2: {h: 0}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}});
|
|
8040
8181
|
}
|
|
8041
8182
|
|
|
8042
|
-
function
|
|
8183
|
+
function Config_with__getConfig_5664($0, $1, $2, $3, $4) {
|
|
8043
8184
|
switch($1.h) {
|
|
8044
8185
|
case 0: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: $0, a2: {a1: ' cannot get read via `config` command.', a2: {h: 0}}}), $3, $4);
|
|
8045
8186
|
case undefined: return Data_Promise_pure_Applicative_Promise($1.a1($2), $3, $4);
|
|
8046
8187
|
}
|
|
8047
8188
|
}
|
|
8048
8189
|
|
|
8049
|
-
function
|
|
8190
|
+
function Config_with__withx20blockx20inx20setConfig_5541($0, $1, $2, $3, $4, $5) {
|
|
8050
8191
|
switch($3.h) {
|
|
8051
8192
|
case 0: return $7 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: $2, a2: {a1: ' is not a valid value for ', a2: {a1: $4, a2: {a1: '.', a2: {h: 0}}}}}), $5, $7);
|
|
8052
8193
|
case undefined: return $1a => Config_writeConfig($3.a1, $5, $1a);
|
|
8053
8194
|
}
|
|
8054
8195
|
}
|
|
8055
8196
|
|
|
8056
|
-
function
|
|
8197
|
+
function Config_with__setConfig_5513($0, $1, $2, $3) {
|
|
8057
8198
|
switch($1.h) {
|
|
8058
8199
|
case 0: return $5 => $6 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: $0, a2: {a1: ' cannot be set via `config` command.', a2: {h: 0}}}), $5, $6);
|
|
8059
|
-
case undefined: return $15 =>
|
|
8200
|
+
case undefined: return $15 => Config_with__withx20blockx20inx20setConfig_5541($1.a1, $3, $2, $1.a1($3)($2), $0, $15);
|
|
8060
8201
|
}
|
|
8061
8202
|
}
|
|
8062
8203
|
|
|
8063
|
-
function
|
|
8204
|
+
function Config_with__propSettersx2cparseBool_5273($0, $1) {
|
|
8064
8205
|
switch($1) {
|
|
8065
8206
|
case 'yes': return {a1: 1};
|
|
8066
8207
|
case 'true': return {a1: 1};
|
|
@@ -8070,14 +8211,14 @@ function Config_with__propSettersx2cparseBool_5272($0, $1) {
|
|
|
8070
8211
|
}
|
|
8071
8212
|
}
|
|
8072
8213
|
|
|
8073
|
-
function
|
|
8214
|
+
function Config_with__dropPrefixx27x2cdropx27_5089($0, $1, $2) {
|
|
8074
8215
|
switch($2.h) {
|
|
8075
8216
|
case 0: return {a1: $2.a1.a1};
|
|
8076
8217
|
case 1: return {h: 0};
|
|
8077
8218
|
}
|
|
8078
8219
|
}
|
|
8079
8220
|
|
|
8080
|
-
function
|
|
8221
|
+
function Config_case__parseGitHubURIx2cparseSuffix_5149($0, $1, $2) {
|
|
8081
8222
|
const $e = $f => {
|
|
8082
8223
|
switch($f.h) {
|
|
8083
8224
|
case undefined: {
|
|
@@ -8097,7 +8238,7 @@ function Config_case__parseGitHubURIx2cparseSuffix_5148($0, $1, $2) {
|
|
|
8097
8238
|
return Prelude_Types_x3ex3ex3d_Monad_Maybe({a1: Data_String_split($9 => Prelude_EqOrd_x3dx3d_Eq_Char($9, '/'), $2.a1)}, $e);
|
|
8098
8239
|
}
|
|
8099
8240
|
|
|
8100
|
-
function
|
|
8241
|
+
function Config_n__5993_5749_yesUnlessNo($0, $1, $2, $3, $4) {
|
|
8101
8242
|
switch($4) {
|
|
8102
8243
|
case 'n': return 0;
|
|
8103
8244
|
case 'N': return 0;
|
|
@@ -8105,35 +8246,35 @@ function Config_n__5880_5646_yesUnlessNo($0, $1, $2, $3, $4) {
|
|
|
8105
8246
|
}
|
|
8106
8247
|
}
|
|
8107
8248
|
|
|
8108
|
-
function
|
|
8249
|
+
function Config_n__5540_5265_update($0, $1, $2, $3, $4) {
|
|
8109
8250
|
return $0(undefined)(undefined)($c => Prelude_Basics_flip($2, $3, $c))($1($4));
|
|
8110
8251
|
}
|
|
8111
8252
|
|
|
8112
|
-
function
|
|
8113
|
-
return Prelude_Types_map_Functor_Maybe(
|
|
8253
|
+
function Config_n__5993_5751_repo($0, $1, $2, $3, $4) {
|
|
8254
|
+
return Prelude_Types_map_Functor_Maybe(csegen_530(), $4);
|
|
8114
8255
|
}
|
|
8115
8256
|
|
|
8116
|
-
function
|
|
8117
|
-
return
|
|
8257
|
+
function Config_n__5408_5128_parseSuffix($0, $1) {
|
|
8258
|
+
return Config_case__parseGitHubURIx2cparseSuffix_5149($0, $1, Data_String_break$($8 => Prelude_EqOrd_x3dx3d_Eq_Char($8, '.'), $1));
|
|
8118
8259
|
}
|
|
8119
8260
|
|
|
8120
|
-
function
|
|
8121
|
-
return Prelude_Interfaces_x3ex3dx3e(csegen_42(), $6 => Config_dropPrefixx27('git@github.com:', $6), $b =>
|
|
8261
|
+
function Config_n__5408_5130_parseSSH($0, $1) {
|
|
8262
|
+
return Prelude_Interfaces_x3ex3dx3e(csegen_42(), $6 => Config_dropPrefixx27('git@github.com:', $6), $b => Config_n__5408_5128_parseSuffix($0, $b), $1);
|
|
8122
8263
|
}
|
|
8123
8264
|
|
|
8124
|
-
function
|
|
8125
|
-
return Prelude_Interfaces_x3ex3dx3e(csegen_42(), $6 => Config_dropPrefixx27('https://github/com/', $6), $b =>
|
|
8265
|
+
function Config_n__5408_5129_parseHTTPS($0, $1) {
|
|
8266
|
+
return Prelude_Interfaces_x3ex3dx3e(csegen_42(), $6 => Config_dropPrefixx27('https://github/com/', $6), $b => Config_n__5408_5128_parseSuffix($0, $b), $1);
|
|
8126
8267
|
}
|
|
8127
8268
|
|
|
8128
|
-
function
|
|
8129
|
-
return
|
|
8269
|
+
function Config_n__5540_5264_parseBool($0) {
|
|
8270
|
+
return Config_with__propSettersx2cparseBool_5273($0, Data_String_toLower($0));
|
|
8130
8271
|
}
|
|
8131
8272
|
|
|
8132
|
-
function
|
|
8133
|
-
return Prelude_Types_map_Functor_Maybe(
|
|
8273
|
+
function Config_n__5993_5750_org($0, $1, $2, $3, $4) {
|
|
8274
|
+
return Prelude_Types_map_Functor_Maybe(csegen_534(), $4);
|
|
8134
8275
|
}
|
|
8135
8276
|
|
|
8136
|
-
function
|
|
8277
|
+
function Config_n__5993_5748_orIfEmpty($0, $1, $2, $3, $4, $5) {
|
|
8137
8278
|
switch($4.h) {
|
|
8138
8279
|
case 0: return $5;
|
|
8139
8280
|
case undefined: {
|
|
@@ -8145,20 +8286,20 @@ function Config_n__5880_5645_orIfEmpty($0, $1, $2, $3, $4, $5) {
|
|
|
8145
8286
|
}
|
|
8146
8287
|
}
|
|
8147
8288
|
|
|
8148
|
-
function
|
|
8289
|
+
function Config_n__5234_4963_oneDayAgo($0, $1, $2) {
|
|
8149
8290
|
return $2.a1.a2(undefined)(undefined)(System_time($2))(now => $2.a1.a1.a2(undefined)(Prelude_Cast_cast_Cast_Integer_Bits32((now-86400n))));
|
|
8150
8291
|
}
|
|
8151
8292
|
|
|
8152
|
-
function
|
|
8293
|
+
function Config_n__5993_5752_enterForDefaultStr($0, $1, $2, $3, $4) {
|
|
8153
8294
|
return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' (ENTER for default: ', a2: {a1: $4, a2: {a1: ')', a2: {h: 0}}}});
|
|
8154
8295
|
}
|
|
8155
8296
|
|
|
8156
|
-
function
|
|
8157
|
-
return
|
|
8297
|
+
function Config_n__5361_5081_dropx27($0, $1) {
|
|
8298
|
+
return Config_with__dropPrefixx27x2cdropx27_5089($0, $1, Data_List_PrefixSuffix_dropPrefix($8 => $9 => Decidable_Equality_decEq_DecEq_Char($8, $9), Prelude_Types_fastUnpack($0), $1));
|
|
8158
8299
|
}
|
|
8159
8300
|
|
|
8160
|
-
function
|
|
8161
|
-
return Data_Maybe_fromMaybe(() => '', Prelude_Types_map_Functor_Maybe($b =>
|
|
8301
|
+
function Config_n__5993_5753_defaultStr($0, $1, $2, $3, $4, $5) {
|
|
8302
|
+
return Data_Maybe_fromMaybe(() => '', Prelude_Types_map_Functor_Maybe($b => Config_n__5993_5752_enterForDefaultStr($0, $1, $2, $3, $4($b)), $5));
|
|
8162
8303
|
}
|
|
8163
8304
|
|
|
8164
8305
|
function Config_show_Show_ConfigError($0) {
|
|
@@ -8185,17 +8326,17 @@ function Config_syncIfOld($0, $1, $2, $3) {
|
|
|
8185
8326
|
case 0: return $1a => Data_Promise_pure_Applicative_Promise($1, $d, $1a);
|
|
8186
8327
|
}
|
|
8187
8328
|
};
|
|
8188
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(
|
|
8329
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(Config_n__5234_4963_oneDayAgo($0, $1, csegen_21()), $b, $2, $3);
|
|
8189
8330
|
}
|
|
8190
8331
|
|
|
8191
8332
|
function Config_syncConfig($0, $1, $2, $3, $4) {
|
|
8192
8333
|
const $b = teamSlugs => $c => $d => {
|
|
8193
8334
|
const $14 = orgMembers => $15 => $16 => {
|
|
8194
8335
|
const $1a = updatedAt => {
|
|
8195
|
-
const $1b = {a1: updatedAt, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: $0.a6, a7:
|
|
8196
|
-
return Prelude_Interfaces_x3ex3e(csegen_15(), $
|
|
8336
|
+
const $1b = {a1: updatedAt, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: $0.a6, a7: $0.a7, a8: teamSlugs, a9: orgMembers, a10: $0.a10};
|
|
8337
|
+
return Prelude_Interfaces_x3ex3e(csegen_15(), $2b => $2c => Data_Promise_map_Functor_Promise($2f => (undefined), $31 => $32 => Config_writeConfig($1b, $31, $32), $2b, $2c), () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_Interfaces_when(csegen_9(), $2, () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), 'Your updated configuration is:'), () => Prelude_IO_printLn(csegen_541(), $0))), () => $51 => $52 => Data_Promise_pure_Applicative_Promise($1b, $51, $52)));
|
|
8197
8338
|
};
|
|
8198
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(
|
|
8339
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_537(), $1a, $15, $16);
|
|
8199
8340
|
};
|
|
8200
8341
|
return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listOrgMembers($1, $0.a2), $14, $c, $d);
|
|
8201
8342
|
};
|
|
@@ -8203,19 +8344,27 @@ function Config_syncConfig($0, $1, $2, $3, $4) {
|
|
|
8203
8344
|
}
|
|
8204
8345
|
|
|
8205
8346
|
function Config_setConfig($0, $1, $2) {
|
|
8206
|
-
return
|
|
8347
|
+
return Config_with__setConfig_5513($1, Data_List_lookup(csegen_94(), $1, Config_propSetters()), $2, $0);
|
|
8207
8348
|
}
|
|
8208
8349
|
|
|
8209
8350
|
const Config_propSetters = __lazy(function () {
|
|
8210
|
-
return {a1: {a1: 'assignTeams', a2: $3 => $4 =>
|
|
8351
|
+
return {a1: {a1: 'assignTeams', a2: $3 => $4 => Config_n__5540_5265_update(csegen_18(), $9 => Config_n__5540_5264_parseBool($9), b => $d => ({a1: $d.a1, a2: $d.a2, a3: $d.a3, a4: $d.a4, a5: $d.a5, a6: b, a7: $d.a7, a8: $d.a8, a9: $d.a9, a10: $d.a10}), $3, $4)}, a2: {a1: {a1: 'commentOnAssign', a2: $1f => $20 => Config_n__5540_5265_update(csegen_18(), $25 => Config_n__5540_5264_parseBool($25), b => $29 => ({a1: $29.a1, a2: $29.a2, a3: $29.a3, a4: $29.a4, a5: $29.a5, a6: $29.a6, a7: b, a8: $29.a8, a9: $29.a9, a10: $29.a10}), $1f, $20)}, a2: {a1: {a1: 'defaultRemote', a2: $3b => $3c => Config_n__5540_5265_update(csegen_18(), $41 => ({a1: $41}), s => $44 => ({a1: $44.a1, a2: $44.a2, a3: $44.a3, a4: {a1: s}, a5: $44.a5, a6: $44.a6, a7: $44.a7, a8: $44.a8, a9: $44.a9, a10: $44.a10}), $3b, $3c)}, a2: {h: 0}}}};
|
|
8211
8352
|
});
|
|
8212
8353
|
|
|
8213
8354
|
const Config_propGetters = __lazy(function () {
|
|
8214
|
-
return {a1: {a1: 'assignTeams', a2: $3 => Prelude_Show_show_Show_Bool($3.
|
|
8355
|
+
return {a1: {a1: 'assignTeams', a2: $3 => Prelude_Show_show_Show_Bool($3.a6)}, a2: {a1: {a1: 'commentOnAssign', a2: $b => Prelude_Show_show_Show_Bool($b.a7)}, a2: {a1: {a1: 'defaultRemote', a2: $13 => Prelude_Types_maybe(() => 'Not set (defaults to \"origin\")', () => $17 => Prelude_Show_show_Show_String($17), $13.a4)}, a2: {h: 0}}}};
|
|
8215
8356
|
});
|
|
8216
8357
|
|
|
8358
|
+
function Config_preferOriginRemote($0) {
|
|
8359
|
+
const $1 = Data_List_find($4 => Prelude_EqOrd_x3dx3d_Eq_String($4, 'origin'), $0);
|
|
8360
|
+
switch($1.h) {
|
|
8361
|
+
case undefined: return $1.a1;
|
|
8362
|
+
case 0: return Data_Maybe_fromMaybe(() => 'origin', Data_List_headx27($0));
|
|
8363
|
+
}
|
|
8364
|
+
}
|
|
8365
|
+
|
|
8217
8366
|
function Config_parseGitHubURI($0) {
|
|
8218
|
-
return Prelude_Types_x3cx7cx3e_Alternative_Maybe(
|
|
8367
|
+
return Prelude_Types_x3cx7cx3e_Alternative_Maybe(Config_n__5408_5129_parseHTTPS($0, $0), () => Config_n__5408_5130_parseSSH($0, $0));
|
|
8219
8368
|
}
|
|
8220
8369
|
|
|
8221
8370
|
function Config_loadOrCreateConfig($0, $1, $2, $3, $4, $5) {
|
|
@@ -8258,14 +8407,14 @@ function Config_loadConfig($0, $1, $2) {
|
|
|
8258
8407
|
}
|
|
8259
8408
|
};
|
|
8260
8409
|
const $a = {a1: $b, a2: a => $13 => ({h: 1, a1: $13}), a3: $15};
|
|
8261
|
-
const $9 = {a1: $a, a2:
|
|
8410
|
+
const $9 = {a1: $a, a2: csegen_246(), a3: csegen_247()};
|
|
8262
8411
|
const $24 = b => a => func => $25 => {
|
|
8263
8412
|
switch($25.h) {
|
|
8264
8413
|
case 0: return {h: 0, a1: $25.a1};
|
|
8265
8414
|
case 1: return {h: 1, a1: func($25.a1)};
|
|
8266
8415
|
}
|
|
8267
8416
|
};
|
|
8268
|
-
const $23 = {a1: $24, a2:
|
|
8417
|
+
const $23 = {a1: $24, a2: csegen_456(), a3: csegen_460()};
|
|
8269
8418
|
return Prelude_Interfaces_Monad_x3ex3ex3d_Monad_Composex28x28x2ex20x24mx29x20x24tx29($0.a1, $9, $23, $4, $5);
|
|
8270
8419
|
};
|
|
8271
8420
|
const $39 = $3a => {
|
|
@@ -8307,7 +8456,7 @@ function Config_loadConfig($0, $1, $2) {
|
|
|
8307
8456
|
}
|
|
8308
8457
|
|
|
8309
8458
|
function Config_getConfig($0, $1, $2) {
|
|
8310
|
-
return $3 =>
|
|
8459
|
+
return $3 => Config_with__getConfig_5664($1, Data_List_lookup(csegen_94(), $1, Config_propGetters()), $0, $2, $3);
|
|
8311
8460
|
}
|
|
8312
8461
|
|
|
8313
8462
|
function Config_findConfig($0, $1, $2) {
|
|
@@ -8327,41 +8476,50 @@ function Config_findConfig($0, $1, $2) {
|
|
|
8327
8476
|
}
|
|
8328
8477
|
|
|
8329
8478
|
function Config_dropPrefixx27($0, $1) {
|
|
8330
|
-
return Prelude_Types_map_Functor_Maybe($4 => Prelude_Types_fastPack($4),
|
|
8479
|
+
return Prelude_Types_map_Functor_Maybe($4 => Prelude_Types_fastPack($4), Config_n__5361_5081_dropx27($0, Prelude_Types_fastUnpack($1)));
|
|
8331
8480
|
}
|
|
8332
8481
|
|
|
8333
8482
|
function Config_createConfig($0, $1, $2, $3) {
|
|
8334
|
-
return Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Creating a new configuration (storing in ', a2: {a1: Data_Config_filename(), a2: {a1: ')...', a2: {h: 0}}}})), () => $
|
|
8335
|
-
const $
|
|
8336
|
-
const $
|
|
8337
|
-
|
|
8338
|
-
|
|
8339
|
-
const $
|
|
8340
|
-
|
|
8341
|
-
|
|
8342
|
-
const $
|
|
8343
|
-
const $
|
|
8344
|
-
return $
|
|
8345
|
-
const $
|
|
8346
|
-
const $
|
|
8347
|
-
const $
|
|
8348
|
-
return
|
|
8483
|
+
return Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Creating a new configuration (storing in ', a2: {a1: Data_Config_filename(), a2: {a1: ')...', a2: {h: 0}}}})), () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), ''), () => $23 => $24 => {
|
|
8484
|
+
const $31 = remoteGuess => $32 => $33 => {
|
|
8485
|
+
const $52 = defaultOrgAndRepo => {
|
|
8486
|
+
const $53 = Config_n__5993_5753_defaultStr($0, $1, $3, $2, csegen_534(), defaultOrgAndRepo);
|
|
8487
|
+
return Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'What GitHub org would you like to use harmony for', a2: {a1: $53, a2: {a1: '?', a2: {h: 0}}}})), () => $71 => $72 => {
|
|
8488
|
+
const $8b = org => {
|
|
8489
|
+
const $8c = Config_n__5993_5753_defaultStr($0, $1, $3, $2, csegen_530(), defaultOrgAndRepo);
|
|
8490
|
+
return Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'What repository would you like to use harmony for', a2: {a1: $8c, a2: {a1: '?', a2: {h: 0}}}})), () => $aa => $ab => {
|
|
8491
|
+
const $c4 = repo => {
|
|
8492
|
+
const $c5 = Config_n__5993_5752_enterForDefaultStr($0, $1, $3, $2, remoteGuess);
|
|
8493
|
+
return Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'What GitHub remote repo would you like to use harmony for', a2: {a1: $c5, a2: {a1: '?', a2: {h: 0}}}})), () => $e1 => $e2 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $e9 => ({a1: Config_n__5993_5748_orIfEmpty($0, $1, $3, $2, {a1: remoteGuess}, Data_String_trim($e9))}), csegen_406()), defaultRemote => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStr(csegen_21(), 'Would you like harmony to comment when it assigns reviewers? [Y/n] '), () => $101 => $102 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $109 => Config_n__5993_5749_yesUnlessNo($0, $1, $3, $2, Data_String_trim($109)), csegen_406()), commentOnAssign => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStr(csegen_21(), 'Would you like harmony to assign teams in addition to individuals when it assigns reviewers? [Y/n] '), () => $11e => $11f => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $126 => Config_n__5993_5749_yesUnlessNo($0, $1, $3, $2, Data_String_trim($126)), csegen_406()), assignTeams => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), 'Creating config...'), () => $13b => $13c => {
|
|
8494
|
+
const $147 = mainBranch => $148 => $149 => {
|
|
8495
|
+
const $14d = updatedAt => {
|
|
8496
|
+
const $14e = {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: './', a2: {a1: Data_Config_filename(), a2: {h: 0}}}), a2: $2, a3: $3};
|
|
8497
|
+
return $15d => $15e => {
|
|
8498
|
+
const $164 = teamSlugs => $165 => $166 => {
|
|
8499
|
+
const $16c = orgMembers => {
|
|
8500
|
+
const $16d = {a1: updatedAt, a2: org, a3: repo, a4: defaultRemote, a5: mainBranch, a6: assignTeams, a7: commentOnAssign, a8: teamSlugs, a9: orgMembers, a10: $14e};
|
|
8501
|
+
return Prelude_Interfaces_x3ex3e(csegen_15(), $17c => $17d => Data_Promise_map_Functor_Promise($180 => (undefined), $182 => $183 => Config_writeConfig($16d, $182, $183), $17c, $17d), () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), 'Your new configuration is:'), () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_printLn(csegen_541(), $16d), () => $19d => $19e => Data_Promise_pure_Applicative_Promise($16d, $19d, $19e))));
|
|
8502
|
+
};
|
|
8503
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listOrgMembers($1, org), $16c, $165, $166);
|
|
8504
|
+
};
|
|
8505
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listTeams($1, org), $164, $15d, $15e);
|
|
8506
|
+
};
|
|
8349
8507
|
};
|
|
8350
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(
|
|
8508
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_537(), $14d, $148, $149);
|
|
8351
8509
|
};
|
|
8352
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(
|
|
8353
|
-
};
|
|
8510
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise($13f => $140 => FFI_GitHub_getRepoDefaultBranch($1, org, repo, $13f, $140), $147, $13b, $13c);
|
|
8511
|
+
}), $11e, $11f)), $101, $102)), $e1, $e2));
|
|
8354
8512
|
};
|
|
8355
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(
|
|
8356
|
-
};
|
|
8357
|
-
|
|
8358
|
-
|
|
8359
|
-
};
|
|
8360
|
-
|
|
8361
|
-
});
|
|
8513
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $b2 => Config_n__5993_5748_orIfEmpty($0, $1, $3, $2, Config_n__5993_5751_repo($0, $1, $3, $2, defaultOrgAndRepo), Data_String_trim($b2)), csegen_406()), $c4, $aa, $ab);
|
|
8514
|
+
});
|
|
8515
|
+
};
|
|
8516
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $79 => Config_n__5993_5748_orIfEmpty($0, $1, $3, $2, Config_n__5993_5750_org($0, $1, $3, $2, defaultOrgAndRepo), Data_String_trim($79)), csegen_406()), $8b, $71, $72);
|
|
8517
|
+
});
|
|
8518
|
+
};
|
|
8519
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise($36 => $37 => Data_Promise_x3cx7cx3e_Alternative_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $3e => Config_parseGitHubURI($3e), $42 => $43 => FFI_Git_remoteURI($0, remoteGuess, $42, $43)), () => $4a => $4b => Data_Promise_pure_Applicative_Promise({h: 0}, $4a, $4b), $36, $37), $52, $32, $33);
|
|
8362
8520
|
};
|
|
8363
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(
|
|
8364
|
-
});
|
|
8521
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $2b => Config_preferOriginRemote($2b), FFI_Git_listRemotes($0)), $31, $23, $24);
|
|
8522
|
+
}));
|
|
8365
8523
|
}
|
|
8366
8524
|
|
|
8367
8525
|
function Data_List_PrefixSuffix_with__withx20blockx20inx20dropPrefix_3662($0, $1, $2, $3, $4, $5) {
|
|
@@ -8402,10 +8560,10 @@ function Data_List_PrefixSuffix_dropPrefix($0, $1, $2) {
|
|
|
8402
8560
|
}
|
|
8403
8561
|
}
|
|
8404
8562
|
|
|
8405
|
-
function
|
|
8563
|
+
function BashCompletion_n__3752_1119_slugsOrLogins($0, $1, $2) {
|
|
8406
8564
|
switch(Data_String_isPrefixOf('+', $1)) {
|
|
8407
|
-
case 1: return Prelude_Interfaces_x3cx24x3e(csegen_119(), $b => ('+'+$b), $2.
|
|
8408
|
-
case 0: return $2.
|
|
8565
|
+
case 1: return Prelude_Interfaces_x3cx24x3e(csegen_119(), $b => ('+'+$b), $2.a9);
|
|
8566
|
+
case 0: return $2.a8;
|
|
8409
8567
|
}
|
|
8410
8568
|
}
|
|
8411
8569
|
|
|
@@ -8425,14 +8583,14 @@ function BashCompletion_opts($0, $1, $2) {
|
|
|
8425
8583
|
switch($1) {
|
|
8426
8584
|
case '--': {
|
|
8427
8585
|
switch($2) {
|
|
8428
|
-
case 'list': return $0.
|
|
8586
|
+
case 'list': return $0.a8;
|
|
8429
8587
|
default: {
|
|
8430
8588
|
switch($2) {
|
|
8431
|
-
case 'list': return Prelude_Types_List_filter($15 => Data_String_isPrefixOf($1, $15), $0.
|
|
8589
|
+
case 'list': return Prelude_Types_List_filter($15 => Data_String_isPrefixOf($1, $15), $0.a8);
|
|
8432
8590
|
default: {
|
|
8433
8591
|
switch($1) {
|
|
8434
|
-
case '--': return $0.
|
|
8435
|
-
default: return Prelude_Types_List_filter($1f => Data_String_isPrefixOf($1, $1f),
|
|
8592
|
+
case '--': return $0.a8;
|
|
8593
|
+
default: return Prelude_Types_List_filter($1f => Data_String_isPrefixOf($1, $1f), BashCompletion_n__3752_1119_slugsOrLogins($2, $1, $0));
|
|
8436
8594
|
}
|
|
8437
8595
|
}
|
|
8438
8596
|
}
|
|
@@ -8441,11 +8599,11 @@ function BashCompletion_opts($0, $1, $2) {
|
|
|
8441
8599
|
}
|
|
8442
8600
|
default: {
|
|
8443
8601
|
switch($2) {
|
|
8444
|
-
case 'list': return Prelude_Types_List_filter($2b => Data_String_isPrefixOf($1, $2b), $0.
|
|
8602
|
+
case 'list': return Prelude_Types_List_filter($2b => Data_String_isPrefixOf($1, $2b), $0.a8);
|
|
8445
8603
|
default: {
|
|
8446
8604
|
switch($1) {
|
|
8447
|
-
case '--': return $0.
|
|
8448
|
-
default: return Prelude_Types_List_filter($35 => Data_String_isPrefixOf($1, $35),
|
|
8605
|
+
case '--': return $0.a8;
|
|
8606
|
+
default: return Prelude_Types_List_filter($35 => Data_String_isPrefixOf($1, $35), BashCompletion_n__3752_1119_slugsOrLogins($2, $1, $0));
|
|
8449
8607
|
}
|
|
8450
8608
|
}
|
|
8451
8609
|
}
|
|
@@ -8463,14 +8621,14 @@ function BashCompletion_opts($0, $1, $2) {
|
|
|
8463
8621
|
switch($1) {
|
|
8464
8622
|
case '--': {
|
|
8465
8623
|
switch($2) {
|
|
8466
|
-
case 'list': return $0.
|
|
8624
|
+
case 'list': return $0.a8;
|
|
8467
8625
|
default: {
|
|
8468
8626
|
switch($2) {
|
|
8469
|
-
case 'list': return Prelude_Types_List_filter($4d => Data_String_isPrefixOf($1, $4d), $0.
|
|
8627
|
+
case 'list': return Prelude_Types_List_filter($4d => Data_String_isPrefixOf($1, $4d), $0.a8);
|
|
8470
8628
|
default: {
|
|
8471
8629
|
switch($1) {
|
|
8472
|
-
case '--': return $0.
|
|
8473
|
-
default: return Prelude_Types_List_filter($57 => Data_String_isPrefixOf($1, $57),
|
|
8630
|
+
case '--': return $0.a8;
|
|
8631
|
+
default: return Prelude_Types_List_filter($57 => Data_String_isPrefixOf($1, $57), BashCompletion_n__3752_1119_slugsOrLogins($2, $1, $0));
|
|
8474
8632
|
}
|
|
8475
8633
|
}
|
|
8476
8634
|
}
|
|
@@ -8479,11 +8637,11 @@ function BashCompletion_opts($0, $1, $2) {
|
|
|
8479
8637
|
}
|
|
8480
8638
|
default: {
|
|
8481
8639
|
switch($2) {
|
|
8482
|
-
case 'list': return Prelude_Types_List_filter($63 => Data_String_isPrefixOf($1, $63), $0.
|
|
8640
|
+
case 'list': return Prelude_Types_List_filter($63 => Data_String_isPrefixOf($1, $63), $0.a8);
|
|
8483
8641
|
default: {
|
|
8484
8642
|
switch($1) {
|
|
8485
|
-
case '--': return $0.
|
|
8486
|
-
default: return Prelude_Types_List_filter($6d => Data_String_isPrefixOf($1, $6d),
|
|
8643
|
+
case '--': return $0.a8;
|
|
8644
|
+
default: return Prelude_Types_List_filter($6d => Data_String_isPrefixOf($1, $6d), BashCompletion_n__3752_1119_slugsOrLogins($2, $1, $0));
|
|
8487
8645
|
}
|
|
8488
8646
|
}
|
|
8489
8647
|
}
|
|
@@ -8513,7 +8671,7 @@ function BashCompletion_cmdOpts($0, $1) {
|
|
|
8513
8671
|
switch($0) {
|
|
8514
8672
|
case '-': {
|
|
8515
8673
|
switch($1) {
|
|
8516
|
-
case 'contribute': return
|
|
8674
|
+
case 'contribute': return csegen_571();
|
|
8517
8675
|
default: {
|
|
8518
8676
|
switch($1) {
|
|
8519
8677
|
case 'contribute': {
|
|
@@ -8529,7 +8687,7 @@ function BashCompletion_cmdOpts($0, $1) {
|
|
|
8529
8687
|
}
|
|
8530
8688
|
case '--': {
|
|
8531
8689
|
switch($1) {
|
|
8532
|
-
case 'contribute': return
|
|
8690
|
+
case 'contribute': return csegen_571();
|
|
8533
8691
|
default: {
|
|
8534
8692
|
switch($1) {
|
|
8535
8693
|
case 'contribute': {
|
|
@@ -8573,7 +8731,7 @@ function BashCompletion_cmdOpts($0, $1) {
|
|
|
8573
8731
|
switch($0) {
|
|
8574
8732
|
case '-': {
|
|
8575
8733
|
switch($1) {
|
|
8576
|
-
case 'contribute': return
|
|
8734
|
+
case 'contribute': return csegen_571();
|
|
8577
8735
|
default: {
|
|
8578
8736
|
switch($1) {
|
|
8579
8737
|
case 'contribute': {
|
|
@@ -8589,7 +8747,7 @@ function BashCompletion_cmdOpts($0, $1) {
|
|
|
8589
8747
|
}
|
|
8590
8748
|
case '--': {
|
|
8591
8749
|
switch($1) {
|
|
8592
|
-
case 'contribute': return
|
|
8750
|
+
case 'contribute': return csegen_571();
|
|
8593
8751
|
default: {
|
|
8594
8752
|
switch($1) {
|
|
8595
8753
|
case 'contribute': {
|
|
@@ -8622,7 +8780,7 @@ function BashCompletion_cmdOpts($0, $1) {
|
|
|
8622
8780
|
}
|
|
8623
8781
|
|
|
8624
8782
|
const BashCompletion_allRootCmds = __lazy(function () {
|
|
8625
|
-
return {a1: 'assign', a2: {a1: 'branch', a2: {a1: 'config', a2: {a1: 'contribute', a2: {a1: 'graph', a2: {a1: 'help', a2: {a1: 'list', a2: {a1: 'pr', a2: {a1: 'reflect', a2: {a1: 'sync', a2: {a1: 'version', a2: {h: 0}}}}}}}}}}}};
|
|
8783
|
+
return {a1: 'assign', a2: {a1: 'branch', a2: {a1: 'config', a2: {a1: 'contribute', a2: {a1: 'graph', a2: {a1: 'help', a2: {a1: 'list', a2: {a1: 'pr', a2: {a1: 'reflect', a2: {a1: 'sync', a2: {a1: 'version', a2: {a1: 'whoami', a2: {h: 0}}}}}}}}}}}}};
|
|
8626
8784
|
});
|
|
8627
8785
|
|
|
8628
8786
|
function AppVersion_printVersion($0) {
|
|
@@ -8630,7 +8788,7 @@ function AppVersion_printVersion($0) {
|
|
|
8630
8788
|
}
|
|
8631
8789
|
|
|
8632
8790
|
const AppVersion_appVersion = __lazy(function () {
|
|
8633
|
-
return '0.
|
|
8791
|
+
return '1.0.0';
|
|
8634
8792
|
});
|
|
8635
8793
|
|
|
8636
8794
|
|