@mattpolzin/harmony 0.7.1 → 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 +363 -295
- 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.
|
|
@@ -327,6 +334,13 @@ const git_user_email = (git, onSuccess, onFailure) =>
|
|
|
327
334
|
onFailure
|
|
328
335
|
)
|
|
329
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
|
+
|
|
330
344
|
|
|
331
345
|
|
|
332
346
|
const { Octokit } = require('octokit')
|
|
@@ -653,9 +667,11 @@ const FFI_GitHub_prim__createPR = okit_create_pr;
|
|
|
653
667
|
const FFI_GitHub_prim__createComment = okit_create_comment;
|
|
654
668
|
const FFI_GitHub_prim__addPullReviewers = okit_add_reviewers;
|
|
655
669
|
const FFI_Git_prim__userEmail = git_user_email;
|
|
670
|
+
const FFI_Git_prim__rootDir = git_root_dir;
|
|
656
671
|
const FFI_Git_prim__remoteURI = git_remote_uri;
|
|
657
672
|
const FFI_Git_prim__remoteTrackingBranch = git_remote_tracking_branch;
|
|
658
673
|
const FFI_Git_prim__pushNewBranch = git_push_new_branch;
|
|
674
|
+
const FFI_Git_prim__listRemotes = git_list_remotes;
|
|
659
675
|
const FFI_Git_prim__git = git_git;
|
|
660
676
|
const FFI_Git_prim__currentBranch = git_current_branch;
|
|
661
677
|
const FFI_Git_prim__checkoutBranch = git_checkout_branch;
|
|
@@ -687,7 +703,7 @@ function x24tcOpt_1($0) {
|
|
|
687
703
|
case 0: return {h: 0, a1: $0.a5};
|
|
688
704
|
default: {
|
|
689
705
|
const $18 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
|
|
690
|
-
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);
|
|
691
707
|
switch($1c.a1.h) {
|
|
692
708
|
case 0: {
|
|
693
709
|
switch($0.a8) {
|
|
@@ -702,7 +718,7 @@ function x24tcOpt_1($0) {
|
|
|
702
718
|
}
|
|
703
719
|
default: {
|
|
704
720
|
const $6b = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
|
|
705
|
-
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);
|
|
706
722
|
switch($6f.a1.h) {
|
|
707
723
|
case 0: {
|
|
708
724
|
switch($0.a8) {
|
|
@@ -727,7 +743,7 @@ function x24tcOpt_1($0) {
|
|
|
727
743
|
case 0: return {h: 0, a1: $0.a5};
|
|
728
744
|
default: {
|
|
729
745
|
const $c2 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
|
|
730
|
-
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);
|
|
731
747
|
switch($c6.a1.h) {
|
|
732
748
|
case 0: {
|
|
733
749
|
switch($0.a8) {
|
|
@@ -742,7 +758,7 @@ function x24tcOpt_1($0) {
|
|
|
742
758
|
}
|
|
743
759
|
default: {
|
|
744
760
|
const $115 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
|
|
745
|
-
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);
|
|
746
762
|
switch($119.a1.h) {
|
|
747
763
|
case 0: {
|
|
748
764
|
switch($0.a8) {
|
|
@@ -1572,119 +1588,119 @@ const csegen_193 = __lazy(function () {
|
|
|
1572
1588
|
return $0 => $1 => $2 => $0($1($2));
|
|
1573
1589
|
});
|
|
1574
1590
|
|
|
1575
|
-
const
|
|
1591
|
+
const csegen_246 = __lazy(function () {
|
|
1576
1592
|
return b => a => $0 => $1 => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($0, $1);
|
|
1577
1593
|
});
|
|
1578
1594
|
|
|
1579
|
-
const
|
|
1595
|
+
const csegen_247 = __lazy(function () {
|
|
1580
1596
|
return a => $0 => Prelude_Types_join_Monad_x28Eitherx20x24ex29($0);
|
|
1581
1597
|
});
|
|
1582
1598
|
|
|
1583
|
-
const
|
|
1599
|
+
const csegen_248 = __lazy(function () {
|
|
1584
1600
|
return $0 => Data_Either_maybeToEither(() => 'Failed to parse JSON', Language_JSON_parse($0));
|
|
1585
1601
|
});
|
|
1586
1602
|
|
|
1587
|
-
const
|
|
1603
|
+
const csegen_251 = __lazy(function () {
|
|
1588
1604
|
return b => a => func => $0 => Text_Bounded_map_Functor_WithBounds(func, $0);
|
|
1589
1605
|
});
|
|
1590
1606
|
|
|
1591
|
-
const
|
|
1607
|
+
const csegen_262 = __lazy(function () {
|
|
1592
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)};
|
|
1593
1609
|
});
|
|
1594
1610
|
|
|
1595
|
-
const
|
|
1611
|
+
const csegen_270 = __lazy(function () {
|
|
1596
1612
|
return {a1: $1 => Language_JSON_Tokens_TokType_TokenKind_JSONTokenKind($1), a2: kind => $5 => Language_JSON_Tokens_tokValue_TokenKind_JSONTokenKind(kind, $5)};
|
|
1597
1613
|
});
|
|
1598
1614
|
|
|
1599
|
-
const
|
|
1615
|
+
const csegen_273 = __lazy(function () {
|
|
1600
1616
|
return {a1: $1 => $2 => Language_JSON_Tokens_x3dx3d_Eq_JSONTokenKind($1, $2), a2: $7 => $8 => Language_JSON_Tokens_x2fx3d_Eq_JSONTokenKind($7, $8)};
|
|
1601
1617
|
});
|
|
1602
1618
|
|
|
1603
|
-
const
|
|
1619
|
+
const csegen_309 = __lazy(function () {
|
|
1604
1620
|
return {a1: $1 => Language_JSON_String_Tokens_TokType_TokenKind_JSONStringTokenKind($1), a2: kind => $5 => Language_JSON_String_Tokens_tokValue_TokenKind_JSONStringTokenKind(kind, $5)};
|
|
1605
1621
|
});
|
|
1606
1622
|
|
|
1607
|
-
const
|
|
1623
|
+
const csegen_312 = __lazy(function () {
|
|
1608
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)};
|
|
1609
1625
|
});
|
|
1610
1626
|
|
|
1611
|
-
const
|
|
1627
|
+
const csegen_328 = __lazy(function () {
|
|
1612
1628
|
return $0 => $1 => $2 => $3 => Text_Bounded_map_Functor_WithBounds($2, $3);
|
|
1613
1629
|
});
|
|
1614
1630
|
|
|
1615
|
-
const
|
|
1631
|
+
const csegen_330 = __lazy(function () {
|
|
1616
1632
|
return {a1: {a1: 'End of input', a2: {h: 0}}, a2: {h: 0}};
|
|
1617
1633
|
});
|
|
1618
1634
|
|
|
1619
|
-
const
|
|
1635
|
+
const csegen_382 = __lazy(function () {
|
|
1620
1636
|
return $0 => $0.a2;
|
|
1621
1637
|
});
|
|
1622
1638
|
|
|
1623
|
-
const
|
|
1639
|
+
const csegen_385 = __lazy(function () {
|
|
1624
1640
|
return $0 => $0.a1;
|
|
1625
1641
|
});
|
|
1626
1642
|
|
|
1627
|
-
const
|
|
1643
|
+
const csegen_390 = __lazy(function () {
|
|
1628
1644
|
return $0 => $1 => Prelude_Types_max_Ord_Nat($0, $1);
|
|
1629
1645
|
});
|
|
1630
1646
|
|
|
1631
|
-
const
|
|
1647
|
+
const csegen_392 = __lazy(function () {
|
|
1632
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}}}));
|
|
1633
1649
|
});
|
|
1634
1650
|
|
|
1635
|
-
const
|
|
1651
|
+
const csegen_404 = __lazy(function () {
|
|
1636
1652
|
return $0 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($0));
|
|
1637
1653
|
});
|
|
1638
1654
|
|
|
1639
|
-
const
|
|
1655
|
+
const csegen_406 = __lazy(function () {
|
|
1640
1656
|
return Prelude_IO_getLine(csegen_21());
|
|
1641
1657
|
});
|
|
1642
1658
|
|
|
1643
|
-
const
|
|
1659
|
+
const csegen_436 = __lazy(function () {
|
|
1644
1660
|
return $0 => Language_JSON_Accessors_array($3 => Data_PullRequest_parsePR($3), $0);
|
|
1645
1661
|
});
|
|
1646
1662
|
|
|
1647
|
-
const
|
|
1663
|
+
const csegen_456 = __lazy(function () {
|
|
1648
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)};
|
|
1649
1665
|
});
|
|
1650
1666
|
|
|
1651
|
-
const
|
|
1667
|
+
const csegen_460 = __lazy(function () {
|
|
1652
1668
|
return b => a => f => $0 => $1 => $2 => Prelude_Types_traverse_Traversable_x28Eitherx20x24ex29($0, $1, $2);
|
|
1653
1669
|
});
|
|
1654
1670
|
|
|
1655
|
-
const
|
|
1671
|
+
const csegen_473 = __lazy(function () {
|
|
1656
1672
|
return $0 => $0.a1;
|
|
1657
1673
|
});
|
|
1658
1674
|
|
|
1659
|
-
const
|
|
1675
|
+
const csegen_481 = __lazy(function () {
|
|
1660
1676
|
return $0 => $1 => $2 => Data_Promise_either(csegen_115(), Data_PullRequest_parsePullRequestsString($0), $1, $2);
|
|
1661
1677
|
});
|
|
1662
1678
|
|
|
1663
|
-
const
|
|
1679
|
+
const csegen_482 = __lazy(function () {
|
|
1664
1680
|
return $0 => $1 => $2 => Data_Promise_either(csegen_115(), Data_User_parseUserString($0), $1, $2);
|
|
1665
1681
|
});
|
|
1666
1682
|
|
|
1667
|
-
const
|
|
1683
|
+
const csegen_515 = __lazy(function () {
|
|
1668
1684
|
return {a1: $1 => $2 => _add32s($1, $2), a2: $6 => $7 => _mul32s($6, $7), a3: $b => Number(_truncBigInt32($b))};
|
|
1669
1685
|
});
|
|
1670
1686
|
|
|
1671
|
-
const
|
|
1687
|
+
const csegen_530 = __lazy(function () {
|
|
1672
1688
|
return $0 => $0.a2;
|
|
1673
1689
|
});
|
|
1674
1690
|
|
|
1675
|
-
const
|
|
1691
|
+
const csegen_534 = __lazy(function () {
|
|
1676
1692
|
return $0 => $0.a1;
|
|
1677
1693
|
});
|
|
1678
1694
|
|
|
1679
|
-
const
|
|
1695
|
+
const csegen_537 = __lazy(function () {
|
|
1680
1696
|
return Prelude_Interfaces_x3cx24x3e(csegen_103(), $4 => Prelude_Cast_cast_Cast_Integer_Bits32($4), System_time(csegen_21()));
|
|
1681
1697
|
});
|
|
1682
1698
|
|
|
1683
|
-
const
|
|
1699
|
+
const csegen_541 = __lazy(function () {
|
|
1684
1700
|
return {a1: csegen_21(), a2: {a1: x => Data_Config_show_Show_Config(x), a2: d => x => Data_Config_showPrec_Show_Config(d, x)}};
|
|
1685
1701
|
});
|
|
1686
1702
|
|
|
1687
|
-
const
|
|
1703
|
+
const csegen_571 = __lazy(function () {
|
|
1688
1704
|
return {a1: {a1: '--checkout', a2: {a1: '-c', a2: {h: 0}}}};
|
|
1689
1705
|
});
|
|
1690
1706
|
|
|
@@ -1717,16 +1733,16 @@ function Main_case__contribute_2186($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a)
|
|
|
1717
1733
|
}
|
|
1718
1734
|
}
|
|
1719
1735
|
|
|
1720
|
-
function
|
|
1736
|
+
function Main_n__6430_1831_putNameLn($0, $1, $2, $3) {
|
|
1721
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}}}});
|
|
1722
1738
|
}
|
|
1723
1739
|
|
|
1724
|
-
function
|
|
1740
|
+
function Main_n__6298_1721_partitionedArgs($0, $1, $2, $3, $4) {
|
|
1725
1741
|
const $5 = Data_List_partition($8 => Data_String_isPrefixOf('+', $8), $4);
|
|
1726
1742
|
return {a1: Prelude_Types_map_Functor_List($11 => Data_String_Extra_drop(1n, $11), $5.a1), a2: $5.a2};
|
|
1727
1743
|
}
|
|
1728
1744
|
|
|
1729
|
-
function
|
|
1745
|
+
function Main_n__6978_2384_parseSkipArg($0, $1) {
|
|
1730
1746
|
const $2 = Prelude_Types_fastUnpack($1);
|
|
1731
1747
|
switch($2.h) {
|
|
1732
1748
|
case undefined: {
|
|
@@ -1739,15 +1755,15 @@ function Main_n__6956_2384_parseSkipArg($0, $1) {
|
|
|
1739
1755
|
}
|
|
1740
1756
|
}
|
|
1741
1757
|
|
|
1742
|
-
function
|
|
1758
|
+
function Main_n__7177_2644_parsePg($0, $1, $2, $3, $4, $5) {
|
|
1743
1759
|
return Data_String_parsePositive(csegen_30(), $5);
|
|
1744
1760
|
}
|
|
1745
1761
|
|
|
1746
|
-
function
|
|
1762
|
+
function Main_n__7177_2643_parseLim($0, $1, $2, $3, $4) {
|
|
1747
1763
|
return Prelude_Interfaces_x3cx3dx3c(csegen_42(), x => Data_Fin_natToFin(x, Prelude_Types_prim__integerToNat(101n)), $f => Data_String_parsePositive(csegen_30(), $f));
|
|
1748
1764
|
}
|
|
1749
1765
|
|
|
1750
|
-
function
|
|
1766
|
+
function Main_n__6978_2383_parseCheckoutArg($0, $1) {
|
|
1751
1767
|
switch($1) {
|
|
1752
1768
|
case '-c': return {a1: {h: 0}};
|
|
1753
1769
|
case '--checkout': return {a1: {h: 0}};
|
|
@@ -1755,11 +1771,11 @@ function Main_n__6956_2383_parseCheckoutArg($0, $1) {
|
|
|
1755
1771
|
}
|
|
1756
1772
|
}
|
|
1757
1773
|
|
|
1758
|
-
function
|
|
1774
|
+
function Main_n__6430_1830_forkedUser($0, $1, $2, $3) {
|
|
1759
1775
|
return FFI_Concurrency_fork(csegen_21(), ('user --json '+$3));
|
|
1760
1776
|
}
|
|
1761
1777
|
|
|
1762
|
-
function
|
|
1778
|
+
function Main_n__6168_1583_configuredOpts($0, $1, $2) {
|
|
1763
1779
|
const $10 = $11 => {
|
|
1764
1780
|
switch($11.h) {
|
|
1765
1781
|
case 1: return $0.a1.a1.a2(undefined)(BashCompletion_opts($11.a1, $2, $1));
|
|
@@ -1820,7 +1836,7 @@ function Main_parseContributeArgs($0) {
|
|
|
1820
1836
|
switch($0.a2.a2.h) {
|
|
1821
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.'};
|
|
1822
1838
|
default: {
|
|
1823
|
-
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);
|
|
1824
1840
|
switch($6.h) {
|
|
1825
1841
|
case undefined: return {h: 1, a1: $6.a1};
|
|
1826
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.'};
|
|
@@ -1829,7 +1845,7 @@ function Main_parseContributeArgs($0) {
|
|
|
1829
1845
|
}
|
|
1830
1846
|
}
|
|
1831
1847
|
default: {
|
|
1832
|
-
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);
|
|
1833
1849
|
switch($1d.h) {
|
|
1834
1850
|
case undefined: return {h: 1, a1: $1d.a1};
|
|
1835
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.'};
|
|
@@ -1838,7 +1854,7 @@ function Main_parseContributeArgs($0) {
|
|
|
1838
1854
|
}
|
|
1839
1855
|
}
|
|
1840
1856
|
default: {
|
|
1841
|
-
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);
|
|
1842
1858
|
switch($34.h) {
|
|
1843
1859
|
case undefined: return {h: 1, a1: $34.a1};
|
|
1844
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.'};
|
|
@@ -1893,7 +1909,7 @@ function Main_main($0) {
|
|
|
1893
1909
|
}
|
|
1894
1910
|
|
|
1895
1911
|
function Main_listTeam($0, $1, $2, $3, $4) {
|
|
1896
|
-
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 =>
|
|
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);
|
|
1897
1913
|
}
|
|
1898
1914
|
|
|
1899
1915
|
function Main_handleConfiguredArgs($0, $1, $2, $3) {
|
|
@@ -1943,7 +1959,7 @@ function Main_handleConfiguredArgs($0, $1, $2, $3) {
|
|
|
1943
1959
|
case undefined: {
|
|
1944
1960
|
switch($3.a2.a2.a2.a2.h) {
|
|
1945
1961
|
case 0: {
|
|
1946
|
-
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));
|
|
1947
1963
|
return $a8 => $a9 => {
|
|
1948
1964
|
switch($8d.h) {
|
|
1949
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);
|
|
@@ -2209,13 +2225,13 @@ function Main_contribute($0, $1, $2, $3, $4, $5) {
|
|
|
2209
2225
|
}
|
|
2210
2226
|
|
|
2211
2227
|
function Main_bashCompletion($0, $1, $2) {
|
|
2212
|
-
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));
|
|
2213
2229
|
return $0.a1.a2(undefined)(undefined)($3)($21 => Prelude_IO_putStr($0, Data_String_fastUnlines($21)));
|
|
2214
2230
|
}
|
|
2215
2231
|
|
|
2216
2232
|
function Main_assign($0, $1, $2, $3, $4, $5, $6) {
|
|
2217
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 => {
|
|
2218
|
-
const $25 =
|
|
2234
|
+
const $25 = Main_n__6298_1721_partitionedArgs($0, $1, $2, $4, $3);
|
|
2219
2235
|
return PullRequest_requestReviewers($0, $2, $21.a2, $25.a2, $25.a1, $4, $22, $24);
|
|
2220
2236
|
}, $5, $6);
|
|
2221
2237
|
}
|
|
@@ -2224,11 +2240,11 @@ function Main_x3cx7cx7cx3e($0, $1, $2, $3) {
|
|
|
2224
2240
|
return $0.a3(undefined)($1($3))(() => $2($3));
|
|
2225
2241
|
}
|
|
2226
2242
|
|
|
2227
|
-
const
|
|
2243
|
+
const Util_n__4483_1237_startOver = __lazy(function () {
|
|
2228
2244
|
return {a1: 0, a2: {h: 0}};
|
|
2229
2245
|
});
|
|
2230
2246
|
|
|
2231
|
-
function
|
|
2247
|
+
function Util_n__4483_1238_guardSuccess($0) {
|
|
2232
2248
|
switch($0.h) {
|
|
2233
2249
|
case undefined: {
|
|
2234
2250
|
switch($0.a1) {
|
|
@@ -2241,12 +2257,12 @@ function Util_n__4476_1238_guardSuccess($0) {
|
|
|
2241
2257
|
}
|
|
2242
2258
|
}
|
|
2243
2259
|
|
|
2244
|
-
function
|
|
2260
|
+
function Util_n__4483_1239_go($0, $1) {
|
|
2245
2261
|
switch($0.a1) {
|
|
2246
2262
|
case 0: {
|
|
2247
2263
|
switch(Prelude_Types_isAlpha($1)) {
|
|
2248
2264
|
case 1: return {a1: 1, a2: {a1: $1, a2: $0.a2}};
|
|
2249
|
-
case 0: return
|
|
2265
|
+
case 0: return Util_n__4483_1237_startOver();
|
|
2250
2266
|
}
|
|
2251
2267
|
}
|
|
2252
2268
|
case 1: {
|
|
@@ -2255,7 +2271,7 @@ function Util_n__4476_1239_go($0, $1) {
|
|
|
2255
2271
|
default: {
|
|
2256
2272
|
switch(Prelude_Types_isAlpha($1)) {
|
|
2257
2273
|
case 1: return {a1: 1, a2: {a1: $1, a2: $0.a2}};
|
|
2258
|
-
case 0: return
|
|
2274
|
+
case 0: return Util_n__4483_1237_startOver();
|
|
2259
2275
|
}
|
|
2260
2276
|
}
|
|
2261
2277
|
}
|
|
@@ -2263,7 +2279,7 @@ function Util_n__4476_1239_go($0, $1) {
|
|
|
2263
2279
|
case 2: {
|
|
2264
2280
|
switch(Prelude_Types_isDigit($1)) {
|
|
2265
2281
|
case 1: return {a1: 3, a2: {a1: $1, a2: $0.a2}};
|
|
2266
|
-
case 0: return
|
|
2282
|
+
case 0: return Util_n__4483_1237_startOver();
|
|
2267
2283
|
}
|
|
2268
2284
|
}
|
|
2269
2285
|
case 3: {
|
|
@@ -2276,7 +2292,7 @@ function Util_n__4476_1239_go($0, $1) {
|
|
|
2276
2292
|
}
|
|
2277
2293
|
}
|
|
2278
2294
|
|
|
2279
|
-
function
|
|
2295
|
+
function Util_n__4370_1128_getMoreLines($0, $1, $2) {
|
|
2280
2296
|
switch($2.h) {
|
|
2281
2297
|
case 0: return $0.a1.a1.a2(undefined)(Prelude_Types_List_reverse($1));
|
|
2282
2298
|
case undefined: {
|
|
@@ -2287,13 +2303,13 @@ function Util_n__4363_1128_getMoreLines($0, $1, $2) {
|
|
|
2287
2303
|
case '': {
|
|
2288
2304
|
switch(line) {
|
|
2289
2305
|
case '': return $0.a1.a1.a2(undefined)(Prelude_Types_List_reverse($1.a2));
|
|
2290
|
-
default: return
|
|
2306
|
+
default: return Util_n__4370_1128_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
|
|
2291
2307
|
}
|
|
2292
2308
|
}
|
|
2293
|
-
default: return
|
|
2309
|
+
default: return Util_n__4370_1128_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
|
|
2294
2310
|
}
|
|
2295
2311
|
}
|
|
2296
|
-
default: return
|
|
2312
|
+
default: return Util_n__4370_1128_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
|
|
2297
2313
|
}
|
|
2298
2314
|
};
|
|
2299
2315
|
return $0.a1.a2(undefined)(undefined)(Prelude_Interfaces_x3cx24x3e($0.a1.a1.a1, $1c => Data_String_trim($1c), Prelude_IO_getLine($0)))($22);
|
|
@@ -2334,11 +2350,11 @@ function Util_renderIO($0, $1, $2) {
|
|
|
2334
2350
|
}
|
|
2335
2351
|
|
|
2336
2352
|
function Util_parseJiraPrefix($0) {
|
|
2337
|
-
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))));
|
|
2338
2354
|
}
|
|
2339
2355
|
|
|
2340
2356
|
function Util_getManyLines($0, $1) {
|
|
2341
|
-
return
|
|
2357
|
+
return Util_n__4370_1128_getMoreLines($0, {h: 0}, $1);
|
|
2342
2358
|
}
|
|
2343
2359
|
|
|
2344
2360
|
function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5087_writeOutput($0, $1, $2, $3) {
|
|
@@ -4712,18 +4728,19 @@ const Data_Fuel_forever = __lazy(function () {
|
|
|
4712
4728
|
return {a1: () => Data_Fuel_forever()};
|
|
4713
4729
|
});
|
|
4714
4730
|
|
|
4715
|
-
function
|
|
4731
|
+
function Data_Config_n__5282_8046_parseConfigJson($0, $1) {
|
|
4716
4732
|
switch($1.h) {
|
|
4717
4733
|
case 5: {
|
|
4718
4734
|
const $18 = $19 => {
|
|
4719
|
-
const $
|
|
4720
|
-
|
|
4721
|
-
|
|
4722
|
-
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)};
|
|
4723
4740
|
}
|
|
4724
4741
|
};
|
|
4725
|
-
const $
|
|
4726
|
-
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}}))))))))));
|
|
4727
4744
|
};
|
|
4728
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);
|
|
4729
4746
|
}
|
|
@@ -4732,8 +4749,12 @@ function Data_Config_n__5186_7922_parseConfigJson($0, $1) {
|
|
|
4732
4749
|
}
|
|
4733
4750
|
}
|
|
4734
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
|
+
|
|
4735
4756
|
function Data_Config_show_Show_Config($0) {
|
|
4736
|
-
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}}}}}}}}}});
|
|
4737
4758
|
}
|
|
4738
4759
|
|
|
4739
4760
|
function Data_Config_showPrec_Show_Config($0, $1) {
|
|
@@ -4741,19 +4762,19 @@ function Data_Config_showPrec_Show_Config($0, $1) {
|
|
|
4741
4762
|
}
|
|
4742
4763
|
|
|
4743
4764
|
function Data_Config_rf__filepath($0) {
|
|
4744
|
-
return $0.
|
|
4765
|
+
return $0.a10.a1;
|
|
4745
4766
|
}
|
|
4746
4767
|
|
|
4747
4768
|
function Data_Config_rf__editor($0) {
|
|
4748
|
-
return $0.
|
|
4769
|
+
return $0.a10.a3;
|
|
4749
4770
|
}
|
|
4750
4771
|
|
|
4751
4772
|
function Data_Config_rf__colors($0) {
|
|
4752
|
-
return $0.
|
|
4773
|
+
return $0.a10.a2;
|
|
4753
4774
|
}
|
|
4754
4775
|
|
|
4755
4776
|
const Data_Config_settableProps = __lazy(function () {
|
|
4756
|
-
return {a1: 'assignTeams', a2: {a1: 'commentOnAssign', a2: {h: 0}}};
|
|
4777
|
+
return {a1: 'assignTeams', a2: {a1: 'commentOnAssign', a2: {a1: 'defaultRemote', a2: {h: 0}}}};
|
|
4757
4778
|
});
|
|
4758
4779
|
|
|
4759
4780
|
function Data_Config_parseConfig($0, $1) {
|
|
@@ -4775,12 +4796,12 @@ function Data_Config_parseConfig($0, $1) {
|
|
|
4775
4796
|
}
|
|
4776
4797
|
};
|
|
4777
4798
|
const $4 = {a1: $5, a2: a => $d => ({h: 1, a1: $d}), a3: $f};
|
|
4778
|
-
const $3 = {a1: $4, a2:
|
|
4779
|
-
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);
|
|
4780
4801
|
}
|
|
4781
4802
|
|
|
4782
4803
|
function Data_Config_json($0) {
|
|
4783
|
-
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}}}}}}}}}}};
|
|
4784
4805
|
}
|
|
4785
4806
|
|
|
4786
4807
|
const Data_Config_filename = __lazy(function () {
|
|
@@ -4798,6 +4819,21 @@ function Language_JSON_Accessors_string($0) {
|
|
|
4798
4819
|
}
|
|
4799
4820
|
}
|
|
4800
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
|
+
|
|
4801
4837
|
function Language_JSON_Accessors_object($0) {
|
|
4802
4838
|
switch($0.h) {
|
|
4803
4839
|
case 5: return {h: 1, a1: $0.a1};
|
|
@@ -4904,17 +4940,17 @@ function Text_Bounded_mergeBounds($0, $1) {
|
|
|
4904
4940
|
switch($1.h) {
|
|
4905
4941
|
case undefined: {
|
|
4906
4942
|
switch($1.a2) {
|
|
4907
|
-
case 1: return Prelude_Interfaces_x3cx24x3e(
|
|
4943
|
+
case 1: return Prelude_Interfaces_x3cx24x3e(csegen_251(), $e => $1.a1, $0);
|
|
4908
4944
|
default: {
|
|
4909
|
-
const $10 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(
|
|
4910
|
-
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));
|
|
4911
4947
|
return {a1: $1.a1, a2: 0, a3: {a1: $10.a1, a2: $10.a2, a3: $1c.a1, a4: $1c.a2}};
|
|
4912
4948
|
}
|
|
4913
4949
|
}
|
|
4914
4950
|
}
|
|
4915
4951
|
default: {
|
|
4916
|
-
const $30 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(
|
|
4917
|
-
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));
|
|
4918
4954
|
return {a1: $1.a1, a2: 0, a3: {a1: $30.a1, a2: $30.a2, a3: $3c.a1, a4: $3c.a2}};
|
|
4919
4955
|
}
|
|
4920
4956
|
}
|
|
@@ -4925,17 +4961,17 @@ function Text_Bounded_mergeBounds($0, $1) {
|
|
|
4925
4961
|
switch($1.h) {
|
|
4926
4962
|
case undefined: {
|
|
4927
4963
|
switch($1.a2) {
|
|
4928
|
-
case 1: return Prelude_Interfaces_x3cx24x3e(
|
|
4964
|
+
case 1: return Prelude_Interfaces_x3cx24x3e(csegen_251(), $56 => $1.a1, $0);
|
|
4929
4965
|
default: {
|
|
4930
|
-
const $58 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(
|
|
4931
|
-
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));
|
|
4932
4968
|
return {a1: $1.a1, a2: 0, a3: {a1: $58.a1, a2: $58.a2, a3: $64.a1, a4: $64.a2}};
|
|
4933
4969
|
}
|
|
4934
4970
|
}
|
|
4935
4971
|
}
|
|
4936
4972
|
default: {
|
|
4937
|
-
const $78 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(
|
|
4938
|
-
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));
|
|
4939
4975
|
return {a1: $1.a1, a2: 0, a3: {a1: $78.a1, a2: $78.a2, a3: $84.a1, a4: $84.a2}};
|
|
4940
4976
|
}
|
|
4941
4977
|
}
|
|
@@ -5154,7 +5190,7 @@ const Language_JSON_Parser_string = __lazy(function () {
|
|
|
5154
5190
|
});
|
|
5155
5191
|
|
|
5156
5192
|
const Language_JSON_Parser_rawString = __lazy(function () {
|
|
5157
|
-
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 => {
|
|
5158
5194
|
switch(mstr.h) {
|
|
5159
5195
|
case undefined: return {h: 0, a1: mstr.a1};
|
|
5160
5196
|
case 0: return {h: 4, a1: {h: 0}, a2: 0, a3: 'invalid string'};
|
|
@@ -5163,7 +5199,7 @@ const Language_JSON_Parser_rawString = __lazy(function () {
|
|
|
5163
5199
|
});
|
|
5164
5200
|
|
|
5165
5201
|
function Language_JSON_Parser_punct($0) {
|
|
5166
|
-
return Text_Parser_match(
|
|
5202
|
+
return Text_Parser_match(csegen_270(), csegen_273(), {h: 4, a1: $0});
|
|
5167
5203
|
}
|
|
5168
5204
|
|
|
5169
5205
|
function Language_JSON_Parser_parseJSON($0) {
|
|
@@ -5196,11 +5232,11 @@ const Language_JSON_Parser_object = __lazy(function () {
|
|
|
5196
5232
|
});
|
|
5197
5233
|
|
|
5198
5234
|
const Language_JSON_Parser_number = __lazy(function () {
|
|
5199
|
-
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}));
|
|
5200
5236
|
});
|
|
5201
5237
|
|
|
5202
5238
|
const Language_JSON_Parser_null = __lazy(function () {
|
|
5203
|
-
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}));
|
|
5204
5240
|
});
|
|
5205
5241
|
|
|
5206
5242
|
const Language_JSON_Parser_json = __lazy(function () {
|
|
@@ -5208,7 +5244,7 @@ const Language_JSON_Parser_json = __lazy(function () {
|
|
|
5208
5244
|
});
|
|
5209
5245
|
|
|
5210
5246
|
const Language_JSON_Parser_boolean = __lazy(function () {
|
|
5211
|
-
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}));
|
|
5212
5248
|
});
|
|
5213
5249
|
|
|
5214
5250
|
const Language_JSON_Parser_array = __lazy(function () {
|
|
@@ -5661,11 +5697,11 @@ function Language_JSON_String_Tokens_charValue($0) {
|
|
|
5661
5697
|
}
|
|
5662
5698
|
|
|
5663
5699
|
const Language_JSON_String_Parser_stringChar = __lazy(function () {
|
|
5664
|
-
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)})};
|
|
5665
5701
|
});
|
|
5666
5702
|
|
|
5667
5703
|
const Language_JSON_String_Parser_quotedString = __lazy(function () {
|
|
5668
|
-
const $0 = Text_Parser_match(
|
|
5704
|
+
const $0 = Text_Parser_match(csegen_309(), csegen_312(), 0);
|
|
5669
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)}})};
|
|
5670
5706
|
});
|
|
5671
5707
|
|
|
@@ -5727,7 +5763,7 @@ function Text_Parser_between($0, $1, $2, $3) {
|
|
|
5727
5763
|
function Text_Parser_Core_case__doParse_5194($0, $1, $2, $3, $4, $5) {
|
|
5728
5764
|
switch($5.h) {
|
|
5729
5765
|
case 0: return {h: 0, a1: $5.a1, a2: $5.a2, a3: $5.a3};
|
|
5730
|
-
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};
|
|
5731
5767
|
}
|
|
5732
5768
|
}
|
|
5733
5769
|
|
|
@@ -6151,12 +6187,12 @@ function Text_Parser_Core_doParse($0, $1, $2, $3, $4) {
|
|
|
6151
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));
|
|
6152
6188
|
case 1: {
|
|
6153
6189
|
switch($4.h) {
|
|
6154
|
-
case 0: return {h: 0, a1: $2, a2: 0, a3:
|
|
6190
|
+
case 0: return {h: 0, a1: $2, a2: 0, a3: csegen_330()};
|
|
6155
6191
|
case undefined: {
|
|
6156
6192
|
const $44 = $3.a2($4.a1.a1);
|
|
6157
6193
|
switch($44.h) {
|
|
6158
6194
|
case 0: return {h: 0, a1: $2, a2: 0, a3: {a1: {a1: $3.a1, a2: {a1: $4.a1.a3}}, a2: {h: 0}}};
|
|
6159
|
-
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};
|
|
6160
6196
|
}
|
|
6161
6197
|
}
|
|
6162
6198
|
}
|
|
@@ -6169,7 +6205,7 @@ function Text_Parser_Core_doParse($0, $1, $2, $3, $4) {
|
|
|
6169
6205
|
}
|
|
6170
6206
|
case 2: {
|
|
6171
6207
|
switch($4.h) {
|
|
6172
|
-
case 0: return {h: 0, a1: $2, a2: 0, a3:
|
|
6208
|
+
case 0: return {h: 0, a1: $2, a2: 0, a3: csegen_330()};
|
|
6173
6209
|
case undefined: {
|
|
6174
6210
|
switch($3.a2($4.a1.a1)) {
|
|
6175
6211
|
case 1: return {h: 1, a1: $1, a2: $2, a3: Text_Bounded_removeIrrelevance($4.a1), a4: {a1: $4.a1, a2: $4.a2}};
|
|
@@ -6198,7 +6234,7 @@ function Text_Parser_Core_doParse($0, $1, $2, $3, $4) {
|
|
|
6198
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));
|
|
6199
6235
|
case 14: {
|
|
6200
6236
|
switch($4.h) {
|
|
6201
|
-
case 0: return {h: 0, a1: $2, a2: 0, a3:
|
|
6237
|
+
case 0: return {h: 0, a1: $2, a2: 0, a3: csegen_330()};
|
|
6202
6238
|
case undefined: return {h: 1, a1: $1, a2: $2, a3: Text_Bounded_irrelevantBounds($4.a1.a3), a4: {a1: $4.a1, a2: $4.a2}};
|
|
6203
6239
|
}
|
|
6204
6240
|
}
|
|
@@ -6315,54 +6351,54 @@ function Data_Either_maybeToEither($0, $1) {
|
|
|
6315
6351
|
}
|
|
6316
6352
|
|
|
6317
6353
|
function User_Reflect_case__casex20blockx20inx20reflectOnSelf_2298($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
|
|
6318
|
-
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(
|
|
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});
|
|
6319
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));
|
|
6320
6356
|
}
|
|
6321
6357
|
|
|
6322
|
-
function
|
|
6358
|
+
function User_Me_n__6263_2415_ul($0, $1, $2, $3) {
|
|
6323
6359
|
return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($3));
|
|
6324
6360
|
}
|
|
6325
6361
|
|
|
6326
|
-
function
|
|
6327
|
-
return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1:
|
|
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)});
|
|
6328
6364
|
}
|
|
6329
6365
|
|
|
6330
|
-
function
|
|
6331
|
-
return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('GitHub Login:'),
|
|
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));
|
|
6332
6368
|
}
|
|
6333
6369
|
|
|
6334
|
-
function
|
|
6370
|
+
function User_Reflect_n__5356_1492_ital($0, $1) {
|
|
6335
6371
|
return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($1));
|
|
6336
6372
|
}
|
|
6337
6373
|
|
|
6338
|
-
function
|
|
6374
|
+
function User_Me_n__6263_2416_it($0, $1, $2, $3) {
|
|
6339
6375
|
return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($3));
|
|
6340
6376
|
}
|
|
6341
6377
|
|
|
6342
|
-
function
|
|
6378
|
+
function User_Me_n__6403_2571_handleUnsetEmail($0, $1, $2, $3) {
|
|
6343
6379
|
switch($3) {
|
|
6344
6380
|
case '': return {h: 0};
|
|
6345
6381
|
default: return {a1: $3};
|
|
6346
6382
|
}
|
|
6347
6383
|
}
|
|
6348
6384
|
|
|
6349
|
-
function
|
|
6385
|
+
function User_Me_n__6263_2417_green($0, $1, $2, $3) {
|
|
6350
6386
|
return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($3));
|
|
6351
6387
|
}
|
|
6352
6388
|
|
|
6353
|
-
function
|
|
6354
|
-
return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('GitHub Name:'),
|
|
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));
|
|
6355
6391
|
}
|
|
6356
6392
|
|
|
6357
|
-
function
|
|
6393
|
+
function User_Me_n__6263_2418_email($0, $1, $2) {
|
|
6358
6394
|
let $7;
|
|
6359
6395
|
switch($2.h) {
|
|
6360
6396
|
case undefined: {
|
|
6361
|
-
$7 =
|
|
6397
|
+
$7 = User_Me_n__6263_2417_green($0, $1, $2, $2.a1);
|
|
6362
6398
|
break;
|
|
6363
6399
|
}
|
|
6364
6400
|
case 0: {
|
|
6365
|
-
$7 =
|
|
6401
|
+
$7 = User_Me_n__6263_2416_it($0, $1, $2, 'Not set');
|
|
6366
6402
|
break;
|
|
6367
6403
|
}
|
|
6368
6404
|
}
|
|
@@ -6385,12 +6421,12 @@ function User_Reflect_reflectOnSelf($0, $1, $2, $3) {
|
|
|
6385
6421
|
const $c = prs => $d => $e => {
|
|
6386
6422
|
const $19 = myLogin => $1a => $1b => {
|
|
6387
6423
|
const $37 = reviews => {
|
|
6388
|
-
const $38 = Prelude_Types_map_Functor_Maybe(
|
|
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)));
|
|
6389
6425
|
const $4b = PullRequest_tuple(prs);
|
|
6390
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);
|
|
6391
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));
|
|
6392
6428
|
};
|
|
6393
|
-
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(),
|
|
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);
|
|
6394
6430
|
};
|
|
6395
6431
|
return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), csegen_139(), FFI_GitHub_getSelf($1)), $19, $d, $e);
|
|
6396
6432
|
};
|
|
@@ -6398,7 +6434,7 @@ function User_Reflect_reflectOnSelf($0, $1, $2, $3) {
|
|
|
6398
6434
|
}
|
|
6399
6435
|
|
|
6400
6436
|
function User_Me_printInfoOnSelf($0, $1, $2, $3, $4) {
|
|
6401
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $b =>
|
|
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);
|
|
6402
6438
|
}
|
|
6403
6439
|
|
|
6404
6440
|
function User_Reflect_print($0, $1, $2, $3, $4, $5, $6, $7, $8) {
|
|
@@ -6406,7 +6442,7 @@ function User_Reflect_print($0, $1, $2, $3, $4, $5, $6, $7, $8) {
|
|
|
6406
6442
|
}
|
|
6407
6443
|
|
|
6408
6444
|
function User_Me_print($0, $1, $2) {
|
|
6409
|
-
return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1:
|
|
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}}}}}}}}});
|
|
6410
6446
|
}
|
|
6411
6447
|
|
|
6412
6448
|
const User_Reflect_prCount = __lazy(function () {
|
|
@@ -6422,14 +6458,14 @@ const User_Reflect_intro = __lazy(function () {
|
|
|
6422
6458
|
});
|
|
6423
6459
|
|
|
6424
6460
|
function User_Reflect_header($0) {
|
|
6425
|
-
return Text_PrettyPrint_Prettyprinter_Doc_indent(Prelude_Cast_cast_Cast_Nat_Int($0), Text_PrettyPrint_Prettyprinter_Doc_hsep({a1:
|
|
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}}}}));
|
|
6426
6462
|
}
|
|
6427
6463
|
|
|
6428
6464
|
function User_Reflect_graph($0, $1, $2, $3, $4, $5) {
|
|
6429
6465
|
const $6 = ($2+$3);
|
|
6430
6466
|
const $9 = ($5+$4);
|
|
6431
|
-
const $c = Prelude_Types_foldr_Foldable_List(
|
|
6432
|
-
const $1b = Prelude_Types_foldr_Foldable_List(
|
|
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}}});
|
|
6433
6469
|
const $28 = (($c+$1b)+3n);
|
|
6434
6470
|
const $2d = ((Prelude_Cast_cast_Cast_Nat_Double($0)/2.0)-(Prelude_Cast_cast_Cast_Nat_Double($28)/2.0));
|
|
6435
6471
|
const $38 = (Prelude_Cast_cast_Cast_Double_Nat($2d)+Prelude_Types_prim__integerToNat(($c-Prelude_Types_String_length(User_Reflect_leftTitle()))));
|
|
@@ -6438,7 +6474,7 @@ function User_Reflect_graph($0, $1, $2, $3, $4, $5) {
|
|
|
6438
6474
|
}
|
|
6439
6475
|
|
|
6440
6476
|
function User_Reflect_details($0, $1, $2, $3, $4, $5, $6, $7, $8) {
|
|
6441
|
-
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,
|
|
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}}}}}}}}}});
|
|
6442
6478
|
}
|
|
6443
6479
|
|
|
6444
6480
|
function User_Reflect_chart($0, $1, $2, $3, $4, $5, $6) {
|
|
@@ -6464,97 +6500,100 @@ function PullRequest_with__listPartitionedPRs_1144($0, $1, $2, $3, $4) {
|
|
|
6464
6500
|
}
|
|
6465
6501
|
}
|
|
6466
6502
|
|
|
6467
|
-
function
|
|
6503
|
+
function PullRequest_case__identifyOrCreatePRx2ccreatePR_2353($0, $1, $2, $3, $4, $5) {
|
|
6468
6504
|
switch($5.h) {
|
|
6469
6505
|
case undefined: return ($5.a1+$5.a2);
|
|
6470
|
-
default: return $3.
|
|
6506
|
+
default: return $3.a5;
|
|
6471
6507
|
}
|
|
6472
6508
|
}
|
|
6473
6509
|
|
|
6474
|
-
function
|
|
6510
|
+
function PullRequest_n__6867_1428_userNotice($0, $1, $2, $3, $4, $5, $6) {
|
|
6475
6511
|
switch($6.h) {
|
|
6476
6512
|
case 0: {
|
|
6477
6513
|
switch($2.h) {
|
|
6478
6514
|
case 0: return 'no users';
|
|
6479
|
-
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}});
|
|
6480
6516
|
}
|
|
6481
6517
|
}
|
|
6482
|
-
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}});
|
|
6483
6519
|
}
|
|
6484
6520
|
}
|
|
6485
6521
|
|
|
6486
|
-
function
|
|
6522
|
+
function PullRequest_n__6867_1429_teamNotice($0, $1, $2, $3, $4, $5, $6) {
|
|
6487
6523
|
switch($6.h) {
|
|
6488
6524
|
case 0: return '';
|
|
6489
6525
|
case undefined: {
|
|
6490
6526
|
switch($6.a2.h) {
|
|
6491
|
-
case 0: return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' and team ', a2: {a1:
|
|
6492
|
-
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}}});
|
|
6493
6529
|
}
|
|
6494
6530
|
}
|
|
6495
|
-
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}}});
|
|
6496
6532
|
}
|
|
6497
6533
|
}
|
|
6498
6534
|
|
|
6499
|
-
function
|
|
6500
|
-
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'))));
|
|
6501
6537
|
}
|
|
6502
6538
|
|
|
6503
|
-
function
|
|
6539
|
+
function PullRequest_n__6867_1430_prComment($0, $1, $2, $3, $4, $5, $6) {
|
|
6504
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}}}});
|
|
6505
6541
|
}
|
|
6506
6542
|
|
|
6507
|
-
function
|
|
6543
|
+
function PullRequest_n__7480_2015_inlineDescription($0, $1, $2, $3, $4) {
|
|
6508
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)))));
|
|
6509
6545
|
}
|
|
6510
6546
|
|
|
6511
|
-
function
|
|
6547
|
+
function PullRequest_n__6760_1302_forkedReviews($0, $1, $2, $3, $4) {
|
|
6512
6548
|
return FFI_Concurrency_fork(csegen_21(), ('reviews --json '+Prelude_Show_show_Show_Integer($4.a1)));
|
|
6513
6549
|
}
|
|
6514
6550
|
|
|
6515
|
-
function
|
|
6516
|
-
const $
|
|
6517
|
-
const $
|
|
6518
|
-
switch($
|
|
6519
|
-
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'))($
|
|
6520
|
-
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}});
|
|
6521
6557
|
}
|
|
6522
6558
|
};
|
|
6523
|
-
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);
|
|
6524
6560
|
};
|
|
6525
|
-
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);
|
|
6526
6562
|
}
|
|
6527
6563
|
|
|
6528
|
-
function
|
|
6529
|
-
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(
|
|
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)));
|
|
6530
6566
|
}
|
|
6531
6567
|
|
|
6532
|
-
function
|
|
6533
|
-
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.
|
|
6534
|
-
const $
|
|
6535
|
-
const $
|
|
6536
|
-
const $
|
|
6537
|
-
const $
|
|
6538
|
-
const $
|
|
6539
|
-
const $
|
|
6540
|
-
|
|
6541
|
-
|
|
6542
|
-
|
|
6543
|
-
|
|
6544
|
-
|
|
6545
|
-
|
|
6546
|
-
|
|
6547
|
-
|
|
6548
|
-
|
|
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
|
+
}
|
|
6549
6587
|
}
|
|
6550
|
-
|
|
6551
|
-
|
|
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);
|
|
6552
6591
|
};
|
|
6553
|
-
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);
|
|
6554
6593
|
});
|
|
6555
|
-
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);
|
|
6556
6595
|
};
|
|
6557
|
-
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);
|
|
6558
6597
|
})));
|
|
6559
6598
|
}
|
|
6560
6599
|
|
|
@@ -6611,7 +6650,7 @@ function PullRequest_reviewsForUser($0, $1, $2, $3) {
|
|
|
6611
6650
|
};
|
|
6612
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);
|
|
6613
6652
|
};
|
|
6614
|
-
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);
|
|
6615
6654
|
};
|
|
6616
6655
|
}
|
|
6617
6656
|
|
|
@@ -6623,7 +6662,7 @@ function PullRequest_requestReviewers($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
|
6623
6662
|
const $41 = chosenUser => {
|
|
6624
6663
|
const $42 = Prelude_Types_List_tailRecAppend(Prelude_Types_toList_Foldable_Maybe(chosenUser), $4);
|
|
6625
6664
|
let $48;
|
|
6626
|
-
switch($0.
|
|
6665
|
+
switch($0.a6) {
|
|
6627
6666
|
case 1: {
|
|
6628
6667
|
$48 = $3;
|
|
6629
6668
|
break;
|
|
@@ -6644,9 +6683,9 @@ function PullRequest_requestReviewers($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
|
6644
6683
|
break;
|
|
6645
6684
|
}
|
|
6646
6685
|
}
|
|
6647
|
-
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 => {
|
|
6648
6687
|
switch(chosenUser.h) {
|
|
6649
|
-
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);
|
|
6650
6689
|
case 0: return Data_Promise_pure_Applicative_Promise(undefined, $72, $73);
|
|
6651
6690
|
}
|
|
6652
6691
|
})));
|
|
@@ -6657,7 +6696,7 @@ function PullRequest_requestReviewers($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
|
6657
6696
|
break;
|
|
6658
6697
|
}
|
|
6659
6698
|
case 0: {
|
|
6660
|
-
$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:
|
|
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}}})));
|
|
6661
6700
|
break;
|
|
6662
6701
|
}
|
|
6663
6702
|
}
|
|
@@ -6671,6 +6710,10 @@ function PullRequest_requestReviewers($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
|
6671
6710
|
return Data_Promise_x3ex3ex3d_Monad_Promise($a => $b => PullRequest_listReviewers($0, $1, 4n, csegen_134(), $a, $b), $14, $6, $7);
|
|
6672
6711
|
}
|
|
6673
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
|
+
|
|
6674
6717
|
function PullRequest_partitionx27($0, $1, $2) {
|
|
6675
6718
|
const $40 = prJsons => $41 => $42 => {
|
|
6676
6719
|
const $44 = $45 => $46 => {
|
|
@@ -6692,7 +6735,7 @@ function PullRequest_partitionx27($0, $1, $2) {
|
|
|
6692
6735
|
}
|
|
6693
6736
|
};
|
|
6694
6737
|
const $4c = {a1: $4d, a2: a => $55 => ({h: 1, a1: $55}), a3: $57};
|
|
6695
|
-
const $4a = Prelude_Types_traverse_Traversable_List($4c,
|
|
6738
|
+
const $4a = Prelude_Types_traverse_Traversable_List($4c, csegen_436(), prJsons);
|
|
6696
6739
|
return Data_Promise_either(csegen_115(), $4a, $45, $46);
|
|
6697
6740
|
};
|
|
6698
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);
|
|
@@ -6719,12 +6762,12 @@ function PullRequest_identifyOrCreatePR($0, $1, $2, $3, $4, $5) {
|
|
|
6719
6762
|
return $12 => $13 => {
|
|
6720
6763
|
switch($10.a2.h) {
|
|
6721
6764
|
case 0: return Data_Promise_pure_Applicative_Promise({a1: 0, a2: $10.a1}, $12, $13);
|
|
6722
|
-
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);
|
|
6723
6766
|
}
|
|
6724
6767
|
};
|
|
6725
6768
|
}
|
|
6726
|
-
case 0: return Prelude_Interfaces_x3cx24x3e(csegen_103(), $23 => ({a1: 1, a2: $23}),
|
|
6727
|
-
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);
|
|
6728
6771
|
}
|
|
6729
6772
|
};
|
|
6730
6773
|
return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listPRsForBranch($2, $0.a2, $0.a3, $3), $f, $4, $5);
|
|
@@ -6799,14 +6842,14 @@ function System_File_ReadWrite_readLinesOnto($0, $1, $2, $3, $4) {
|
|
|
6799
6842
|
}
|
|
6800
6843
|
};
|
|
6801
6844
|
const $26 = {a1: $27, a2: a => $2f => ({h: 1, a1: $2f}), a3: $31};
|
|
6802
|
-
const $25 = {a1: $26, a2:
|
|
6845
|
+
const $25 = {a1: $26, a2: csegen_246(), a3: csegen_247()};
|
|
6803
6846
|
const $40 = b => a => func => $41 => {
|
|
6804
6847
|
switch($41.h) {
|
|
6805
6848
|
case 0: return {h: 0, a1: $41.a1};
|
|
6806
6849
|
case 1: return {h: 1, a1: func($41.a1)};
|
|
6807
6850
|
}
|
|
6808
6851
|
};
|
|
6809
|
-
const $3f = {a1: $40, a2:
|
|
6852
|
+
const $3f = {a1: $40, a2: csegen_456(), a3: csegen_460()};
|
|
6810
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));
|
|
6811
6854
|
}
|
|
6812
6855
|
default: {
|
|
@@ -7332,11 +7375,11 @@ function FFI_GitHub_listPullRequestsJsonStr($0, $1, $2, $3, $4, $5) {
|
|
|
7332
7375
|
}
|
|
7333
7376
|
|
|
7334
7377
|
function FFI_GitHub_listPullRequests($0, $1, $2, $3, $4, $5) {
|
|
7335
|
-
return Prelude_Interfaces_x3dx3cx3c(csegen_15(),
|
|
7378
|
+
return Prelude_Interfaces_x3dx3cx3c(csegen_15(), csegen_481(), FFI_GitHub_listPullRequestsJsonStr($0, $1, $2, $3, $4, $5));
|
|
7336
7379
|
}
|
|
7337
7380
|
|
|
7338
7381
|
function FFI_GitHub_listPRsForBranch($0, $1, $2, $3) {
|
|
7339
|
-
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));
|
|
7340
7383
|
}
|
|
7341
7384
|
|
|
7342
7385
|
function FFI_GitHub_listOrgMembers($0, $1) {
|
|
@@ -7348,11 +7391,11 @@ function FFI_GitHub_listMyTeams($0) {
|
|
|
7348
7391
|
}
|
|
7349
7392
|
|
|
7350
7393
|
function FFI_GitHub_getUser($0) {
|
|
7351
|
-
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));
|
|
7352
7395
|
}
|
|
7353
7396
|
|
|
7354
7397
|
function FFI_GitHub_getSelf($0) {
|
|
7355
|
-
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));
|
|
7356
7399
|
}
|
|
7357
7400
|
|
|
7358
7401
|
function FFI_GitHub_getRepoDefaultBranch($0, $1, $2, $3, $4) {
|
|
@@ -7446,8 +7489,8 @@ function Data_User_parseUserString($0) {
|
|
|
7446
7489
|
}
|
|
7447
7490
|
};
|
|
7448
7491
|
const $3 = {a1: $4, a2: a => $c => ({h: 1, a1: $c}), a3: $e};
|
|
7449
|
-
const $2 = {a1: $3, a2:
|
|
7450
|
-
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);
|
|
7451
7494
|
}
|
|
7452
7495
|
|
|
7453
7496
|
function Data_User_parseUser($0) {
|
|
@@ -7494,7 +7537,7 @@ function Data_Review_parseReview($0) {
|
|
|
7494
7537
|
}
|
|
7495
7538
|
};
|
|
7496
7539
|
const $20 = {a1: $21, a2: a => $29 => ({h: 1, a1: $29}), a3: $2b};
|
|
7497
|
-
const $1f = {a1: $20, a2:
|
|
7540
|
+
const $1f = {a1: $20, a2: csegen_246(), a3: csegen_247()};
|
|
7498
7541
|
const $1d = Prelude_Interfaces_x3dx3cx3c($1f, $3a => Data_Review_parseState($3a), Language_JSON_Accessors_string($12.a2.a1));
|
|
7499
7542
|
const $40 = state => {
|
|
7500
7543
|
const $46 = b => a => func => $47 => {
|
|
@@ -7515,7 +7558,7 @@ function Data_Review_parseReview($0) {
|
|
|
7515
7558
|
}
|
|
7516
7559
|
};
|
|
7517
7560
|
const $45 = {a1: $46, a2: a => $4e => ({h: 1, a1: $4e}), a3: $50};
|
|
7518
|
-
const $44 = {a1: $45, a2:
|
|
7561
|
+
const $44 = {a1: $45, a2: csegen_246(), a3: csegen_247()};
|
|
7519
7562
|
const $42 = Prelude_Interfaces_x3dx3cx3c($44, $5f => Data_Review_parseDateTime($5f), Language_JSON_Accessors_string($12.a2.a2.a1));
|
|
7520
7563
|
return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($42, submittedAt => ({h: 1, a1: {a1: submittedAt, a2: author, a3: state}}));
|
|
7521
7564
|
};
|
|
@@ -7768,8 +7811,8 @@ function Data_PullRequest_parsePullRequestsString($0) {
|
|
|
7768
7811
|
}
|
|
7769
7812
|
};
|
|
7770
7813
|
const $3 = {a1: $4, a2: a => $c => ({h: 1, a1: $c}), a3: $e};
|
|
7771
|
-
const $2 = {a1: $3, a2:
|
|
7772
|
-
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);
|
|
7773
7816
|
}
|
|
7774
7817
|
|
|
7775
7818
|
function Data_PullRequest_parsePullRequestString($0) {
|
|
@@ -7791,8 +7834,8 @@ function Data_PullRequest_parsePullRequestString($0) {
|
|
|
7791
7834
|
}
|
|
7792
7835
|
};
|
|
7793
7836
|
const $3 = {a1: $4, a2: a => $c => ({h: 1, a1: $c}), a3: $e};
|
|
7794
|
-
const $2 = {a1: $3, a2:
|
|
7795
|
-
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);
|
|
7796
7839
|
}
|
|
7797
7840
|
|
|
7798
7841
|
function Data_PullRequest_parsePR($0) {
|
|
@@ -7818,7 +7861,7 @@ function Data_PullRequest_parsePR($0) {
|
|
|
7818
7861
|
}
|
|
7819
7862
|
};
|
|
7820
7863
|
const $2e = {a1: $2f, a2: a => $37 => ({h: 1, a1: $37}), a3: $39};
|
|
7821
|
-
const $2d = {a1: $2e, a2:
|
|
7864
|
+
const $2d = {a1: $2e, a2: csegen_246(), a3: csegen_247()};
|
|
7822
7865
|
const $2b = Prelude_Interfaces_x3dx3cx3c($2d, $48 => Data_PullRequest_parseState($48), Language_JSON_Accessors_string($18.a2.a2.a1));
|
|
7823
7866
|
const $4e = state => {
|
|
7824
7867
|
const $54 = b => a => func => $55 => {
|
|
@@ -7839,7 +7882,7 @@ function Data_PullRequest_parsePR($0) {
|
|
|
7839
7882
|
}
|
|
7840
7883
|
};
|
|
7841
7884
|
const $53 = {a1: $54, a2: a => $5c => ({h: 1, a1: $5c}), a3: $5e};
|
|
7842
|
-
const $52 = {a1: $53, a2:
|
|
7885
|
+
const $52 = {a1: $53, a2: csegen_246(), a3: csegen_247()};
|
|
7843
7886
|
const $50 = Prelude_Interfaces_x3dx3cx3c($52, $6d => Data_PullRequest_parseDateTime($6d), Language_JSON_Accessors_string($18.a2.a2.a2.a1));
|
|
7844
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}}))));
|
|
7845
7888
|
};
|
|
@@ -7866,7 +7909,7 @@ function Data_PullRequest_isAuthor($0, $1) {
|
|
|
7866
7909
|
return Prelude_EqOrd_x3dx3d_Eq_String($1.a3, $0);
|
|
7867
7910
|
}
|
|
7868
7911
|
|
|
7869
|
-
function
|
|
7912
|
+
function FFI_Git_case__remoteTrackingBranch_1782($0, $1, $2) {
|
|
7870
7913
|
switch($1) {
|
|
7871
7914
|
case '': {
|
|
7872
7915
|
switch($2.h) {
|
|
@@ -7882,18 +7925,26 @@ function FFI_Git_userEmail($0, $1, $2) {
|
|
|
7882
7925
|
return FFI_promiseIO($5 => $6 => $7 => FFI_Git_prim__userEmail($0, $5, $6, $7), $1, $2);
|
|
7883
7926
|
}
|
|
7884
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
|
+
|
|
7885
7932
|
function FFI_Git_remoteURI($0, $1, $2, $3) {
|
|
7886
7933
|
return FFI_promiseIO($6 => $7 => $8 => FFI_Git_prim__remoteURI($0, $1, $6, $7, $8), $2, $3);
|
|
7887
7934
|
}
|
|
7888
7935
|
|
|
7889
7936
|
function FFI_Git_remoteTrackingBranch($0, $1, $2) {
|
|
7890
|
-
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);
|
|
7891
7938
|
}
|
|
7892
7939
|
|
|
7893
7940
|
function FFI_Git_pushNewBranch($0, $1, $2, $3, $4) {
|
|
7894
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);
|
|
7895
7942
|
}
|
|
7896
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
|
+
|
|
7897
7948
|
function FFI_Git_git($0) {
|
|
7898
7949
|
return Prelude_Interfaces_x3cx24x3e($0.a1.a1.a1, $7 => $7, $0.a2(undefined)($e => FFI_Git_prim__git($e)));
|
|
7899
7950
|
}
|
|
@@ -8076,7 +8127,7 @@ function System_getEnv($0, $1) {
|
|
|
8076
8127
|
function System_getArgs($0) {
|
|
8077
8128
|
const $12 = n => {
|
|
8078
8129
|
switch(Prelude_EqOrd_x3e_Ord_Int(n, Number(_truncBigInt32(0n)))) {
|
|
8079
|
-
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)));
|
|
8080
8131
|
case 0: return $0.a1.a1.a2(undefined)({h: 0});
|
|
8081
8132
|
}
|
|
8082
8133
|
};
|
|
@@ -8098,59 +8149,59 @@ function System_exitFailure($0) {
|
|
|
8098
8149
|
return System_exitWith($0, {a1: 1, a2: undefined});
|
|
8099
8150
|
}
|
|
8100
8151
|
|
|
8101
|
-
function
|
|
8102
|
-
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);
|
|
8103
8154
|
}
|
|
8104
8155
|
|
|
8105
|
-
function
|
|
8106
|
-
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);
|
|
8107
8158
|
}
|
|
8108
8159
|
|
|
8109
|
-
function
|
|
8110
|
-
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);
|
|
8111
8162
|
}
|
|
8112
8163
|
|
|
8113
|
-
function
|
|
8164
|
+
function Help_n__4281_1019_maybeDecorate($0, $1, $2) {
|
|
8114
8165
|
switch($0) {
|
|
8115
8166
|
case 1: return Text_PrettyPrint_Prettyprinter_Render_Terminal_renderString(Text_PrettyPrint_Prettyprinter_Doc_layoutPretty(Text_PrettyPrint_Prettyprinter_Doc_defaultLayoutOptions(), $1($2)));
|
|
8116
8167
|
case 0: return $2;
|
|
8117
8168
|
}
|
|
8118
8169
|
}
|
|
8119
8170
|
|
|
8120
|
-
function
|
|
8121
|
-
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);
|
|
8122
8173
|
}
|
|
8123
8174
|
|
|
8124
|
-
function
|
|
8125
|
-
return
|
|
8175
|
+
function Help_n__4281_1022_argument($0, $1) {
|
|
8176
|
+
return Help_n__4281_1019_maybeDecorate($0, csegen_404(), $1);
|
|
8126
8177
|
}
|
|
8127
8178
|
|
|
8128
8179
|
function Help_help($0) {
|
|
8129
|
-
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}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}});
|
|
8130
8181
|
}
|
|
8131
8182
|
|
|
8132
|
-
function
|
|
8183
|
+
function Config_with__getConfig_5664($0, $1, $2, $3, $4) {
|
|
8133
8184
|
switch($1.h) {
|
|
8134
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);
|
|
8135
8186
|
case undefined: return Data_Promise_pure_Applicative_Promise($1.a1($2), $3, $4);
|
|
8136
8187
|
}
|
|
8137
8188
|
}
|
|
8138
8189
|
|
|
8139
|
-
function
|
|
8190
|
+
function Config_with__withx20blockx20inx20setConfig_5541($0, $1, $2, $3, $4, $5) {
|
|
8140
8191
|
switch($3.h) {
|
|
8141
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);
|
|
8142
8193
|
case undefined: return $1a => Config_writeConfig($3.a1, $5, $1a);
|
|
8143
8194
|
}
|
|
8144
8195
|
}
|
|
8145
8196
|
|
|
8146
|
-
function
|
|
8197
|
+
function Config_with__setConfig_5513($0, $1, $2, $3) {
|
|
8147
8198
|
switch($1.h) {
|
|
8148
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);
|
|
8149
|
-
case undefined: return $15 =>
|
|
8200
|
+
case undefined: return $15 => Config_with__withx20blockx20inx20setConfig_5541($1.a1, $3, $2, $1.a1($3)($2), $0, $15);
|
|
8150
8201
|
}
|
|
8151
8202
|
}
|
|
8152
8203
|
|
|
8153
|
-
function
|
|
8204
|
+
function Config_with__propSettersx2cparseBool_5273($0, $1) {
|
|
8154
8205
|
switch($1) {
|
|
8155
8206
|
case 'yes': return {a1: 1};
|
|
8156
8207
|
case 'true': return {a1: 1};
|
|
@@ -8160,14 +8211,14 @@ function Config_with__propSettersx2cparseBool_5272($0, $1) {
|
|
|
8160
8211
|
}
|
|
8161
8212
|
}
|
|
8162
8213
|
|
|
8163
|
-
function
|
|
8214
|
+
function Config_with__dropPrefixx27x2cdropx27_5089($0, $1, $2) {
|
|
8164
8215
|
switch($2.h) {
|
|
8165
8216
|
case 0: return {a1: $2.a1.a1};
|
|
8166
8217
|
case 1: return {h: 0};
|
|
8167
8218
|
}
|
|
8168
8219
|
}
|
|
8169
8220
|
|
|
8170
|
-
function
|
|
8221
|
+
function Config_case__parseGitHubURIx2cparseSuffix_5149($0, $1, $2) {
|
|
8171
8222
|
const $e = $f => {
|
|
8172
8223
|
switch($f.h) {
|
|
8173
8224
|
case undefined: {
|
|
@@ -8187,7 +8238,7 @@ function Config_case__parseGitHubURIx2cparseSuffix_5148($0, $1, $2) {
|
|
|
8187
8238
|
return Prelude_Types_x3ex3ex3d_Monad_Maybe({a1: Data_String_split($9 => Prelude_EqOrd_x3dx3d_Eq_Char($9, '/'), $2.a1)}, $e);
|
|
8188
8239
|
}
|
|
8189
8240
|
|
|
8190
|
-
function
|
|
8241
|
+
function Config_n__5993_5749_yesUnlessNo($0, $1, $2, $3, $4) {
|
|
8191
8242
|
switch($4) {
|
|
8192
8243
|
case 'n': return 0;
|
|
8193
8244
|
case 'N': return 0;
|
|
@@ -8195,35 +8246,35 @@ function Config_n__5884_5646_yesUnlessNo($0, $1, $2, $3, $4) {
|
|
|
8195
8246
|
}
|
|
8196
8247
|
}
|
|
8197
8248
|
|
|
8198
|
-
function
|
|
8249
|
+
function Config_n__5540_5265_update($0, $1, $2, $3, $4) {
|
|
8199
8250
|
return $0(undefined)(undefined)($c => Prelude_Basics_flip($2, $3, $c))($1($4));
|
|
8200
8251
|
}
|
|
8201
8252
|
|
|
8202
|
-
function
|
|
8203
|
-
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);
|
|
8204
8255
|
}
|
|
8205
8256
|
|
|
8206
|
-
function
|
|
8207
|
-
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));
|
|
8208
8259
|
}
|
|
8209
8260
|
|
|
8210
|
-
function
|
|
8211
|
-
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);
|
|
8212
8263
|
}
|
|
8213
8264
|
|
|
8214
|
-
function
|
|
8215
|
-
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);
|
|
8216
8267
|
}
|
|
8217
8268
|
|
|
8218
|
-
function
|
|
8219
|
-
return
|
|
8269
|
+
function Config_n__5540_5264_parseBool($0) {
|
|
8270
|
+
return Config_with__propSettersx2cparseBool_5273($0, Data_String_toLower($0));
|
|
8220
8271
|
}
|
|
8221
8272
|
|
|
8222
|
-
function
|
|
8223
|
-
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);
|
|
8224
8275
|
}
|
|
8225
8276
|
|
|
8226
|
-
function
|
|
8277
|
+
function Config_n__5993_5748_orIfEmpty($0, $1, $2, $3, $4, $5) {
|
|
8227
8278
|
switch($4.h) {
|
|
8228
8279
|
case 0: return $5;
|
|
8229
8280
|
case undefined: {
|
|
@@ -8235,20 +8286,20 @@ function Config_n__5884_5645_orIfEmpty($0, $1, $2, $3, $4, $5) {
|
|
|
8235
8286
|
}
|
|
8236
8287
|
}
|
|
8237
8288
|
|
|
8238
|
-
function
|
|
8289
|
+
function Config_n__5234_4963_oneDayAgo($0, $1, $2) {
|
|
8239
8290
|
return $2.a1.a2(undefined)(undefined)(System_time($2))(now => $2.a1.a1.a2(undefined)(Prelude_Cast_cast_Cast_Integer_Bits32((now-86400n))));
|
|
8240
8291
|
}
|
|
8241
8292
|
|
|
8242
|
-
function
|
|
8293
|
+
function Config_n__5993_5752_enterForDefaultStr($0, $1, $2, $3, $4) {
|
|
8243
8294
|
return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' (ENTER for default: ', a2: {a1: $4, a2: {a1: ')', a2: {h: 0}}}});
|
|
8244
8295
|
}
|
|
8245
8296
|
|
|
8246
|
-
function
|
|
8247
|
-
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));
|
|
8248
8299
|
}
|
|
8249
8300
|
|
|
8250
|
-
function
|
|
8251
|
-
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));
|
|
8252
8303
|
}
|
|
8253
8304
|
|
|
8254
8305
|
function Config_show_Show_ConfigError($0) {
|
|
@@ -8275,17 +8326,17 @@ function Config_syncIfOld($0, $1, $2, $3) {
|
|
|
8275
8326
|
case 0: return $1a => Data_Promise_pure_Applicative_Promise($1, $d, $1a);
|
|
8276
8327
|
}
|
|
8277
8328
|
};
|
|
8278
|
-
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);
|
|
8279
8330
|
}
|
|
8280
8331
|
|
|
8281
8332
|
function Config_syncConfig($0, $1, $2, $3, $4) {
|
|
8282
8333
|
const $b = teamSlugs => $c => $d => {
|
|
8283
8334
|
const $14 = orgMembers => $15 => $16 => {
|
|
8284
8335
|
const $1a = updatedAt => {
|
|
8285
|
-
const $1b = {a1: updatedAt, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: $0.a6, a7:
|
|
8286
|
-
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)));
|
|
8287
8338
|
};
|
|
8288
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(
|
|
8339
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_537(), $1a, $15, $16);
|
|
8289
8340
|
};
|
|
8290
8341
|
return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listOrgMembers($1, $0.a2), $14, $c, $d);
|
|
8291
8342
|
};
|
|
@@ -8293,19 +8344,27 @@ function Config_syncConfig($0, $1, $2, $3, $4) {
|
|
|
8293
8344
|
}
|
|
8294
8345
|
|
|
8295
8346
|
function Config_setConfig($0, $1, $2) {
|
|
8296
|
-
return
|
|
8347
|
+
return Config_with__setConfig_5513($1, Data_List_lookup(csegen_94(), $1, Config_propSetters()), $2, $0);
|
|
8297
8348
|
}
|
|
8298
8349
|
|
|
8299
8350
|
const Config_propSetters = __lazy(function () {
|
|
8300
|
-
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}}}};
|
|
8301
8352
|
});
|
|
8302
8353
|
|
|
8303
8354
|
const Config_propGetters = __lazy(function () {
|
|
8304
|
-
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}}}};
|
|
8305
8356
|
});
|
|
8306
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
|
+
|
|
8307
8366
|
function Config_parseGitHubURI($0) {
|
|
8308
|
-
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));
|
|
8309
8368
|
}
|
|
8310
8369
|
|
|
8311
8370
|
function Config_loadOrCreateConfig($0, $1, $2, $3, $4, $5) {
|
|
@@ -8348,14 +8407,14 @@ function Config_loadConfig($0, $1, $2) {
|
|
|
8348
8407
|
}
|
|
8349
8408
|
};
|
|
8350
8409
|
const $a = {a1: $b, a2: a => $13 => ({h: 1, a1: $13}), a3: $15};
|
|
8351
|
-
const $9 = {a1: $a, a2:
|
|
8410
|
+
const $9 = {a1: $a, a2: csegen_246(), a3: csegen_247()};
|
|
8352
8411
|
const $24 = b => a => func => $25 => {
|
|
8353
8412
|
switch($25.h) {
|
|
8354
8413
|
case 0: return {h: 0, a1: $25.a1};
|
|
8355
8414
|
case 1: return {h: 1, a1: func($25.a1)};
|
|
8356
8415
|
}
|
|
8357
8416
|
};
|
|
8358
|
-
const $23 = {a1: $24, a2:
|
|
8417
|
+
const $23 = {a1: $24, a2: csegen_456(), a3: csegen_460()};
|
|
8359
8418
|
return Prelude_Interfaces_Monad_x3ex3ex3d_Monad_Composex28x28x2ex20x24mx29x20x24tx29($0.a1, $9, $23, $4, $5);
|
|
8360
8419
|
};
|
|
8361
8420
|
const $39 = $3a => {
|
|
@@ -8397,7 +8456,7 @@ function Config_loadConfig($0, $1, $2) {
|
|
|
8397
8456
|
}
|
|
8398
8457
|
|
|
8399
8458
|
function Config_getConfig($0, $1, $2) {
|
|
8400
|
-
return $3 =>
|
|
8459
|
+
return $3 => Config_with__getConfig_5664($1, Data_List_lookup(csegen_94(), $1, Config_propGetters()), $0, $2, $3);
|
|
8401
8460
|
}
|
|
8402
8461
|
|
|
8403
8462
|
function Config_findConfig($0, $1, $2) {
|
|
@@ -8417,41 +8476,50 @@ function Config_findConfig($0, $1, $2) {
|
|
|
8417
8476
|
}
|
|
8418
8477
|
|
|
8419
8478
|
function Config_dropPrefixx27($0, $1) {
|
|
8420
|
-
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)));
|
|
8421
8480
|
}
|
|
8422
8481
|
|
|
8423
8482
|
function Config_createConfig($0, $1, $2, $3) {
|
|
8424
|
-
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}}}})), () => $
|
|
8425
|
-
const $
|
|
8426
|
-
const $
|
|
8427
|
-
|
|
8428
|
-
|
|
8429
|
-
const $
|
|
8430
|
-
|
|
8431
|
-
|
|
8432
|
-
const $
|
|
8433
|
-
const $
|
|
8434
|
-
return $
|
|
8435
|
-
const $
|
|
8436
|
-
const $
|
|
8437
|
-
const $
|
|
8438
|
-
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
|
+
};
|
|
8439
8507
|
};
|
|
8440
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(
|
|
8508
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_537(), $14d, $148, $149);
|
|
8441
8509
|
};
|
|
8442
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(
|
|
8443
|
-
};
|
|
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));
|
|
8444
8512
|
};
|
|
8445
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(
|
|
8446
|
-
};
|
|
8447
|
-
|
|
8448
|
-
|
|
8449
|
-
};
|
|
8450
|
-
|
|
8451
|
-
});
|
|
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);
|
|
8452
8520
|
};
|
|
8453
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(
|
|
8454
|
-
});
|
|
8521
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $2b => Config_preferOriginRemote($2b), FFI_Git_listRemotes($0)), $31, $23, $24);
|
|
8522
|
+
}));
|
|
8455
8523
|
}
|
|
8456
8524
|
|
|
8457
8525
|
function Data_List_PrefixSuffix_with__withx20blockx20inx20dropPrefix_3662($0, $1, $2, $3, $4, $5) {
|
|
@@ -8492,10 +8560,10 @@ function Data_List_PrefixSuffix_dropPrefix($0, $1, $2) {
|
|
|
8492
8560
|
}
|
|
8493
8561
|
}
|
|
8494
8562
|
|
|
8495
|
-
function
|
|
8563
|
+
function BashCompletion_n__3752_1119_slugsOrLogins($0, $1, $2) {
|
|
8496
8564
|
switch(Data_String_isPrefixOf('+', $1)) {
|
|
8497
|
-
case 1: return Prelude_Interfaces_x3cx24x3e(csegen_119(), $b => ('+'+$b), $2.
|
|
8498
|
-
case 0: return $2.
|
|
8565
|
+
case 1: return Prelude_Interfaces_x3cx24x3e(csegen_119(), $b => ('+'+$b), $2.a9);
|
|
8566
|
+
case 0: return $2.a8;
|
|
8499
8567
|
}
|
|
8500
8568
|
}
|
|
8501
8569
|
|
|
@@ -8515,14 +8583,14 @@ function BashCompletion_opts($0, $1, $2) {
|
|
|
8515
8583
|
switch($1) {
|
|
8516
8584
|
case '--': {
|
|
8517
8585
|
switch($2) {
|
|
8518
|
-
case 'list': return $0.
|
|
8586
|
+
case 'list': return $0.a8;
|
|
8519
8587
|
default: {
|
|
8520
8588
|
switch($2) {
|
|
8521
|
-
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);
|
|
8522
8590
|
default: {
|
|
8523
8591
|
switch($1) {
|
|
8524
|
-
case '--': return $0.
|
|
8525
|
-
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));
|
|
8526
8594
|
}
|
|
8527
8595
|
}
|
|
8528
8596
|
}
|
|
@@ -8531,11 +8599,11 @@ function BashCompletion_opts($0, $1, $2) {
|
|
|
8531
8599
|
}
|
|
8532
8600
|
default: {
|
|
8533
8601
|
switch($2) {
|
|
8534
|
-
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);
|
|
8535
8603
|
default: {
|
|
8536
8604
|
switch($1) {
|
|
8537
|
-
case '--': return $0.
|
|
8538
|
-
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));
|
|
8539
8607
|
}
|
|
8540
8608
|
}
|
|
8541
8609
|
}
|
|
@@ -8553,14 +8621,14 @@ function BashCompletion_opts($0, $1, $2) {
|
|
|
8553
8621
|
switch($1) {
|
|
8554
8622
|
case '--': {
|
|
8555
8623
|
switch($2) {
|
|
8556
|
-
case 'list': return $0.
|
|
8624
|
+
case 'list': return $0.a8;
|
|
8557
8625
|
default: {
|
|
8558
8626
|
switch($2) {
|
|
8559
|
-
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);
|
|
8560
8628
|
default: {
|
|
8561
8629
|
switch($1) {
|
|
8562
|
-
case '--': return $0.
|
|
8563
|
-
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));
|
|
8564
8632
|
}
|
|
8565
8633
|
}
|
|
8566
8634
|
}
|
|
@@ -8569,11 +8637,11 @@ function BashCompletion_opts($0, $1, $2) {
|
|
|
8569
8637
|
}
|
|
8570
8638
|
default: {
|
|
8571
8639
|
switch($2) {
|
|
8572
|
-
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);
|
|
8573
8641
|
default: {
|
|
8574
8642
|
switch($1) {
|
|
8575
|
-
case '--': return $0.
|
|
8576
|
-
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));
|
|
8577
8645
|
}
|
|
8578
8646
|
}
|
|
8579
8647
|
}
|
|
@@ -8603,7 +8671,7 @@ function BashCompletion_cmdOpts($0, $1) {
|
|
|
8603
8671
|
switch($0) {
|
|
8604
8672
|
case '-': {
|
|
8605
8673
|
switch($1) {
|
|
8606
|
-
case 'contribute': return
|
|
8674
|
+
case 'contribute': return csegen_571();
|
|
8607
8675
|
default: {
|
|
8608
8676
|
switch($1) {
|
|
8609
8677
|
case 'contribute': {
|
|
@@ -8619,7 +8687,7 @@ function BashCompletion_cmdOpts($0, $1) {
|
|
|
8619
8687
|
}
|
|
8620
8688
|
case '--': {
|
|
8621
8689
|
switch($1) {
|
|
8622
|
-
case 'contribute': return
|
|
8690
|
+
case 'contribute': return csegen_571();
|
|
8623
8691
|
default: {
|
|
8624
8692
|
switch($1) {
|
|
8625
8693
|
case 'contribute': {
|
|
@@ -8663,7 +8731,7 @@ function BashCompletion_cmdOpts($0, $1) {
|
|
|
8663
8731
|
switch($0) {
|
|
8664
8732
|
case '-': {
|
|
8665
8733
|
switch($1) {
|
|
8666
|
-
case 'contribute': return
|
|
8734
|
+
case 'contribute': return csegen_571();
|
|
8667
8735
|
default: {
|
|
8668
8736
|
switch($1) {
|
|
8669
8737
|
case 'contribute': {
|
|
@@ -8679,7 +8747,7 @@ function BashCompletion_cmdOpts($0, $1) {
|
|
|
8679
8747
|
}
|
|
8680
8748
|
case '--': {
|
|
8681
8749
|
switch($1) {
|
|
8682
|
-
case 'contribute': return
|
|
8750
|
+
case 'contribute': return csegen_571();
|
|
8683
8751
|
default: {
|
|
8684
8752
|
switch($1) {
|
|
8685
8753
|
case 'contribute': {
|
|
@@ -8720,7 +8788,7 @@ function AppVersion_printVersion($0) {
|
|
|
8720
8788
|
}
|
|
8721
8789
|
|
|
8722
8790
|
const AppVersion_appVersion = __lazy(function () {
|
|
8723
|
-
return '0.
|
|
8791
|
+
return '1.0.0';
|
|
8724
8792
|
});
|
|
8725
8793
|
|
|
8726
8794
|
|