@mattpolzin/harmony 5.3.0 → 5.3.1
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.
- package/harmony +286 -310
- package/package.json +1 -1
package/harmony
CHANGED
|
@@ -991,7 +991,7 @@ function x24tcOpt_1($0) {
|
|
|
991
991
|
case 0: return {h: 0 /* {TcDone:1} */, a1: $0.a5};
|
|
992
992
|
default: {
|
|
993
993
|
const $17 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
|
|
994
|
-
const $1b = Data_List_DeleteBy_deleteByx27($1e => $1f => Prelude_Basics_on($22 => $23 => $0.a1.a1.a1($22)($23),
|
|
994
|
+
const $1b = Data_List_DeleteBy_deleteByx27($1e => $1f => Prelude_Basics_on($22 => $23 => $0.a1.a1.a1($22)($23), csegen_691(), $1e, $1f), $17, $0.a6);
|
|
995
995
|
switch($1b.a1.h) {
|
|
996
996
|
case 0: /* nothing */ {
|
|
997
997
|
switch($0.a8) {
|
|
@@ -1006,7 +1006,7 @@ function x24tcOpt_1($0) {
|
|
|
1006
1006
|
}
|
|
1007
1007
|
default: {
|
|
1008
1008
|
const $6a = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
|
|
1009
|
-
const $6e = Data_List_DeleteBy_deleteByx27($71 => $72 => Prelude_Basics_on($75 => $76 => $0.a1.a1.a1($75)($76),
|
|
1009
|
+
const $6e = Data_List_DeleteBy_deleteByx27($71 => $72 => Prelude_Basics_on($75 => $76 => $0.a1.a1.a1($75)($76), csegen_691(), $71, $72), $6a, $0.a6);
|
|
1010
1010
|
switch($6e.a1.h) {
|
|
1011
1011
|
case 0: /* nothing */ {
|
|
1012
1012
|
switch($0.a8) {
|
|
@@ -1031,7 +1031,7 @@ function x24tcOpt_1($0) {
|
|
|
1031
1031
|
case 0: return {h: 0 /* {TcDone:1} */, a1: $0.a5};
|
|
1032
1032
|
default: {
|
|
1033
1033
|
const $c1 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
|
|
1034
|
-
const $c5 = Data_List_DeleteBy_deleteByx27($c8 => $c9 => Prelude_Basics_on($cc => $cd => $0.a1.a1.a1($cc)($cd),
|
|
1034
|
+
const $c5 = Data_List_DeleteBy_deleteByx27($c8 => $c9 => Prelude_Basics_on($cc => $cd => $0.a1.a1.a1($cc)($cd), csegen_691(), $c8, $c9), $c1, $0.a6);
|
|
1035
1035
|
switch($c5.a1.h) {
|
|
1036
1036
|
case 0: /* nothing */ {
|
|
1037
1037
|
switch($0.a8) {
|
|
@@ -1046,7 +1046,7 @@ function x24tcOpt_1($0) {
|
|
|
1046
1046
|
}
|
|
1047
1047
|
default: {
|
|
1048
1048
|
const $114 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
|
|
1049
|
-
const $118 = Data_List_DeleteBy_deleteByx27($11b => $11c => Prelude_Basics_on($11f => $120 => $0.a1.a1.a1($11f)($120),
|
|
1049
|
+
const $118 = Data_List_DeleteBy_deleteByx27($11b => $11c => Prelude_Basics_on($11f => $120 => $0.a1.a1.a1($11f)($120), csegen_691(), $11b, $11c), $114, $0.a6);
|
|
1050
1050
|
switch($118.a1.h) {
|
|
1051
1051
|
case 0: /* nothing */ {
|
|
1052
1052
|
switch($0.a8) {
|
|
@@ -2817,93 +2817,93 @@ const csegen_404 = __lazy(function () {
|
|
|
2817
2817
|
return {a1: Commands_Help_argument(0, '#<label>'), a2: csegen_399()};
|
|
2818
2818
|
});
|
|
2819
2819
|
|
|
2820
|
-
/* {csegen:
|
|
2821
|
-
const
|
|
2820
|
+
/* {csegen:560} */
|
|
2821
|
+
const csegen_560 = __lazy(function () {
|
|
2822
2822
|
return {a1: {h: 0}, a2: {a1: '-i', a2: {h: 0}}};
|
|
2823
2823
|
});
|
|
2824
2824
|
|
|
2825
|
-
/* {csegen:
|
|
2826
|
-
const
|
|
2825
|
+
/* {csegen:579} */
|
|
2826
|
+
const csegen_579 = __lazy(function () {
|
|
2827
2827
|
return {a1: csegen_9(), a2: a => ({h: 0}), a3: a => $4 => $5 => Prelude_Types_x3cx7cx3e_Alternative_Maybe($4, $5)};
|
|
2828
2828
|
});
|
|
2829
2829
|
|
|
2830
|
-
/* {csegen:
|
|
2831
|
-
const
|
|
2830
|
+
/* {csegen:580} */
|
|
2831
|
+
const csegen_580 = __lazy(function () {
|
|
2832
2832
|
return $0 => Data_List_sort(csegen_227(), $0);
|
|
2833
2833
|
});
|
|
2834
2834
|
|
|
2835
|
-
/* {csegen:
|
|
2836
|
-
const
|
|
2835
|
+
/* {csegen:582} */
|
|
2836
|
+
const csegen_582 = __lazy(function () {
|
|
2837
2837
|
return $0 => $1 => $2 => FFI_Concurrency_promiseAll(csegen_146(), $0, $1, $2);
|
|
2838
2838
|
});
|
|
2839
2839
|
|
|
2840
|
-
/* {csegen:
|
|
2841
|
-
const
|
|
2840
|
+
/* {csegen:594} */
|
|
2841
|
+
const csegen_594 = __lazy(function () {
|
|
2842
2842
|
return $0 => $1 => Data_Date_compare_Ord_Date($0, $1);
|
|
2843
2843
|
});
|
|
2844
2844
|
|
|
2845
|
-
/* {csegen:
|
|
2846
|
-
const
|
|
2845
|
+
/* {csegen:595} */
|
|
2846
|
+
const csegen_595 = __lazy(function () {
|
|
2847
2847
|
return $0 => $0.a3;
|
|
2848
2848
|
});
|
|
2849
2849
|
|
|
2850
|
-
/* {csegen:
|
|
2851
|
-
const
|
|
2852
|
-
return $0 => $1 => Prelude_Basics_on(
|
|
2850
|
+
/* {csegen:596} */
|
|
2851
|
+
const csegen_596 = __lazy(function () {
|
|
2852
|
+
return $0 => $1 => Prelude_Basics_on(csegen_594(), csegen_595(), $0, $1);
|
|
2853
2853
|
});
|
|
2854
2854
|
|
|
2855
|
-
/* {csegen:
|
|
2856
|
-
const
|
|
2855
|
+
/* {csegen:614} */
|
|
2856
|
+
const csegen_614 = __lazy(function () {
|
|
2857
2857
|
return $0 => $0.a3;
|
|
2858
2858
|
});
|
|
2859
2859
|
|
|
2860
|
-
/* {csegen:
|
|
2861
|
-
const
|
|
2860
|
+
/* {csegen:616} */
|
|
2861
|
+
const csegen_616 = __lazy(function () {
|
|
2862
2862
|
return Theme_cs({a1: 2, a2: {h: 0}});
|
|
2863
2863
|
});
|
|
2864
2864
|
|
|
2865
|
-
/* {csegen:
|
|
2866
|
-
const
|
|
2865
|
+
/* {csegen:619} */
|
|
2866
|
+
const csegen_619 = __lazy(function () {
|
|
2867
2867
|
return $0 => $0.a1;
|
|
2868
2868
|
});
|
|
2869
2869
|
|
|
2870
|
-
/* {csegen:
|
|
2871
|
-
const
|
|
2870
|
+
/* {csegen:625} */
|
|
2871
|
+
const csegen_625 = __lazy(function () {
|
|
2872
2872
|
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}}}));
|
|
2873
2873
|
});
|
|
2874
2874
|
|
|
2875
|
-
/* {csegen:
|
|
2876
|
-
const
|
|
2875
|
+
/* {csegen:635} */
|
|
2876
|
+
const csegen_635 = __lazy(function () {
|
|
2877
2877
|
return Theme_cs({a1: 0, a2: {h: 0}});
|
|
2878
2878
|
});
|
|
2879
2879
|
|
|
2880
|
-
/* {csegen:
|
|
2881
|
-
const
|
|
2880
|
+
/* {csegen:636} */
|
|
2881
|
+
const csegen_636 = __lazy(function () {
|
|
2882
2882
|
return Theme_cs({a1: 1, a2: {h: 0}});
|
|
2883
2883
|
});
|
|
2884
2884
|
|
|
2885
|
-
/* {csegen:
|
|
2886
|
-
const
|
|
2885
|
+
/* {csegen:637} */
|
|
2886
|
+
const csegen_637 = __lazy(function () {
|
|
2887
2887
|
return Theme_cs({a1: 3, a2: {h: 0}});
|
|
2888
2888
|
});
|
|
2889
2889
|
|
|
2890
|
-
/* {csegen:
|
|
2891
|
-
const
|
|
2890
|
+
/* {csegen:657} */
|
|
2891
|
+
const csegen_657 = __lazy(function () {
|
|
2892
2892
|
return $0 => Util_Prompting_yesNoPrompt(csegen_74()(), 1, 'Would you like to continue creating a Pull Request anyway?');
|
|
2893
2893
|
});
|
|
2894
2894
|
|
|
2895
|
-
/* {csegen:
|
|
2896
|
-
const
|
|
2895
|
+
/* {csegen:691} */
|
|
2896
|
+
const csegen_691 = __lazy(function () {
|
|
2897
2897
|
return $0 => $0.a1;
|
|
2898
2898
|
});
|
|
2899
2899
|
|
|
2900
|
-
/* {csegen:
|
|
2901
|
-
const
|
|
2900
|
+
/* {csegen:696} */
|
|
2901
|
+
const csegen_696 = __lazy(function () {
|
|
2902
2902
|
return {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: {h: 0}};
|
|
2903
2903
|
});
|
|
2904
2904
|
|
|
2905
|
-
/* {csegen:
|
|
2906
|
-
const
|
|
2905
|
+
/* {csegen:713} */
|
|
2906
|
+
const csegen_713 = __lazy(function () {
|
|
2907
2907
|
return {a1: ann => $1 => Commands_Graph_pretty_Pretty_Date($1), a2: ann => $5 => $6 => Commands_Graph_prettyPrec_Pretty_Date($5, $6)};
|
|
2908
2908
|
});
|
|
2909
2909
|
|
|
@@ -2912,23 +2912,23 @@ function prim__sub_Integer($0, $1) {
|
|
|
2912
2912
|
return ($0-$1);
|
|
2913
2913
|
}
|
|
2914
2914
|
|
|
2915
|
-
/* Main.
|
|
2916
|
-
function
|
|
2915
|
+
/* Main.8817:1556:parsePg */
|
|
2916
|
+
function Main_n__8817_1556_parsePg($0, $1, $2, $3, $4, $5, $6) {
|
|
2917
2917
|
return Data_String_parsePositive(csegen_2(), $6);
|
|
2918
2918
|
}
|
|
2919
2919
|
|
|
2920
|
-
/* Main.
|
|
2921
|
-
function
|
|
2920
|
+
/* Main.8817:1555:parseLim */
|
|
2921
|
+
function Main_n__8817_1555_parseLim($0, $1, $2, $3, $4, $5) {
|
|
2922
2922
|
return Prelude_Interfaces_x3cx3dx3c(csegen_14(), x => Data_Fin_natToFin(x, 101n), $e => Data_String_parsePositive(csegen_2(), $e));
|
|
2923
2923
|
}
|
|
2924
2924
|
|
|
2925
|
-
/* Main.
|
|
2926
|
-
function
|
|
2925
|
+
/* Main.8619:1303:ffiOpts */
|
|
2926
|
+
function Main_n__8619_1303_ffiOpts($0, $1, $2, $3) {
|
|
2927
2927
|
return BashCompletion_ffiOpts($0, $3, $2, $1);
|
|
2928
2928
|
}
|
|
2929
2929
|
|
|
2930
|
-
/* Main.
|
|
2931
|
-
function
|
|
2930
|
+
/* Main.8619:1302:configuredOpts */
|
|
2931
|
+
function Main_n__8619_1302_configuredOpts($0, $1, $2, $3) {
|
|
2932
2932
|
const $13 = $14 => {
|
|
2933
2933
|
switch($14.h) {
|
|
2934
2934
|
case 1: /* Right */ return $0.a1.a1.a2(undefined)(BashCompletion_opts($14.a1, $3, $2, $1));
|
|
@@ -3173,7 +3173,7 @@ function Main_handleAuthenticatedArgs($0, $1, $2, $3) {
|
|
|
3173
3173
|
}
|
|
3174
3174
|
return Prelude_Types_x3ex3ex3d_Monad_Maybe($b5, filter => ({a1: {a1: filter, a2: {a1: $b2.a1, a2: $b2.a2}}}));
|
|
3175
3175
|
};
|
|
3176
|
-
const $92 = Prelude_Types_x3ex3ex3d_Monad_Maybe(Prelude_Types_x3cx2ax3e_Applicative_Maybe(Prelude_Types_x3cx2ax3e_Applicative_Maybe({a1: $9a => $9b => ({a1: $9a, a2: $9b})},
|
|
3176
|
+
const $92 = Prelude_Types_x3ex3ex3d_Monad_Maybe(Prelude_Types_x3cx2ax3e_Applicative_Maybe(Prelude_Types_x3cx2ax3e_Applicative_Maybe({a1: $9a => $9b => ({a1: $9a, a2: $9b})}, Main_n__8817_1555_parseLim($1, $2, $3.a2.a2.a1, $3.a2.a2.a2.a1, $3.a2.a2.a2.a2.a1, $0)($3.a2.a2.a2.a1)), Main_n__8817_1556_parsePg($1, $2, $3.a2.a2.a1, $3.a2.a2.a2.a1, $3.a2.a2.a2.a2.a1, $0, $3.a2.a2.a2.a2.a1)), $b1);
|
|
3177
3177
|
return $c2 => {
|
|
3178
3178
|
switch($92.h) {
|
|
3179
3179
|
case undefined: /* just */ return $c4 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(FFI_GitHub_listPullRequestsJsonStr($2, $0.a2, $0.a3, $92.a1.a1, $92.a1.a2.a1, $92.a1.a2.a2), pullsJsonStr => $d3 => $d4 => $d5 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($d8 => Prelude_IO_prim__putStr(pullsJsonStr, $d8), $d3, $d4, $d5), $c2, $c4);
|
|
@@ -3260,46 +3260,46 @@ function Main_handleAuthenticatedArgs($0, $1, $2, $3) {
|
|
|
3260
3260
|
case 'pr': {
|
|
3261
3261
|
const $262 = Commands_parsePrArgs($3.a2);
|
|
3262
3262
|
switch($262.h) {
|
|
3263
|
-
case 1: /* Right */ return Commands_pr($0, $1, $2, $262.a1);
|
|
3263
|
+
case 1: /* Right */ return $265 => $266 => Commands_pr($0, $1, $2, $262.a1, $265, $266);
|
|
3264
3264
|
case 0: /* Left */ return Main_exitError(csegen_74()(), $262.a1);
|
|
3265
3265
|
}
|
|
3266
3266
|
}
|
|
3267
3267
|
case 'reflect': {
|
|
3268
|
-
return $
|
|
3268
|
+
return $273 => $274 => {
|
|
3269
3269
|
switch($3.a2.h) {
|
|
3270
|
-
case 0: /* nil */ return Commands_reflect($0, $2, $
|
|
3271
|
-
default: return Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $
|
|
3270
|
+
case 0: /* nil */ return Commands_reflect($0, $2, $273, $274);
|
|
3271
|
+
default: return Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $282 => $282, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_53(), $3), a2: {a1: '.', a2: {h: 0}}}}), $273, $274);
|
|
3272
3272
|
}
|
|
3273
3273
|
};
|
|
3274
3274
|
}
|
|
3275
3275
|
case 'contribute': {
|
|
3276
|
-
const $
|
|
3277
|
-
switch($
|
|
3278
|
-
case 1: /* Right */ return $
|
|
3279
|
-
case 0: /* Left */ return Main_exitError(csegen_74()(), $
|
|
3276
|
+
const $290 = Commands_parseContributeArgs($3.a2);
|
|
3277
|
+
switch($290.h) {
|
|
3278
|
+
case 1: /* Right */ return $293 => $294 => Commands_contribute($0, $1, $2, $290.a1, $293, $294);
|
|
3279
|
+
case 0: /* Left */ return Main_exitError(csegen_74()(), $290.a1);
|
|
3280
3280
|
}
|
|
3281
3281
|
}
|
|
3282
3282
|
case 'list': {
|
|
3283
|
-
return $
|
|
3283
|
+
return $2a1 => {
|
|
3284
3284
|
switch($3.a2.h) {
|
|
3285
|
-
case 0: /* nil */ return $
|
|
3285
|
+
case 0: /* nil */ return $2a3 => Commands_listOrgTeams($0, $2, $2a1, $2a3);
|
|
3286
3286
|
case undefined: /* cons */ {
|
|
3287
|
-
return $
|
|
3287
|
+
return $2a9 => {
|
|
3288
3288
|
switch($3.a2.a2.h) {
|
|
3289
|
-
case 0: /* nil */ return Commands_list($0, $2, $3.a2.a1, $
|
|
3290
|
-
default: return Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $
|
|
3289
|
+
case 0: /* nil */ return Commands_list($0, $2, $3.a2.a1, $2a1, $2a9);
|
|
3290
|
+
default: return Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $2b8 => $2b8, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_53(), $3), a2: {a1: '.', a2: {h: 0}}}}), $2a1, $2a9);
|
|
3291
3291
|
}
|
|
3292
3292
|
};
|
|
3293
3293
|
}
|
|
3294
|
-
default: return $
|
|
3294
|
+
default: return $2c6 => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $2ce => $2ce, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_53(), $3), a2: {a1: '.', a2: {h: 0}}}}), $2a1, $2c6);
|
|
3295
3295
|
}
|
|
3296
3296
|
};
|
|
3297
3297
|
}
|
|
3298
3298
|
case 'graph': {
|
|
3299
|
-
const $
|
|
3300
|
-
switch($
|
|
3301
|
-
case 1: /* Right */ return Commands_graph($0, $2, $
|
|
3302
|
-
case 0: /* Left */ return Main_exitError(csegen_74()(), $
|
|
3299
|
+
const $2dc = Commands_parseGraphArgs($3.a2);
|
|
3300
|
+
switch($2dc.h) {
|
|
3301
|
+
case 1: /* Right */ return Commands_graph($0, $2, $2dc.a1);
|
|
3302
|
+
case 0: /* Left */ return Main_exitError(csegen_74()(), $2dc.a1);
|
|
3303
3303
|
}
|
|
3304
3304
|
}
|
|
3305
3305
|
case 'rq': {
|
|
@@ -3325,18 +3325,18 @@ function Main_handleAuthenticatedArgs($0, $1, $2, $3) {
|
|
|
3325
3325
|
}
|
|
3326
3326
|
}
|
|
3327
3327
|
case 'label': {
|
|
3328
|
-
return $
|
|
3328
|
+
return $310 => $311 => {
|
|
3329
3329
|
switch($3.a2.h) {
|
|
3330
|
-
case 0: /* nil */ return Data_Promise_reject('The label command expects one or more labels as arguments.', $
|
|
3331
|
-
case undefined: /* cons */ return Commands_label($0, $1, $2, {a1: $3.a2.a1, a2: $3.a2.a2}, $
|
|
3332
|
-
default: return Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $
|
|
3330
|
+
case 0: /* nil */ return Data_Promise_reject('The label command expects one or more labels as arguments.', $310, $311);
|
|
3331
|
+
case undefined: /* cons */ return Commands_label($0, $1, $2, {a1: $3.a2.a1, a2: $3.a2.a2}, $310, $311);
|
|
3332
|
+
default: return Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $327 => $327, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_53(), $3), a2: {a1: '.', a2: {h: 0}}}}), $310, $311);
|
|
3333
3333
|
}
|
|
3334
3334
|
};
|
|
3335
3335
|
}
|
|
3336
|
-
default: return $
|
|
3336
|
+
default: return $335 => $336 => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $33e => $33e, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_53(), $3), a2: {a1: '.', a2: {h: 0}}}}), $335, $336);
|
|
3337
3337
|
}
|
|
3338
3338
|
}
|
|
3339
|
-
default: return $
|
|
3339
|
+
default: return $34c => $34d => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $355 => $355, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_53(), $3), a2: {a1: '.', a2: {h: 0}}}}), $34c, $34d);
|
|
3340
3340
|
}
|
|
3341
3341
|
}
|
|
3342
3342
|
|
|
@@ -3408,10 +3408,10 @@ function Main_exitError($0, $1) {
|
|
|
3408
3408
|
/* Main.bashCompletion : HasIO io => String -> String -> String -> io () */
|
|
3409
3409
|
function Main_bashCompletion($0, $1, $2, $3) {
|
|
3410
3410
|
const $4 = BashCompletion_cmdOpts($1, $2, $3);
|
|
3411
|
-
const $9 = Prelude_Types_maybe(() =>
|
|
3411
|
+
const $9 = Prelude_Types_maybe(() => Main_n__8619_1303_ffiOpts($0, $3, $2, $1), () => $12 => $0.a1.a1.a2(undefined)({a1: $12}), $4);
|
|
3412
3412
|
const $26 = $27 => {
|
|
3413
3413
|
switch($27.h) {
|
|
3414
|
-
case 0: /* nothing */ return
|
|
3414
|
+
case 0: /* nothing */ return Main_n__8619_1302_configuredOpts($0, $3, $2, $1);
|
|
3415
3415
|
case undefined: /* just */ return $0.a1.a1.a2(undefined)($27.a1);
|
|
3416
3416
|
}
|
|
3417
3417
|
};
|
|
@@ -5100,14 +5100,6 @@ function Prelude_Interfaces_Bool_Semigroup_x3cx2bx3e_Semigroup_AnyBool($0, $1) {
|
|
|
5100
5100
|
}
|
|
5101
5101
|
}
|
|
5102
5102
|
|
|
5103
|
-
/* Prelude.Interfaces.Bool.Semigroup.<+> */
|
|
5104
|
-
function Prelude_Interfaces_Bool_Semigroup_x3cx2bx3e_Semigroup_AllBool($0, $1) {
|
|
5105
|
-
switch($0) {
|
|
5106
|
-
case 1: return $1;
|
|
5107
|
-
case 0: return 0;
|
|
5108
|
-
}
|
|
5109
|
-
}
|
|
5110
|
-
|
|
5111
5103
|
/* Prelude.Interfaces.Applicative.<*> */
|
|
5112
5104
|
function Prelude_Interfaces_Applicative_x3cx2ax3e_Applicative_Composex28x28x2ex20x24fx29x20x24gx29($0, $1, $2, $3) {
|
|
5113
5105
|
return $0.a3(undefined)(undefined)($0.a3(undefined)(undefined)($0.a2(undefined)($19 => $1a => $1.a3(undefined)(undefined)($19)($1a)))($2))($3);
|
|
@@ -5361,14 +5353,6 @@ function PrimIO_unsafeCreateWorld($0) {
|
|
|
5361
5353
|
return $0(_idrisworld);
|
|
5362
5354
|
}
|
|
5363
5355
|
|
|
5364
|
-
/* Data.So.choose : (b : Bool) -> Either (So b) (So (not b)) */
|
|
5365
|
-
function Data_So_choose($0) {
|
|
5366
|
-
switch($0) {
|
|
5367
|
-
case 1: return {h: 0 /* Left */, a1: undefined};
|
|
5368
|
-
case 0: return {h: 1 /* Right */, a1: undefined};
|
|
5369
|
-
}
|
|
5370
|
-
}
|
|
5371
|
-
|
|
5372
5356
|
/* Data.Nat.uninhabited */
|
|
5373
5357
|
function Data_Nat_uninhabited_Uninhabited_x28x28LTEx20x28Sx20x24nx29x29x20Zx29($0) {
|
|
5374
5358
|
_crashExp('No clauses');
|
|
@@ -7944,7 +7928,7 @@ function Data_Theme_parseString($0) {
|
|
|
7944
7928
|
}
|
|
7945
7929
|
|
|
7946
7930
|
/* Util.Prompting.with block in yesNoPrompt,yesUnlessNo */
|
|
7947
|
-
function
|
|
7931
|
+
function Util_Prompting_with__yesNoPromptx2cyesUnlessNo_1359($0, $1, $2, $3, $4, $5) {
|
|
7948
7932
|
switch($5) {
|
|
7949
7933
|
case 'n': return 0;
|
|
7950
7934
|
case 'no': return 0;
|
|
@@ -7954,26 +7938,18 @@ function Util_Prompting_with__yesNoPromptx2cyesUnlessNo_1380($0, $1, $2, $3, $4,
|
|
|
7954
7938
|
}
|
|
7955
7939
|
}
|
|
7956
7940
|
|
|
7957
|
-
/* Util.
|
|
7958
|
-
function
|
|
7959
|
-
|
|
7960
|
-
case 0: /* Left */ return {a1: {a1: $0, a2: $1.a1}};
|
|
7961
|
-
case 1: /* Right */ return {h: 0};
|
|
7962
|
-
}
|
|
7941
|
+
/* Util.Prompting.5313:1351:yesUnlessNo */
|
|
7942
|
+
function Util_Prompting_n__5313_1351_yesUnlessNo($0, $1, $2, $3) {
|
|
7943
|
+
return Util_Prompting_with__yesNoPromptx2cyesUnlessNo_1359(undefined, $0, $1, $2, $3, Data_String_toLower($3));
|
|
7963
7944
|
}
|
|
7964
7945
|
|
|
7965
|
-
/* Util.
|
|
7966
|
-
|
|
7967
|
-
return Util_Prompting_with__yesNoPromptx2cyesUnlessNo_1380(undefined, $0, $1, $2, $3, Data_String_toLower($3));
|
|
7968
|
-
}
|
|
7969
|
-
|
|
7970
|
-
/* Util.5512:1542:startOver */
|
|
7971
|
-
const Util_n__5512_1542_startOver = __lazy(function () {
|
|
7946
|
+
/* Util.5490:1521:startOver */
|
|
7947
|
+
const Util_n__5490_1521_startOver = __lazy(function () {
|
|
7972
7948
|
return {a1: 0, a2: {h: 0}};
|
|
7973
7949
|
});
|
|
7974
7950
|
|
|
7975
|
-
/* Util.
|
|
7976
|
-
function
|
|
7951
|
+
/* Util.5490:1520:guardSuccess */
|
|
7952
|
+
function Util_n__5490_1520_guardSuccess($0) {
|
|
7977
7953
|
switch($0.h) {
|
|
7978
7954
|
case undefined: /* cons */ {
|
|
7979
7955
|
switch($0.a1) {
|
|
@@ -7986,13 +7962,13 @@ function Util_n__5512_1541_guardSuccess($0) {
|
|
|
7986
7962
|
}
|
|
7987
7963
|
}
|
|
7988
7964
|
|
|
7989
|
-
/* Util.
|
|
7990
|
-
function
|
|
7965
|
+
/* Util.5490:1519:go */
|
|
7966
|
+
function Util_n__5490_1519_go($0, $1) {
|
|
7991
7967
|
switch($0.a1) {
|
|
7992
7968
|
case 0: {
|
|
7993
7969
|
switch(Prelude_Types_isAlpha($1)) {
|
|
7994
7970
|
case 1: return {a1: 1, a2: {a1: $1, a2: $0.a2}};
|
|
7995
|
-
case 0: return
|
|
7971
|
+
case 0: return Util_n__5490_1521_startOver();
|
|
7996
7972
|
}
|
|
7997
7973
|
}
|
|
7998
7974
|
case 1: {
|
|
@@ -8001,7 +7977,7 @@ function Util_n__5512_1540_go($0, $1) {
|
|
|
8001
7977
|
default: {
|
|
8002
7978
|
switch(Prelude_Types_isAlpha($1)) {
|
|
8003
7979
|
case 1: return {a1: 1, a2: {a1: $1, a2: $0.a2}};
|
|
8004
|
-
case 0: return
|
|
7980
|
+
case 0: return Util_n__5490_1521_startOver();
|
|
8005
7981
|
}
|
|
8006
7982
|
}
|
|
8007
7983
|
}
|
|
@@ -8009,7 +7985,7 @@ function Util_n__5512_1540_go($0, $1) {
|
|
|
8009
7985
|
case 2: {
|
|
8010
7986
|
switch(Prelude_Types_isDigit($1)) {
|
|
8011
7987
|
case 1: return {a1: 3, a2: {a1: $1, a2: $0.a2}};
|
|
8012
|
-
case 0: return
|
|
7988
|
+
case 0: return Util_n__5490_1521_startOver();
|
|
8013
7989
|
}
|
|
8014
7990
|
}
|
|
8015
7991
|
case 3: {
|
|
@@ -8022,8 +7998,8 @@ function Util_n__5512_1540_go($0, $1) {
|
|
|
8022
7998
|
}
|
|
8023
7999
|
}
|
|
8024
8000
|
|
|
8025
|
-
/* Util.
|
|
8026
|
-
function
|
|
8001
|
+
/* Util.5200:1233:getMoreLines */
|
|
8002
|
+
function Util_n__5200_1233_getMoreLines($0, $1, $2) {
|
|
8027
8003
|
switch($2.h) {
|
|
8028
8004
|
case 0: /* nothing */ return $0.a1.a1.a2(undefined)(Prelude_Types_List_reverse($1));
|
|
8029
8005
|
case undefined: /* just */ {
|
|
@@ -8034,13 +8010,13 @@ function Util_n__5222_1254_getMoreLines($0, $1, $2) {
|
|
|
8034
8010
|
case '': {
|
|
8035
8011
|
switch(line) {
|
|
8036
8012
|
case '': return $0.a1.a1.a2(undefined)(Prelude_Types_List_reverse($1.a2));
|
|
8037
|
-
default: return
|
|
8013
|
+
default: return Util_n__5200_1233_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
|
|
8038
8014
|
}
|
|
8039
8015
|
}
|
|
8040
|
-
default: return
|
|
8016
|
+
default: return Util_n__5200_1233_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
|
|
8041
8017
|
}
|
|
8042
8018
|
}
|
|
8043
|
-
default: return
|
|
8019
|
+
default: return Util_n__5200_1233_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
|
|
8044
8020
|
}
|
|
8045
8021
|
};
|
|
8046
8022
|
return $0.a1.a2(undefined)(undefined)($0.a1.a1.a1(undefined)(undefined)($20 => Data_String_trim($20))($0.a2(undefined)($29 => Prelude_IO_prim__getStr($29))))($2c);
|
|
@@ -8048,8 +8024,8 @@ function Util_n__5222_1254_getMoreLines($0, $1, $2) {
|
|
|
8048
8024
|
}
|
|
8049
8025
|
}
|
|
8050
8026
|
|
|
8051
|
-
/* Util.Prompting.
|
|
8052
|
-
function
|
|
8027
|
+
/* Util.Prompting.5313:1350:defaultAnswerStr */
|
|
8028
|
+
function Util_Prompting_n__5313_1350_defaultAnswerStr($0, $1, $2) {
|
|
8053
8029
|
switch($1) {
|
|
8054
8030
|
case 0: return 'y/N';
|
|
8055
8031
|
case 1: return 'Y/n';
|
|
@@ -8058,7 +8034,7 @@ function Util_Prompting_n__5335_1371_defaultAnswerStr($0, $1, $2) {
|
|
|
8058
8034
|
|
|
8059
8035
|
/* Util.Prompting.yesNoPrompt : HasIO io => {default True _ : Bool} -> String -> io Bool */
|
|
8060
8036
|
function Util_Prompting_yesNoPrompt($0, $1, $2) {
|
|
8061
|
-
return $0.a1.a2(undefined)(undefined)($0.a2(undefined)($11 => Prelude_IO_prim__putStr(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $19 => $19, {a1: $2, a2: {a1: ' [', a2: {a1:
|
|
8037
|
+
return $0.a1.a2(undefined)(undefined)($0.a2(undefined)($11 => Prelude_IO_prim__putStr(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $19 => $19, {a1: $2, a2: {a1: ' [', a2: {a1: Util_Prompting_n__5313_1350_defaultAnswerStr($0, $1, $2), a2: {a1: '] ', a2: {h: 0}}}}}), $11)))($29 => $0.a1.a1.a1(undefined)(undefined)($34 => Util_Prompting_n__5313_1351_yesUnlessNo($0, $1, $2, Data_String_trim($34)))($0.a2(undefined)($42 => Prelude_IO_prim__getStr($42))));
|
|
8062
8038
|
}
|
|
8063
8039
|
|
|
8064
8040
|
/* Util.whenNothing : Applicative f => Maybe a -> f () -> f () */
|
|
@@ -8091,7 +8067,7 @@ function Util_relativeToRoot($0, $1, $2, $3) {
|
|
|
8091
8067
|
|
|
8092
8068
|
/* Util.parseJiraPrefix : String -> Maybe String */
|
|
8093
8069
|
function Util_parseJiraPrefix($0) {
|
|
8094
|
-
return Prelude_Types_map_Functor_Maybe($3 => Prelude_Types_fastPack(Prelude_Types_List_reverse($3)),
|
|
8070
|
+
return Prelude_Types_map_Functor_Maybe($3 => Prelude_Types_fastPack(Prelude_Types_List_reverse($3)), Util_n__5490_1520_guardSuccess(Prelude_Types_foldl_Foldable_List($d => $e => Util_n__5490_1519_go($d, $e), Util_n__5490_1521_startOver(), Prelude_Types_fastUnpack($0))));
|
|
8095
8071
|
}
|
|
8096
8072
|
|
|
8097
8073
|
/* Util.Prompting.orIfEmpty : Maybe String -> String -> String */
|
|
@@ -8116,7 +8092,10 @@ function Util_optionsWithBestWidth($0) {
|
|
|
8116
8092
|
|
|
8117
8093
|
/* Util.String.nonEmpty : (cs : String) -> Maybe (NonEmpty cs) */
|
|
8118
8094
|
function Util_String_nonEmpty($0) {
|
|
8119
|
-
|
|
8095
|
+
switch($0) {
|
|
8096
|
+
case '': return {h: 0};
|
|
8097
|
+
default: return {a1: {a1: $0, a2: undefined}};
|
|
8098
|
+
}
|
|
8120
8099
|
}
|
|
8121
8100
|
|
|
8122
8101
|
/* Util.minimumLayoutWidth : Nat */
|
|
@@ -8136,7 +8115,7 @@ function Util_layoutOptions($0) {
|
|
|
8136
8115
|
|
|
8137
8116
|
/* Util.getManyLines : HasIO io => Fuel -> io (List String) */
|
|
8138
8117
|
function Util_getManyLines($0, $1) {
|
|
8139
|
-
return
|
|
8118
|
+
return Util_n__5200_1233_getMoreLines($0, {h: 0}, $1);
|
|
8140
8119
|
}
|
|
8141
8120
|
|
|
8142
8121
|
/* Util.colorize : Config => Doc AnsiStyle -> Doc AnsiStyle */
|
|
@@ -9910,7 +9889,7 @@ function AppVersion_printVersion($0) {
|
|
|
9910
9889
|
|
|
9911
9890
|
/* AppVersion.appVersion : String */
|
|
9912
9891
|
const AppVersion_appVersion = __lazy(function () {
|
|
9913
|
-
return '5.3.
|
|
9892
|
+
return '5.3.1';
|
|
9914
9893
|
});
|
|
9915
9894
|
|
|
9916
9895
|
/* Commands.Help.subcommandHelp' : String -> Doc AnsiStyle */
|
|
@@ -10036,8 +10015,21 @@ function Text_PrettyPrint_Prettyprinter_Util_reflow($0) {
|
|
|
10036
10015
|
return Text_PrettyPrint_Prettyprinter_Doc_fillSep(Text_PrettyPrint_Prettyprinter_Util_words($0));
|
|
10037
10016
|
}
|
|
10038
10017
|
|
|
10018
|
+
/* Commands.case block in parseContributeArgs,parseSkipArg */
|
|
10019
|
+
function Commands_case__parseContributeArgsx2cparseSkipArg_3342($0, $1, $2) {
|
|
10020
|
+
switch($2.h) {
|
|
10021
|
+
case undefined: /* cons */ {
|
|
10022
|
+
switch($2.a1) {
|
|
10023
|
+
case '-': return Prelude_Types_map_Functor_Maybe($7 => ({h: 3 /* Skip */, a1: Prelude_Types_prim__integerToNat($7)}), Data_String_parsePositive(csegen_48(), $2.a2));
|
|
10024
|
+
default: return {h: 0};
|
|
10025
|
+
}
|
|
10026
|
+
}
|
|
10027
|
+
default: return {h: 0};
|
|
10028
|
+
}
|
|
10029
|
+
}
|
|
10030
|
+
|
|
10039
10031
|
/* Commands.case block in case block in graph */
|
|
10040
|
-
function
|
|
10032
|
+
function Commands_case__casex20blockx20inx20graph_3077($0, $1, $2, $3, $4, $5, $6, $7, $8) {
|
|
10041
10033
|
return $9 => {
|
|
10042
10034
|
const $c = $d => $e => {
|
|
10043
10035
|
switch(Data_Maybe_isJust($3)) {
|
|
@@ -10050,17 +10042,17 @@ function Commands_case__casex20blockx20inx20graph_2741($0, $1, $2, $3, $4, $5, $
|
|
|
10050
10042
|
}
|
|
10051
10043
|
|
|
10052
10044
|
/* Commands.case block in graph */
|
|
10053
|
-
function
|
|
10045
|
+
function Commands_case__graph_3033($0, $1, $2, $3, $4, $5) {
|
|
10054
10046
|
return $6 => {
|
|
10055
10047
|
switch($4.h) {
|
|
10056
|
-
case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($a => $b => FFI_GitHub_forceListTeamMembers($0, $2.a2, $4.a1, $a, $b), teamMemberLogins => $14 => $15 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Commands_PullRequest_listPartitionedPRs($2, $0, 4n, 100n), prs => $1e =>
|
|
10048
|
+
case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($a => $b => FFI_GitHub_forceListTeamMembers($0, $2.a2, $4.a1, $a, $b), teamMemberLogins => $14 => $15 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Commands_PullRequest_listPartitionedPRs($2, $0, 4n, 100n), prs => $1e => Commands_case__casex20blockx20inx20graph_3077($0, $1, $2, $3, $4.a1, teamMemberLogins, prs, Commands_PullRequest_rf__allReviewers(prs), $1e), $14, $15), $5, $6);
|
|
10057
10049
|
case 0: /* nothing */ return Data_Promise_reject('The graph command expects the name of a GitHub Team as an argument.', $5, $6);
|
|
10058
10050
|
}
|
|
10059
10051
|
};
|
|
10060
10052
|
}
|
|
10061
10053
|
|
|
10062
10054
|
/* Commands.case block in request */
|
|
10063
|
-
function
|
|
10055
|
+
function Commands_case__request_2303($0, $1, $2, $3, $4, $5) {
|
|
10064
10056
|
return $7 => $9 => {
|
|
10065
10057
|
let $a;
|
|
10066
10058
|
switch(Prelude_Types_null_Foldable_List($5.a1)) {
|
|
@@ -10116,14 +10108,14 @@ function Commands_case__request_2247($0, $1, $2, $3, $4, $5) {
|
|
|
10116
10108
|
}
|
|
10117
10109
|
|
|
10118
10110
|
/* Commands.case block in case block in request,partitionedArgs */
|
|
10119
|
-
function
|
|
10111
|
+
function Commands_case__casex20blockx20inx20requestx2cpartitionedArgs_2223($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
10120
10112
|
const $9 = Prelude_Interfaces_mapHom({a1: d => b => c => a => $d => $e => $f => ({a1: $d($f.a1), a2: $e($f.a2)}), a2: b => c => a => $18 => $19 => ({a1: $18($19.a1), a2: $19.a2}), a3: a => d => b => $20 => $21 => ({a1: $21.a1, a2: $20($21.a2)})}, $28 => Prelude_Types_List_mapAppend({h: 0}, $2c => Data_String_Extra_drop(1n, $2c), $28), {a1: $5, a2: $7.a1});
|
|
10121
10113
|
return {a1: $9.a1, a2: {a1: $7.a2, a2: $9.a2}};
|
|
10122
10114
|
}
|
|
10123
10115
|
|
|
10124
10116
|
/* Commands.case block in request,partitionedArgs */
|
|
10125
|
-
function
|
|
10126
|
-
return
|
|
10117
|
+
function Commands_case__requestx2cpartitionedArgs_2200($0, $1, $2, $3, $4, $5) {
|
|
10118
|
+
return Commands_case__casex20blockx20inx20requestx2cpartitionedArgs_2223($0, $1, $2, $3, $4, $5.a1, $5.a2, Data_List_partition($12 => BashCompletion_isHashPrefix($12), $5.a2));
|
|
10127
10119
|
}
|
|
10128
10120
|
|
|
10129
10121
|
/* Commands.8814:1357:recombineIntoArgs */
|
|
@@ -10134,7 +10126,7 @@ function Commands_n__8814_1357_recombineIntoArgs($0, $1) {
|
|
|
10134
10126
|
switch($1.a1) {
|
|
10135
10127
|
case '-i': {
|
|
10136
10128
|
switch($1.a2.h) {
|
|
10137
|
-
case 0: /* nil */ return
|
|
10129
|
+
case 0: /* nil */ return csegen_560();
|
|
10138
10130
|
case undefined: /* cons */ {
|
|
10139
10131
|
const $8 = Commands_n__8814_1355_parseIntoOpt($0, $1.a2.a1);
|
|
10140
10132
|
switch($8.h) {
|
|
@@ -10185,30 +10177,30 @@ function Commands_n__8814_1357_recombineIntoArgs($0, $1) {
|
|
|
10185
10177
|
}
|
|
10186
10178
|
}
|
|
10187
10179
|
|
|
10188
|
-
/* Commands.
|
|
10189
|
-
function
|
|
10180
|
+
/* Commands.10865:3296:recombineIgnoreArgs */
|
|
10181
|
+
function Commands_n__10865_3296_recombineIgnoreArgs($0, $1) {
|
|
10190
10182
|
switch($1.h) {
|
|
10191
10183
|
case 0: /* nil */ return {a1: {h: 0}, a2: {h: 0}};
|
|
10192
10184
|
case undefined: /* cons */ {
|
|
10193
10185
|
switch($1.a1) {
|
|
10194
10186
|
case '-i': {
|
|
10195
10187
|
switch($1.a2.h) {
|
|
10196
|
-
case 0: /* nil */ return
|
|
10188
|
+
case 0: /* nil */ return csegen_560();
|
|
10197
10189
|
case undefined: /* cons */ {
|
|
10198
|
-
const $8 =
|
|
10190
|
+
const $8 = Commands_n__10865_3293_parseIgnoreOpt($0, $1.a2.a1);
|
|
10199
10191
|
switch($8.h) {
|
|
10200
10192
|
case undefined: /* just */ {
|
|
10201
|
-
const $c =
|
|
10193
|
+
const $c = Commands_n__10865_3296_recombineIgnoreArgs($0, $1.a2.a2);
|
|
10202
10194
|
return {a1: {a1: $8.a1, a2: $c.a1}, a2: $c.a2};
|
|
10203
10195
|
}
|
|
10204
10196
|
case 0: /* nothing */ {
|
|
10205
|
-
const $14 =
|
|
10197
|
+
const $14 = Commands_n__10865_3296_recombineIgnoreArgs($0, $1.a2.a2);
|
|
10206
10198
|
return {a1: $14.a1, a2: {a1: '-i', a2: {a1: $1.a2.a1, a2: $14.a2}}};
|
|
10207
10199
|
}
|
|
10208
10200
|
}
|
|
10209
10201
|
}
|
|
10210
10202
|
default: {
|
|
10211
|
-
const $1e =
|
|
10203
|
+
const $1e = Commands_n__10865_3296_recombineIgnoreArgs($0, $1.a2);
|
|
10212
10204
|
return {a1: $1e.a1, a2: {a1: $1.a1, a2: $1e.a2}};
|
|
10213
10205
|
}
|
|
10214
10206
|
}
|
|
@@ -10217,26 +10209,26 @@ function Commands_n__10682_3118_recombineIgnoreArgs($0, $1) {
|
|
|
10217
10209
|
switch($1.a2.h) {
|
|
10218
10210
|
case 0: /* nil */ return {a1: {h: 0}, a2: {a1: '--ignore', a2: {h: 0}}};
|
|
10219
10211
|
case undefined: /* cons */ {
|
|
10220
|
-
const $2b =
|
|
10212
|
+
const $2b = Commands_n__10865_3293_parseIgnoreOpt($0, $1.a2.a1);
|
|
10221
10213
|
switch($2b.h) {
|
|
10222
10214
|
case undefined: /* just */ {
|
|
10223
|
-
const $2f =
|
|
10215
|
+
const $2f = Commands_n__10865_3296_recombineIgnoreArgs($0, $1.a2.a2);
|
|
10224
10216
|
return {a1: {a1: $2b.a1, a2: $2f.a1}, a2: $2f.a2};
|
|
10225
10217
|
}
|
|
10226
10218
|
case 0: /* nothing */ {
|
|
10227
|
-
const $37 =
|
|
10219
|
+
const $37 = Commands_n__10865_3296_recombineIgnoreArgs($0, $1.a2.a2);
|
|
10228
10220
|
return {a1: $37.a1, a2: {a1: '--ignore', a2: {a1: $1.a2.a1, a2: $37.a2}}};
|
|
10229
10221
|
}
|
|
10230
10222
|
}
|
|
10231
10223
|
}
|
|
10232
10224
|
default: {
|
|
10233
|
-
const $41 =
|
|
10225
|
+
const $41 = Commands_n__10865_3296_recombineIgnoreArgs($0, $1.a2);
|
|
10234
10226
|
return {a1: $41.a1, a2: {a1: $1.a1, a2: $41.a2}};
|
|
10235
10227
|
}
|
|
10236
10228
|
}
|
|
10237
10229
|
}
|
|
10238
10230
|
default: {
|
|
10239
|
-
const $49 =
|
|
10231
|
+
const $49 = Commands_n__10865_3296_recombineIgnoreArgs($0, $1.a2);
|
|
10240
10232
|
return {a1: $49.a1, a2: {a1: $1.a1, a2: $49.a2}};
|
|
10241
10233
|
}
|
|
10242
10234
|
}
|
|
@@ -10244,8 +10236,8 @@ function Commands_n__10682_3118_recombineIgnoreArgs($0, $1) {
|
|
|
10244
10236
|
}
|
|
10245
10237
|
}
|
|
10246
10238
|
|
|
10247
|
-
/* Commands.
|
|
10248
|
-
function
|
|
10239
|
+
/* Commands.10080:2541:putNameLn */
|
|
10240
|
+
function Commands_n__10080_2541_putNameLn($0, $1, $2, $3) {
|
|
10249
10241
|
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}}}});
|
|
10250
10242
|
}
|
|
10251
10243
|
|
|
@@ -10259,8 +10251,8 @@ function Commands_n__8552_1092_putLabel($0, $1, $2, $3, $4) {
|
|
|
10259
10251
|
return Text_PrettyPrint_Prettyprinter_Doc_enclose(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\"'), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\"'), Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($4)));
|
|
10260
10252
|
}
|
|
10261
10253
|
|
|
10262
|
-
/* Commands.
|
|
10263
|
-
function
|
|
10254
|
+
/* Commands.11217:3657:printDetails */
|
|
10255
|
+
function Commands_n__11217_3657_printDetails($0, $1, $2, $3, $4) {
|
|
10264
10256
|
const $5 = Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($4.a8));
|
|
10265
10257
|
const $d = Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(' \u{251c} title: '), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($4.a2));
|
|
10266
10258
|
const $16 = Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(' \u{251c} created:'), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_Date_show_Show_Date($4.a3)));
|
|
@@ -10269,8 +10261,8 @@ function Commands_n__11039_3486_printDetails($0, $1, $2, $3, $4) {
|
|
|
10269
10261
|
return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: $5, a2: {a1: $d, a2: {a1: $16, a2: {a1: $21, a2: {a1: $2f, a2: {h: 0}}}}}});
|
|
10270
10262
|
}
|
|
10271
10263
|
|
|
10272
|
-
/* Commands.
|
|
10273
|
-
function
|
|
10264
|
+
/* Commands.11217:3656:pickOne */
|
|
10265
|
+
function Commands_n__11217_3656_pickOne($0, $1, $2, $3, $4, $5, $6, $7, $8) {
|
|
10274
10266
|
const $9 = Data_List_headx27(Data_List_drop($5, Prelude_Types_List_tailRecAppend($7, $8)));
|
|
10275
10267
|
return $12 => $13 => {
|
|
10276
10268
|
switch($9.h) {
|
|
@@ -10289,32 +10281,23 @@ function Commands_n__11039_3485_pickOne($0, $1, $2, $3, $4, $5, $6, $7, $8) {
|
|
|
10289
10281
|
};
|
|
10290
10282
|
}
|
|
10291
10283
|
|
|
10292
|
-
/* Commands.
|
|
10293
|
-
function
|
|
10294
|
-
return
|
|
10284
|
+
/* Commands.9680:2188:partitionedArgs */
|
|
10285
|
+
function Commands_n__9680_2188_partitionedArgs($0, $1, $2, $3, $4) {
|
|
10286
|
+
return Commands_case__requestx2cpartitionedArgs_2200($0, $1, $2, $3, $4, Data_List_partition($e => Data_String_isPrefixOf('+', $e), $4));
|
|
10295
10287
|
}
|
|
10296
10288
|
|
|
10297
|
-
/* Commands.
|
|
10298
|
-
function
|
|
10289
|
+
/* Commands.10248:2729:parseTeamArg */
|
|
10290
|
+
function Commands_n__10248_2729_parseTeamArg($0, $1) {
|
|
10299
10291
|
return {a1: {a1: $1}};
|
|
10300
10292
|
}
|
|
10301
10293
|
|
|
10302
|
-
/* Commands.
|
|
10303
|
-
function
|
|
10304
|
-
|
|
10305
|
-
switch($2.h) {
|
|
10306
|
-
case undefined: /* cons */ {
|
|
10307
|
-
switch($2.a1) {
|
|
10308
|
-
case '-': return Prelude_Types_map_Functor_Maybe($8 => ({h: 3 /* Skip */, a1: Prelude_Types_prim__integerToNat($8)}), Data_String_parsePositive(csegen_48(), Prelude_Types_fastPack($2.a2)));
|
|
10309
|
-
default: return {h: 0};
|
|
10310
|
-
}
|
|
10311
|
-
}
|
|
10312
|
-
default: return {h: 0};
|
|
10313
|
-
}
|
|
10294
|
+
/* Commands.10865:3295:parseSkipArg */
|
|
10295
|
+
function Commands_n__10865_3295_parseSkipArg($0, $1) {
|
|
10296
|
+
return Commands_case__parseContributeArgsx2cparseSkipArg_3342($0, $1, Data_String_strM($1));
|
|
10314
10297
|
}
|
|
10315
10298
|
|
|
10316
|
-
/* Commands.
|
|
10317
|
-
function
|
|
10299
|
+
/* Commands.10865:3294:parseListFlag */
|
|
10300
|
+
function Commands_n__10865_3294_parseListFlag($0, $1) {
|
|
10318
10301
|
switch($1) {
|
|
10319
10302
|
case '-l': return {a1: {h: 0 /* List */}};
|
|
10320
10303
|
case '--list': return {a1: {h: 0 /* List */}};
|
|
@@ -10324,11 +10307,11 @@ function Commands_n__10682_3116_parseListFlag($0, $1) {
|
|
|
10324
10307
|
|
|
10325
10308
|
/* Commands.8814:1356:parseLabelArg */
|
|
10326
10309
|
function Commands_n__8814_1356_parseLabelArg($0, $1) {
|
|
10327
|
-
const $2 =
|
|
10310
|
+
const $2 = Data_String_strM($1);
|
|
10328
10311
|
switch($2.h) {
|
|
10329
10312
|
case undefined: /* cons */ {
|
|
10330
10313
|
switch($2.a1) {
|
|
10331
|
-
case '#': return {a1: {h: 2 /* Label */, a1:
|
|
10314
|
+
case '#': return {a1: {h: 2 /* Label */, a1: $2.a2}};
|
|
10332
10315
|
default: return {h: 0};
|
|
10333
10316
|
}
|
|
10334
10317
|
}
|
|
@@ -10342,8 +10325,8 @@ function Commands_n__8814_1355_parseIntoOpt($0, $1) {
|
|
|
10342
10325
|
return Prelude_Types_map_Functor_Maybe($7 => $7, $2);
|
|
10343
10326
|
}
|
|
10344
10327
|
|
|
10345
|
-
/* Commands.
|
|
10346
|
-
function
|
|
10328
|
+
/* Commands.10865:3293:parseIgnoreOpt */
|
|
10329
|
+
function Commands_n__10865_3293_parseIgnoreOpt($0, $1) {
|
|
10347
10330
|
const $2 = Data_String_split(csegen_347(), $1);
|
|
10348
10331
|
const $7 = Data_List1_last($2);
|
|
10349
10332
|
return Prelude_Types_map_Functor_Maybe($c => $c, Data_String_parsePositive(csegen_2(), $7));
|
|
@@ -10357,8 +10340,8 @@ function Commands_n__8814_1354_parseDraftFlag($0, $1) {
|
|
|
10357
10340
|
}
|
|
10358
10341
|
}
|
|
10359
10342
|
|
|
10360
|
-
/* Commands.
|
|
10361
|
-
function
|
|
10343
|
+
/* Commands.10248:2728:parseCompletedFlag */
|
|
10344
|
+
function Commands_n__10248_2728_parseCompletedFlag($0, $1) {
|
|
10362
10345
|
switch($1) {
|
|
10363
10346
|
case '-c': return {a1: {h: 0}};
|
|
10364
10347
|
case '--completed': return {a1: {h: 0}};
|
|
@@ -10366,8 +10349,8 @@ function Commands_n__10454_2913_parseCompletedFlag($0, $1) {
|
|
|
10366
10349
|
}
|
|
10367
10350
|
}
|
|
10368
10351
|
|
|
10369
|
-
/* Commands.
|
|
10370
|
-
function
|
|
10352
|
+
/* Commands.10865:3292:parseCheckoutFlag */
|
|
10353
|
+
function Commands_n__10865_3292_parseCheckoutFlag($0, $1) {
|
|
10371
10354
|
switch($1) {
|
|
10372
10355
|
case '-c': return {a1: {h: 1 /* Checkout */}};
|
|
10373
10356
|
case '--checkout': return {a1: {h: 1 /* Checkout */}};
|
|
@@ -10375,8 +10358,8 @@ function Commands_n__10682_3114_parseCheckoutFlag($0, $1) {
|
|
|
10375
10358
|
}
|
|
10376
10359
|
}
|
|
10377
10360
|
|
|
10378
|
-
/* Commands.
|
|
10379
|
-
function
|
|
10361
|
+
/* Commands.11217:3655:listSome */
|
|
10362
|
+
function Commands_n__11217_3655_listSome($0, $1, $2, $3, $4, $5, $6, $7, $8) {
|
|
10380
10363
|
const $15 = $16 => {
|
|
10381
10364
|
let $1b;
|
|
10382
10365
|
switch(Prelude_Types_null_Foldable_List($6)) {
|
|
@@ -10389,13 +10372,13 @@ function Commands_n__11039_3484_listSome($0, $1, $2, $3, $4, $5, $6, $7, $8) {
|
|
|
10389
10372
|
break;
|
|
10390
10373
|
}
|
|
10391
10374
|
}
|
|
10392
|
-
return Prelude_Interfaces_when(csegen_66()(), $1b, () => $20 => $21 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_381()(), $27 => $28 => $29 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Util_renderIO($3, csegen_74()(), Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_bold(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Your review not requested:'))), $39 =>
|
|
10375
|
+
return Prelude_Interfaces_when(csegen_66()(), $1b, () => $20 => $21 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_381()(), $27 => $28 => $29 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Util_renderIO($3, csegen_74()(), Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_bold(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Your review not requested:'))), $39 => Commands_n__11217_3653_goListSome($0, $1, $2, $3, 0, Data_List_take(5n, $6)), $28, $29), $20, $21));
|
|
10393
10376
|
};
|
|
10394
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(
|
|
10377
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Commands_n__11217_3653_goListSome($0, $1, $2, $3, 1, Data_List_drop($4, $5)), $15, $7, $8);
|
|
10395
10378
|
}
|
|
10396
10379
|
|
|
10397
|
-
/* Commands.
|
|
10398
|
-
function
|
|
10380
|
+
/* Commands.9240:1785:labelSlugs */
|
|
10381
|
+
function Commands_n__9240_1785_labelSlugs($0, $1, $2, $3) {
|
|
10399
10382
|
const $5 = $6 => $7 => {
|
|
10400
10383
|
switch($6.h) {
|
|
10401
10384
|
case 2: /* Label */ return {a1: $6.a1, a2: $7};
|
|
@@ -10405,13 +10388,13 @@ function Commands_n__9121_1673_labelSlugs($0, $1, $2, $3) {
|
|
|
10405
10388
|
return Prelude_Types_foldr_Foldable_List($5, {h: 0}, $3);
|
|
10406
10389
|
}
|
|
10407
10390
|
|
|
10408
|
-
/* Commands.
|
|
10409
|
-
function
|
|
10391
|
+
/* Commands.11217:3654:isNotIgnored */
|
|
10392
|
+
function Commands_n__11217_3654_isNotIgnored($0, $1, $2, $3, $4, $5) {
|
|
10410
10393
|
return Data_Maybe_isNothing(Data_List_find($a => Prelude_EqOrd_x3dx3d_Eq_Integer($a, $5.a1), $4.a12));
|
|
10411
10394
|
}
|
|
10412
10395
|
|
|
10413
|
-
/* Commands.
|
|
10414
|
-
function
|
|
10396
|
+
/* Commands.9240:1784:isDraft */
|
|
10397
|
+
function Commands_n__9240_1784_isDraft($0, $1, $2, $3) {
|
|
10415
10398
|
const $7 = $8 => {
|
|
10416
10399
|
switch($8.h) {
|
|
10417
10400
|
case 0: /* Draft */ return 1;
|
|
@@ -10422,8 +10405,8 @@ function Commands_n__9121_1672_isDraft($0, $1, $2, $3) {
|
|
|
10422
10405
|
return Data_Maybe_isJust($5);
|
|
10423
10406
|
}
|
|
10424
10407
|
|
|
10425
|
-
/* Commands.
|
|
10426
|
-
function
|
|
10408
|
+
/* Commands.9240:1783:intoBranch */
|
|
10409
|
+
function Commands_n__9240_1783_intoBranch($0, $1, $2, $3) {
|
|
10427
10410
|
const $d = $e => {
|
|
10428
10411
|
switch($e.h) {
|
|
10429
10412
|
case 1: /* Into */ return {a1: Util_String_value($e.a1)};
|
|
@@ -10433,11 +10416,11 @@ function Commands_n__9121_1671_intoArg($0, $1, $2, $3) {
|
|
|
10433
10416
|
return Prelude_Types_foldMap_Foldable_List({a1: $7 => $8 => Prelude_Types_x3cx2bx3e_Semigroup_x28Maybex20x24ax29($7, $8), a2: {h: 0}}, $d, $3);
|
|
10434
10417
|
}
|
|
10435
10418
|
|
|
10436
|
-
/* Commands.
|
|
10437
|
-
function
|
|
10419
|
+
/* Commands.11217:3653:goListSome */
|
|
10420
|
+
function Commands_n__11217_3653_goListSome($0, $1, $2, $3, $4, $5) {
|
|
10438
10421
|
switch($5.h) {
|
|
10439
10422
|
case undefined: /* cons */ {
|
|
10440
|
-
const $7 =
|
|
10423
|
+
const $7 = Commands_n__11217_3657_printDetails($0, $1, $2, $3, $5.a1);
|
|
10441
10424
|
let $15;
|
|
10442
10425
|
switch($4) {
|
|
10443
10426
|
case 1: {
|
|
@@ -10449,15 +10432,15 @@ function Commands_n__11039_3482_goListSome($0, $1, $2, $3, $4, $5) {
|
|
|
10449
10432
|
break;
|
|
10450
10433
|
}
|
|
10451
10434
|
}
|
|
10452
|
-
const $13 = Text_PrettyPrint_Prettyprinter_Doc_indent($15, Prelude_Types_foldl_Foldable_List(acc => next => Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: acc, a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1:
|
|
10435
|
+
const $13 = Text_PrettyPrint_Prettyprinter_Doc_indent($15, Prelude_Types_foldl_Foldable_List(acc => next => Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: acc, a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Commands_n__11217_3657_printDetails($0, $1, $2, $3, next), a2: {h: 0}}}}), $7, $5.a2));
|
|
10453
10436
|
return Util_renderIO($3, csegen_74()(), $13);
|
|
10454
10437
|
}
|
|
10455
10438
|
case 0: /* nil */ return $2b => $2c => Data_Promise_pure_Applicative_x28Promisex20x24ex29(undefined, $2b, $2c);
|
|
10456
10439
|
}
|
|
10457
10440
|
}
|
|
10458
10441
|
|
|
10459
|
-
/* Commands.
|
|
10460
|
-
function
|
|
10442
|
+
/* Commands.10080:2540:forkedUser */
|
|
10443
|
+
function Commands_n__10080_2540_forkedUser($0, $1, $2, $3) {
|
|
10461
10444
|
return FFI_Concurrency_fork(csegen_74()(), ('user --json '+$3));
|
|
10462
10445
|
}
|
|
10463
10446
|
|
|
@@ -10490,7 +10473,7 @@ function Commands_skipArg($0) {
|
|
|
10490
10473
|
/* Commands.request : Config => Git => Octokit => List String -> {default False _ : Bool} ->
|
|
10491
10474
|
Promise' () */
|
|
10492
10475
|
function Commands_request($0, $1, $2, $3, $4) {
|
|
10493
|
-
return
|
|
10476
|
+
return Commands_case__request_2303($0, $1, $2, $4, $3, Commands_n__9680_2188_partitionedArgs($0, $1, $2, $4, $3));
|
|
10494
10477
|
}
|
|
10495
10478
|
|
|
10496
10479
|
/* Commands.reflect : Config => Octokit => Promise' () */
|
|
@@ -10504,95 +10487,88 @@ const Commands_prUsageError = __lazy(function () {
|
|
|
10504
10487
|
});
|
|
10505
10488
|
|
|
10506
10489
|
/* Commands.pr : Config => Git => Octokit => List PrArg -> Promise' () */
|
|
10507
|
-
function Commands_pr($0, $1, $2, $3) {
|
|
10508
|
-
const $
|
|
10509
|
-
|
|
10510
|
-
|
|
10511
|
-
|
|
10512
|
-
|
|
10513
|
-
|
|
10514
|
-
case
|
|
10515
|
-
|
|
10516
|
-
|
|
10517
|
-
|
|
10518
|
-
|
|
10490
|
+
function Commands_pr($0, $1, $2, $3, $4, $5) {
|
|
10491
|
+
const $2b = $2c => $2d => $2e => {
|
|
10492
|
+
switch($2c.h) {
|
|
10493
|
+
case 0: /* Actual */ {
|
|
10494
|
+
const $31 = $32 => $33 => {
|
|
10495
|
+
switch($2c.a1) {
|
|
10496
|
+
case 0: return $35 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($38 => Prelude_IO_prim__putStr((Data_PullRequest_rf__webURI($0, $2c.a2)+'\n'), $38), $32, $33, $35);
|
|
10497
|
+
case 1: return Data_Promise_pure_Applicative_x28Promisex20x24ex29(undefined, $32, $33);
|
|
10498
|
+
}
|
|
10499
|
+
};
|
|
10500
|
+
const $48 = $49 => $4a => $4b => {
|
|
10501
|
+
let $52;
|
|
10502
|
+
switch(Prelude_Types_null_Foldable_List(Commands_n__9240_1785_labelSlugs($0, $1, $2, $3))) {
|
|
10503
|
+
case 1: {
|
|
10504
|
+
$52 = 0;
|
|
10505
|
+
break;
|
|
10506
|
+
}
|
|
10507
|
+
case 0: {
|
|
10508
|
+
$52 = 1;
|
|
10509
|
+
break;
|
|
10510
|
+
}
|
|
10511
|
+
}
|
|
10512
|
+
const $4d = Prelude_Interfaces_when(csegen_66()(), $52, () => $5c => $5d => Commands_label($0, $1, $2, Commands_n__9240_1785_labelSlugs($0, $1, $2, $3), $5c, $5d));
|
|
10513
|
+
const $6a = $6b => $6c => $6d => {
|
|
10514
|
+
const $6f = $70 => {
|
|
10515
|
+
const $71 = Commands_n__9240_1783_intoBranch($0, $1, $2, $3);
|
|
10516
|
+
switch($71.h) {
|
|
10517
|
+
case undefined: /* just */ {
|
|
10518
|
+
return $77 => {
|
|
10519
|
+
switch(Data_String_isSuffixOf($71.a1, $2c.a2.a9)) {
|
|
10520
|
+
case 1: return Data_Promise_pure_Applicative_x28Promisex20x24ex29(undefined, $70, $77);
|
|
10521
|
+
case 0: return Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_51()(), $88 => $88, {a1: 'Setting the --into branch (base ref) for an existing PR is not supported (yet). Base ref will remain ', a2: {a1: $2c.a2.a9, a2: {h: 0}}}), $70, $77);
|
|
10522
|
+
}
|
|
10523
|
+
};
|
|
10519
10524
|
}
|
|
10520
|
-
|
|
10521
|
-
|
|
10522
|
-
|
|
10523
|
-
|
|
10524
|
-
|
|
10525
|
-
|
|
10526
|
-
|
|
10527
|
-
|
|
10528
|
-
|
|
10529
|
-
|
|
10530
|
-
|
|
10525
|
+
case 0: /* nothing */ return $91 => Data_Promise_pure_Applicative_x28Promisex20x24ex29(undefined, $70, $91);
|
|
10526
|
+
}
|
|
10527
|
+
};
|
|
10528
|
+
const $96 = $97 => {
|
|
10529
|
+
let $9c;
|
|
10530
|
+
switch(Commands_n__9240_1784_isDraft($0, $1, $2, $3)) {
|
|
10531
|
+
case 1: {
|
|
10532
|
+
switch($2c.a2.a4) {
|
|
10533
|
+
case 1: {
|
|
10534
|
+
$9c = 0;
|
|
10535
|
+
break;
|
|
10536
|
+
}
|
|
10537
|
+
case 0: {
|
|
10538
|
+
$9c = 1;
|
|
10539
|
+
break;
|
|
10540
|
+
}
|
|
10531
10541
|
}
|
|
10542
|
+
break;
|
|
10532
10543
|
}
|
|
10533
|
-
|
|
10534
|
-
|
|
10535
|
-
|
|
10536
|
-
|
|
10537
|
-
|
|
10538
|
-
|
|
10539
|
-
|
|
10540
|
-
|
|
10541
|
-
|
|
10542
|
-
|
|
10543
|
-
|
|
10544
|
-
}
|
|
10545
|
-
case 0: /* nothing */ return $a1 => Data_Promise_pure_Applicative_x28Promisex20x24ex29(undefined, $85, $a1);
|
|
10546
|
-
}
|
|
10547
|
-
};
|
|
10548
|
-
const $a6 = $a7 => {
|
|
10549
|
-
let $ac;
|
|
10550
|
-
switch(Commands_n__9121_1672_isDraft($0, $1, $2, $3)) {
|
|
10551
|
-
case 1: {
|
|
10552
|
-
switch($41.a2.a4) {
|
|
10553
|
-
case 1: {
|
|
10554
|
-
$ac = 0;
|
|
10555
|
-
break;
|
|
10556
|
-
}
|
|
10557
|
-
case 0: {
|
|
10558
|
-
$ac = 1;
|
|
10559
|
-
break;
|
|
10560
|
-
}
|
|
10561
|
-
}
|
|
10562
|
-
break;
|
|
10563
|
-
}
|
|
10564
|
-
case 0: {
|
|
10565
|
-
$ac = 0;
|
|
10566
|
-
break;
|
|
10567
|
-
}
|
|
10544
|
+
case 0: {
|
|
10545
|
+
$9c = 0;
|
|
10546
|
+
break;
|
|
10547
|
+
}
|
|
10548
|
+
}
|
|
10549
|
+
return Prelude_Interfaces_when(csegen_66()(), $9c, () => $a6 => $a7 => {
|
|
10550
|
+
const $ac = $ad => $ae => $af => {
|
|
10551
|
+
const $b8 = $b9 => $ba => $bb => {
|
|
10552
|
+
switch($b9) {
|
|
10553
|
+
case 1: return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($bf => $c0 => Data_Promise_map_Functor_x28Promisex20x24ex29($c3 => undefined, $c5 => $c6 => Commands_PullRequest_convertPRToDraft($0, $1, $2, $2c.a2, $c5, $c6), $bf, $c0), $d1 => $d2 => $d3 => $d4 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($d7 => Prelude_IO_prim__putStr('The PR for the current branch has been converted to a draft.\n', $d7), $d2, $d3, $d4), $ba, $bb);
|
|
10554
|
+
case 0: return $e0 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($e3 => Prelude_IO_prim__putStr('No worries, the PR won\'t be converted to a draft.\n', $e3), $ba, $bb, $e0);
|
|
10568
10555
|
}
|
|
10569
|
-
return Prelude_Interfaces_when(csegen_66()(), $ac, () => $b6 => $b7 => {
|
|
10570
|
-
const $bc = $bd => $be => $bf => {
|
|
10571
|
-
const $c8 = $c9 => $ca => $cb => {
|
|
10572
|
-
switch($c9) {
|
|
10573
|
-
case 1: return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($cf => $d0 => Data_Promise_map_Functor_x28Promisex20x24ex29($d3 => undefined, $d5 => $d6 => Commands_PullRequest_convertPRToDraft($0, $1, $2, $41.a2, $d5, $d6), $cf, $d0), $e1 => $e2 => $e3 => $e4 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($e7 => Prelude_IO_prim__putStr('The PR for the current branch has been converted to a draft.\n', $e7), $e2, $e3, $e4), $ca, $cb);
|
|
10574
|
-
case 0: return $f0 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($f3 => Prelude_IO_prim__putStr('No worries, the PR won\'t be converted to a draft.\n', $f3), $ca, $cb, $f0);
|
|
10575
|
-
}
|
|
10576
|
-
};
|
|
10577
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Util_Prompting_yesNoPrompt(csegen_74()(), 0, 'Are you sure you want to convert the existing PR for the current branch to a draft?'), $c8, $be, $bf);
|
|
10578
|
-
};
|
|
10579
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_381()(), $bc, $b6, $b7);
|
|
10580
|
-
});
|
|
10581
10556
|
};
|
|
10582
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(
|
|
10557
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Util_Prompting_yesNoPrompt(csegen_74()(), 0, 'Are you sure you want to convert the existing PR for the current branch to a draft?'), $b8, $ae, $af);
|
|
10583
10558
|
};
|
|
10584
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(
|
|
10585
|
-
};
|
|
10586
|
-
|
|
10587
|
-
|
|
10588
|
-
|
|
10589
|
-
|
|
10559
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(csegen_381()(), $ac, $a6, $a7);
|
|
10560
|
+
});
|
|
10561
|
+
};
|
|
10562
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($6f, $96, $6c, $6d);
|
|
10563
|
+
};
|
|
10564
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($4d, $6a, $4a, $4b);
|
|
10590
10565
|
};
|
|
10591
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($
|
|
10566
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($31, $48, $2d, $2e);
|
|
10592
10567
|
}
|
|
10593
|
-
case
|
|
10568
|
+
case 1: /* Hypothetical */ return $f4 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($f7 => Prelude_IO_prim__putStr(($2c.a1+'\n'), $f7), $2d, $2e, $f4);
|
|
10594
10569
|
}
|
|
10595
10570
|
};
|
|
10571
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($8 => $9 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($c => $d => FFI_Git_currentBranch($1, $c, $d), $13 => $14 => $15 => Commands_PullRequest_identifyOrCreatePR($0, $1, $2, Commands_n__9240_1784_isDraft($0, $1, $2, $3), Commands_n__9240_1783_intoBranch($0, $1, $2, $3), $13, $14, $15), $8, $9), $2b, $4, $5);
|
|
10596
10572
|
}
|
|
10597
10573
|
|
|
10598
10574
|
/* Commands.parsePrArgs : List String -> Either String (List PrArg) */
|
|
@@ -10602,7 +10578,7 @@ function Commands_parsePrArgs($0) {
|
|
|
10602
10578
|
default: {
|
|
10603
10579
|
const $3 = Commands_n__8814_1357_recombineIntoArgs($0, $0);
|
|
10604
10580
|
const $7 = Prelude_Types_List_mapAppend({h: 0}, $b => ({h: 1 /* Into */, a1: $b}), $3.a1);
|
|
10605
|
-
const $e = Prelude_Types_traverse_Traversable_List(csegen_9(), $13 => Commands_x3cx7cx7cx3e(
|
|
10581
|
+
const $e = Prelude_Types_traverse_Traversable_List(csegen_9(), $13 => Commands_x3cx7cx7cx3e(csegen_579(), $18 => Commands_n__8814_1354_parseDraftFlag($0, $18), $1d => Commands_n__8814_1356_parseLabelArg($0, $1d), $13), $3.a2);
|
|
10606
10582
|
return Data_Either_maybeToEither(() => Commands_prUsageError(), Prelude_Types_map_Functor_Maybe($29 => Prelude_Types_List_tailRecAppend($7, $29), $e));
|
|
10607
10583
|
}
|
|
10608
10584
|
}
|
|
@@ -10618,7 +10594,7 @@ function Commands_parseGraphArgs($0) {
|
|
|
10618
10594
|
switch($0.a2.a2.h) {
|
|
10619
10595
|
case undefined: /* cons */ return {h: 0 /* Left */, a1: 'graph accepts at most one team name and the --completed flag.'};
|
|
10620
10596
|
default: {
|
|
10621
|
-
const $6 = Prelude_Types_traverse_Traversable_List(csegen_9(), $b => Commands_x3cx7cx7cx3e(
|
|
10597
|
+
const $6 = Prelude_Types_traverse_Traversable_List(csegen_9(), $b => Commands_x3cx7cx7cx3e(csegen_579(), $10 => Commands_n__10248_2728_parseCompletedFlag($0, $10), $15 => Commands_n__10248_2729_parseTeamArg($0, $15), $b), $0);
|
|
10622
10598
|
switch($6.h) {
|
|
10623
10599
|
case undefined: /* just */ return {h: 1 /* Right */, a1: $6.a1};
|
|
10624
10600
|
case 0: /* nothing */ return {h: 0 /* Left */, a1: 'The graph command expects the name of a GitHub Team and optionally --completed as arguments.'};
|
|
@@ -10627,7 +10603,7 @@ function Commands_parseGraphArgs($0) {
|
|
|
10627
10603
|
}
|
|
10628
10604
|
}
|
|
10629
10605
|
default: {
|
|
10630
|
-
const $1d = Prelude_Types_traverse_Traversable_List(csegen_9(), $22 => Commands_x3cx7cx7cx3e(
|
|
10606
|
+
const $1d = Prelude_Types_traverse_Traversable_List(csegen_9(), $22 => Commands_x3cx7cx7cx3e(csegen_579(), $27 => Commands_n__10248_2728_parseCompletedFlag($0, $27), $2c => Commands_n__10248_2729_parseTeamArg($0, $2c), $22), $0);
|
|
10631
10607
|
switch($1d.h) {
|
|
10632
10608
|
case undefined: /* just */ return {h: 1 /* Right */, a1: $1d.a1};
|
|
10633
10609
|
case 0: /* nothing */ return {h: 0 /* Left */, a1: 'The graph command expects the name of a GitHub Team and optionally --completed as arguments.'};
|
|
@@ -10636,7 +10612,7 @@ function Commands_parseGraphArgs($0) {
|
|
|
10636
10612
|
}
|
|
10637
10613
|
}
|
|
10638
10614
|
default: {
|
|
10639
|
-
const $34 = Prelude_Types_traverse_Traversable_List(csegen_9(), $39 => Commands_x3cx7cx7cx3e(
|
|
10615
|
+
const $34 = Prelude_Types_traverse_Traversable_List(csegen_9(), $39 => Commands_x3cx7cx7cx3e(csegen_579(), $3e => Commands_n__10248_2728_parseCompletedFlag($0, $3e), $43 => Commands_n__10248_2729_parseTeamArg($0, $43), $39), $0);
|
|
10640
10616
|
switch($34.h) {
|
|
10641
10617
|
case undefined: /* just */ return {h: 1 /* Right */, a1: $34.a1};
|
|
10642
10618
|
case 0: /* nothing */ return {h: 0 /* Left */, a1: 'The graph command expects the name of a GitHub Team and optionally --completed as arguments.'};
|
|
@@ -10650,9 +10626,9 @@ function Commands_parseContributeArgs($0) {
|
|
|
10650
10626
|
switch($0.h) {
|
|
10651
10627
|
case 0: /* nil */ return {h: 1 /* Right */, a1: {h: 0}};
|
|
10652
10628
|
default: {
|
|
10653
|
-
const $3 =
|
|
10629
|
+
const $3 = Commands_n__10865_3296_recombineIgnoreArgs($0, $0);
|
|
10654
10630
|
const $7 = Prelude_Types_List_mapAppend({h: 0}, $b => ({h: 2 /* Ignore */, a1: $b}), $3.a1);
|
|
10655
|
-
const $e = Prelude_Types_traverse_Traversable_List(csegen_9(), $13 => Commands_x3cx7cx7cx3e(
|
|
10631
|
+
const $e = Prelude_Types_traverse_Traversable_List(csegen_9(), $13 => Commands_x3cx7cx7cx3e(csegen_579(), $18 => Commands_n__10865_3294_parseListFlag($0, $18), $1d => Commands_x3cx7cx7cx3e(csegen_579(), $22 => Commands_n__10865_3295_parseSkipArg($0, $22), $27 => Commands_n__10865_3292_parseCheckoutFlag($0, $27), $1d), $13), $3.a2);
|
|
10656
10632
|
return Data_Either_maybeToEither(() => Commands_contributeUsageError(), Prelude_Types_map_Functor_Maybe($34 => Prelude_Types_List_tailRecAppend($7, $34), $e));
|
|
10657
10633
|
}
|
|
10658
10634
|
}
|
|
@@ -10660,12 +10636,12 @@ function Commands_parseContributeArgs($0) {
|
|
|
10660
10636
|
|
|
10661
10637
|
/* Commands.listOrgTeams : Config => Octokit => Promise' () */
|
|
10662
10638
|
function Commands_listOrgTeams($0, $1, $2, $3) {
|
|
10663
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($6 => $7 => Data_Promise_map_Functor_x28Promisex20x24ex29(
|
|
10639
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($6 => $7 => Data_Promise_map_Functor_x28Promisex20x24ex29(csegen_580(), $c => $d => FFI_GitHub_forceListTeams($1, $0.a2, $c, $d), $6, $7), teamNames => Util_renderIO($0, csegen_74()(), Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Types_List_mapAppend({h: 0}, $22 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($22)), teamNames))), $2, $3);
|
|
10664
10640
|
}
|
|
10665
10641
|
|
|
10666
10642
|
/* Commands.list : Config => Octokit => String -> Promise' () */
|
|
10667
10643
|
function Commands_list($0, $1, $2, $3, $4) {
|
|
10668
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($7 => $8 => Data_Promise_map_Functor_x28Promisex20x24ex29(
|
|
10644
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($7 => $8 => Data_Promise_map_Functor_x28Promisex20x24ex29(csegen_580(), $d => $e => FFI_GitHub_forceListTeamMembers($1, $0.a2, $2, $d, $e), $7, $8), teamMemberLogins => $19 => $1a => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Prelude_Basics_flip(csegen_314(), csegen_582(), Prelude_Types_traverse_Traversable_List(csegen_66()(), $28 => Commands_n__10080_2540_forkedUser($1, $2, $0, $28), teamMemberLogins)), teamMembersJson => $30 => $31 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Prelude_Types_traverse_Traversable_List(csegen_66()(), $39 => $3a => Data_Promise_either(Data_User_parseUser($39), $3a), teamMembersJson), teamMembers => Util_renderIO($0, csegen_74()(), Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Types_List_mapAppend({h: 0}, $4d => Commands_n__10080_2541_putNameLn($1, $2, $0, $4d), teamMembers))), $30, $31), $19, $1a), $3, $4);
|
|
10669
10645
|
}
|
|
10670
10646
|
|
|
10671
10647
|
/* Commands.label : Config => Git => Octokit => List String -> Promise' () */
|
|
@@ -10696,7 +10672,7 @@ function Commands_graph($0, $1, $2) {
|
|
|
10696
10672
|
}
|
|
10697
10673
|
};
|
|
10698
10674
|
const $3 = Data_List_find($5, $2);
|
|
10699
|
-
return $9 =>
|
|
10675
|
+
return $9 => Commands_case__graph_3033($1, $2, $0, $3, Data_List_headx27(Prelude_Types_List_mapMaybeAppend({h: 0}, $15 => Commands_teamNameArg($15), $2)), $9);
|
|
10700
10676
|
}
|
|
10701
10677
|
|
|
10702
10678
|
/* Commands.contributeUsageError : String */
|
|
@@ -10761,17 +10737,17 @@ function Commands_contribute($0, $1, $2, $3, $4, $5) {
|
|
|
10761
10737
|
}
|
|
10762
10738
|
};
|
|
10763
10739
|
const $72 = Prelude_Types_List_filterAppend({h: 0}, $75, $13);
|
|
10764
|
-
const $7c = Prelude_Types_List_filterAppend({h: 0}, $80 =>
|
|
10740
|
+
const $7c = Prelude_Types_List_filterAppend({h: 0}, $80 => Commands_n__11217_3654_isNotIgnored($1, $2, $3, $0, configx27, $80), $72);
|
|
10765
10741
|
const $89 = Data_List_partition($8c => Data_PullRequest_isRequestedReviewer(myLogin, $8c), $7c);
|
|
10766
|
-
const $91 = Prelude_Interfaces_mapHom({a1: d => b => c => a => $95 => $96 => $97 => ({a1: $95($97.a1), a2: $96($97.a2)}), a2: b => c => a => $a0 => $a1 => ({a1: $a0($a1.a1), a2: $a1.a2}), a3: a => d => b => $a8 => $a9 => ({a1: $a9.a1, a2: $a8($a9.a2)})}, $b0 => Data_List_sortBy(
|
|
10742
|
+
const $91 = Prelude_Interfaces_mapHom({a1: d => b => c => a => $95 => $96 => $97 => ({a1: $95($97.a1), a2: $96($97.a2)}), a2: b => c => a => $a0 => $a1 => ({a1: $a0($a1.a1), a2: $a1.a2}), a3: a => d => b => $a8 => $a9 => ({a1: $a9.a1, a2: $a8($a9.a2)})}, $b0 => Data_List_sortBy(csegen_596(), $b0), $89);
|
|
10767
10743
|
let $71;
|
|
10768
10744
|
switch($54.h) {
|
|
10769
10745
|
case 0: /* nothing */ {
|
|
10770
|
-
$71 = () =>
|
|
10746
|
+
$71 = () => Commands_n__11217_3656_pickOne($1, $2, $3, $0, configx27, $41, $4e, $91.a1, $91.a2);
|
|
10771
10747
|
break;
|
|
10772
10748
|
}
|
|
10773
10749
|
case undefined: /* just */ {
|
|
10774
|
-
$71 = () => $c1 => $c2 =>
|
|
10750
|
+
$71 = () => $c1 => $c2 => Commands_n__11217_3655_listSome($1, $2, $3, $0, $41, $91.a1, $91.a2, $c1, $c2);
|
|
10775
10751
|
break;
|
|
10776
10752
|
}
|
|
10777
10753
|
}
|
|
@@ -11017,7 +10993,7 @@ function Data_SortedMap_Dependent_empty($0) {
|
|
|
11017
10993
|
|
|
11018
10994
|
/* Commands.User.Reflect.case block in case block in reflectOnSelf */
|
|
11019
10995
|
function Commands_User_Reflect_case__casex20blockx20inx20reflectOnSelf_1920($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
|
|
11020
|
-
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_List_mapAppend({h: 0},
|
|
10996
|
+
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_List_mapAppend({h: 0}, csegen_614(), $2a))), {a1: $7, a2: $9.a1});
|
|
11021
10997
|
return Util_renderIO($0, csegen_74()(), Commands_User_Reflect_print(Prelude_Types_String_length(Commands_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, $0));
|
|
11022
10998
|
}
|
|
11023
10999
|
|
|
@@ -11077,7 +11053,7 @@ function Commands_User_Me_n__7519_2044_email($0, $1, $2, $3) {
|
|
|
11077
11053
|
|
|
11078
11054
|
/* Commands.User.Me.7519:2043:dataVal */
|
|
11079
11055
|
function Commands_User_Me_n__7519_2043_dataVal($0, $1, $2, $3, $4) {
|
|
11080
|
-
return Theme_theme($3,
|
|
11056
|
+
return Theme_theme($3, csegen_616(), Theme_cs({a1: 4, a2: {h: 0}}), 8)(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($4));
|
|
11081
11057
|
}
|
|
11082
11058
|
|
|
11083
11059
|
/* Commands.User.Reflect.rightTitle : String */
|
|
@@ -11100,11 +11076,11 @@ function Commands_User_Reflect_reflectOnSelf($0, $1, $2, $3) {
|
|
|
11100
11076
|
const $c = prs => $d => $e => {
|
|
11101
11077
|
const $1c = myLogin => $1d => $1e => {
|
|
11102
11078
|
const $3a = reviews => {
|
|
11103
|
-
const $3b = Prelude_Types_map_Functor_Maybe(
|
|
11079
|
+
const $3b = Prelude_Types_map_Functor_Maybe(csegen_619(), Data_List_headx27(Data_List_sortBy($44 => $45 => Prelude_Basics_on(csegen_594(), csegen_619(), $44, $45), reviews)));
|
|
11104
11080
|
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_filterAppend({h: 0}, $71 => Prelude_EqOrd_x3dx3d_Eq_String($71.a5, myLogin), $6d), prs);
|
|
11105
11081
|
return Commands_User_Reflect_case__casex20blockx20inx20reflectOnSelf_1920($0, $1, prs, myLogin, reviews, $3b, prs, $4e.a1, $4e.a2, Prelude_Interfaces_mapHom({a1: d => b => c => a => $86 => $87 => $88 => ({a1: $86($88.a1), a2: $87($88.a2)}), a2: b => c => a => $91 => $92 => ({a1: $91($92.a1), a2: $92.a2}), a3: a => d => b => $99 => $9a => ({a1: $9a.a1, a2: $99($9a.a2)})}, $a1 => Prelude_Types_List_filterAppend({h: 0}, $a5 => Prelude_Types_foldMap_Foldable_List(csegen_96(), $aa => Prelude_EqOrd_x3dx3d_Eq_String($aa, myLogin), $a5.a7), $a1), prs));
|
|
11106
11082
|
};
|
|
11107
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Commands_PullRequest_reviewsByUser($0, $1, myLogin, Data_List_take(Commands_User_Reflect_reviewDetailsCount(), Prelude_Types_List_reverse(Data_List_sortBy($2e => $2f => Prelude_Basics_on(
|
|
11083
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Commands_PullRequest_reviewsByUser($0, $1, myLogin, Data_List_take(Commands_User_Reflect_reviewDetailsCount(), Prelude_Types_List_reverse(Data_List_sortBy($2e => $2f => Prelude_Basics_on(csegen_594(), csegen_614(), $2e, $2f), Commands_PullRequest_combined(prs))))), $3a, $1d, $1e);
|
|
11108
11084
|
};
|
|
11109
11085
|
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($11 => $12 => Data_Promise_map_Functor_x28Promisex20x24ex29(csegen_352()(), FFI_GitHub_getSelf($1), $11, $12), $1c, $d, $e);
|
|
11110
11086
|
};
|
|
@@ -11113,7 +11089,7 @@ function Commands_User_Reflect_reflectOnSelf($0, $1, $2, $3) {
|
|
|
11113
11089
|
|
|
11114
11090
|
/* Commands.User.Me.printInfoOnSelf : Config => Octokit => Git => Promise' () */
|
|
11115
11091
|
function Commands_User_Me_printInfoOnSelf($0, $1, $2, $3, $4) {
|
|
11116
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($7 => $8 => Data_Promise_map_Functor_x28Promisex20x24ex29($b => Commands_User_Me_n__7669_2202_handleUnsetEmail($1, $2, $0, $b), $12 => $13 => FFI_Git_userEmail($2, $12, $13), $7, $8), gitEmail => $1b => $1c => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(FFI_GitHub_getSelf($1), githubUser => $22 => $23 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($26 => $27 => Data_Promise_map_Functor_x28Promisex20x24ex29(
|
|
11092
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($7 => $8 => Data_Promise_map_Functor_x28Promisex20x24ex29($b => Commands_User_Me_n__7669_2202_handleUnsetEmail($1, $2, $0, $b), $12 => $13 => FFI_Git_userEmail($2, $12, $13), $7, $8), gitEmail => $1b => $1c => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(FFI_GitHub_getSelf($1), githubUser => $22 => $23 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($26 => $27 => Data_Promise_map_Functor_x28Promisex20x24ex29(csegen_580(), $2c => $2d => FFI_GitHub_listMyTeams($1, $2c, $2d), $26, $27), githubTeams => Util_renderIO($0, csegen_74()(), Commands_User_Me_print($0, gitEmail, githubUser, githubTeams)), $22, $23), $1b, $1c), $3, $4);
|
|
11117
11093
|
}
|
|
11118
11094
|
|
|
11119
11095
|
/* Commands.User.Reflect.print : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Maybe Date -> Maybe Date -> Maybe Date -> Config =>
|
|
@@ -11162,12 +11138,12 @@ function Commands_User_Reflect_graph($0, $1, $2, $3, $4, $5, $6) {
|
|
|
11162
11138
|
|
|
11163
11139
|
/* Commands.User.Reflect.details : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Maybe Date -> Maybe Date -> Maybe Date -> Doc AnsiStyle */
|
|
11164
11140
|
function Commands_User_Reflect_details($0, $1, $2, $3, $4, $5, $6, $7, $8) {
|
|
11165
|
-
return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Commands_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_Types_map_Functor_Maybe(
|
|
11141
|
+
return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Commands_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_Types_map_Functor_Maybe(csegen_625(), $8), 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_Types_map_Functor_Maybe(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}}})), $6), 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_Types_map_Functor_Maybe(csegen_625(), $7), 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_Types_foldMap_Foldable_List(csegen_51()(), $d0 => $d0, {a1: '*review count (not PR count) of most recent ', a2: {a1: Data_Fin_show_Show_x28Finx20x24nx29(Commands_User_Reflect_reviewDetailsCount()), a2: {a1: ' PRs.', a2: {h: 0}}}}))), a2: {h: 0}}}}}}}}}});
|
|
11166
11142
|
}
|
|
11167
11143
|
|
|
11168
11144
|
/* Commands.User.Reflect.chart : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Config => Nat -> Doc AnsiStyle */
|
|
11169
11145
|
function Commands_User_Reflect_chart($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
11170
|
-
return Text_PrettyPrint_Prettyprinter_Doc_indent(Number(_truncBigInt32($7)), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Commands_User_replicatex27($6,
|
|
11146
|
+
return Text_PrettyPrint_Prettyprinter_Doc_indent(Number(_truncBigInt32($7)), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Commands_User_replicatex27($6, csegen_616(), csegen_635(), 4, $1, '\u{b7}'), Commands_User_replicatex27($6, csegen_636(), csegen_636(), 7, $3, '\u{25e6}')), Commands_User_replicatex27($6, csegen_637(), csegen_637(), 5, $2, '<')), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('|'), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Commands_User_replicatex27($6, csegen_637(), csegen_637(), 5, $5, '>'), Commands_User_replicatex27($6, csegen_616(), csegen_635(), 4, $4, '\u{b7}')))));
|
|
11171
11147
|
}
|
|
11172
11148
|
|
|
11173
11149
|
/* Theme.4244:1209:maybeAnnotate */
|
|
@@ -11441,7 +11417,7 @@ function Commands_PullRequest_n__10828_2851_createPR($0, $1, $2, $3, $4, $5, $6,
|
|
|
11441
11417
|
function Commands_PullRequest_n__10828_2850_continueGivenUncommittedChanges($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
11442
11418
|
const $10 = $11 => $12 => $13 => {
|
|
11443
11419
|
switch($11.h) {
|
|
11444
|
-
case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($17 => $18 => $19 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($1c => Prelude_IO_prim__putStr('The following files have uncommitted changes:\n', $1c), $17, $18, $19), $24 => $25 => $26 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($29 => $2a => $2b => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($2e => Prelude_IO_prim__putStr(($11.a1+'\n'), $2e), $29, $2a, $2b),
|
|
11420
|
+
case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($17 => $18 => $19 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($1c => Prelude_IO_prim__putStr('The following files have uncommitted changes:\n', $1c), $17, $18, $19), $24 => $25 => $26 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($29 => $2a => $2b => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($2e => Prelude_IO_prim__putStr(($11.a1+'\n'), $2e), $29, $2a, $2b), csegen_657(), $25, $26), $12, $13);
|
|
11445
11421
|
case 0: /* nothing */ return Data_Promise_pure_Applicative_x28Promisex20x24ex29(1, $12, $13);
|
|
11446
11422
|
}
|
|
11447
11423
|
};
|
|
@@ -11452,7 +11428,7 @@ function Commands_PullRequest_n__10828_2850_continueGivenUncommittedChanges($0,
|
|
|
11452
11428
|
function Commands_PullRequest_n__10828_2849_continueGivenStagedChanges($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
11453
11429
|
const $10 = $11 => $12 => $13 => {
|
|
11454
11430
|
switch($11.h) {
|
|
11455
|
-
case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($17 => $18 => $19 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($1c => Prelude_IO_prim__putStr('The following files have staged but uncommitted changes:\n', $1c), $17, $18, $19), $24 => $25 => $26 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($29 => $2a => $2b => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($2e => Prelude_IO_prim__putStr(($11.a1+'\n'), $2e), $29, $2a, $2b),
|
|
11431
|
+
case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($17 => $18 => $19 => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($1c => Prelude_IO_prim__putStr('The following files have staged but uncommitted changes:\n', $1c), $17, $18, $19), $24 => $25 => $26 => Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($29 => $2a => $2b => Data_Promise_liftIO_HasIO_x28Promisex20x24ex29($2e => Prelude_IO_prim__putStr(($11.a1+'\n'), $2e), $29, $2a, $2b), csegen_657(), $25, $26), $12, $13);
|
|
11456
11432
|
case 0: /* nothing */ return Data_Promise_pure_Applicative_x28Promisex20x24ex29(1, $12, $13);
|
|
11457
11433
|
}
|
|
11458
11434
|
};
|
|
@@ -11491,7 +11467,7 @@ function Commands_PullRequest_reviewsForPrs($0, $1, $2, $3, $4) {
|
|
|
11491
11467
|
};
|
|
11492
11468
|
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29($1d, reviews => $42 => $43 => Data_Promise_pure_Applicative_x28Promisex20x24ex29(Prelude_Types_join_Monad_List(reviews), $42, $43), $1a, $1b);
|
|
11493
11469
|
};
|
|
11494
|
-
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Prelude_Basics_flip(csegen_314(),
|
|
11470
|
+
return Data_Promise_x3ex3ex3d_Monad_x28Promisex20x24ex29(Prelude_Basics_flip(csegen_314(), csegen_582(), Prelude_Types_traverse_Traversable_List(csegen_66()(), $12 => Commands_PullRequest_n__9700_1725_forkedReviews($0, $1, $2, $12), $2)), $19, $3, $4);
|
|
11495
11471
|
}
|
|
11496
11472
|
|
|
11497
11473
|
/* Commands.PullRequest.reviewsByUser : Config => Octokit => String -> List PullRequest -> Promise' (List Review) */
|
|
@@ -12017,7 +11993,7 @@ function Commands_Label_addLabels($0, $1, $2, $3, $4, $5) {
|
|
|
12017
11993
|
|
|
12018
11994
|
/* Commands.Graph.6831:6642:pendingDot */
|
|
12019
11995
|
function Commands_Graph_n__6831_6642_pendingDot($0, $1, $2, $3, $4, $5, $6) {
|
|
12020
|
-
return Theme_theme($6,
|
|
11996
|
+
return Theme_theme($6, csegen_637(), csegen_635(), 6)(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\u{b7}'));
|
|
12021
11997
|
}
|
|
12022
11998
|
|
|
12023
11999
|
/* Commands.Graph.6831:6641:note */
|
|
@@ -12027,7 +12003,7 @@ function Commands_Graph_n__6831_6641_note($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
|
12027
12003
|
|
|
12028
12004
|
/* Commands.Graph.6831:6640:missedDot */
|
|
12029
12005
|
function Commands_Graph_n__6831_6640_missedDot($0, $1, $2, $3, $4, $5, $6) {
|
|
12030
|
-
return Theme_theme($6,
|
|
12006
|
+
return Theme_theme($6, csegen_636(), csegen_636(), 7)(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\u{25e6}'));
|
|
12031
12007
|
}
|
|
12032
12008
|
|
|
12033
12009
|
/* Commands.Graph.6831:6639:maxValue */
|
|
@@ -12056,7 +12032,7 @@ function Commands_Graph_n__6831_6638_header($0, $1, $2, $3, $4, $5, $6) {
|
|
|
12056
12032
|
break;
|
|
12057
12033
|
}
|
|
12058
12034
|
}
|
|
12059
|
-
const $37 = {a1: $38, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Symbols_parens(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Commands_Graph_n__6831_6640_missedDot($0, $1, $2, $3, $4, $5, $6), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('overlayed on'), Commands_Graph_n__6831_6642_pendingDot($0, $1, $2, $3, $4, $5, $6))))}, a2:
|
|
12035
|
+
const $37 = {a1: $38, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Symbols_parens(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Commands_Graph_n__6831_6640_missedDot($0, $1, $2, $3, $4, $5, $6), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('overlayed on'), Commands_Graph_n__6831_6642_pendingDot($0, $1, $2, $3, $4, $5, $6))))}, a2: csegen_696()}};
|
|
12060
12036
|
const $25 = {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('1x the number of closed PRs with unanswered review requests'), Text_PrettyPrint_Prettyprinter_Symbols_parens(Commands_Graph_n__6831_6640_missedDot($0, $1, $2, $3, $4, $5, $6)))}, a2: $37};
|
|
12061
12037
|
const $13 = {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('4x the number of open review requests'), Text_PrettyPrint_Prettyprinter_Symbols_parens(Commands_Graph_n__6831_6642_pendingDot($0, $1, $2, $3, $4, $5, $6)))}, a2: $25};
|
|
12062
12038
|
const $e = {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Weighted review workload.')}, a2: $13};
|
|
@@ -12067,7 +12043,7 @@ function Commands_Graph_n__6831_6638_header($0, $1, $2, $3, $4, $5, $6) {
|
|
|
12067
12043
|
|
|
12068
12044
|
/* Commands.Graph.6434:6242:header */
|
|
12069
12045
|
function Commands_Graph_n__6434_6242_header($0, $1, $2, $3) {
|
|
12070
|
-
return Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Open Pull Requests grouped by month created.')}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2:
|
|
12046
|
+
return Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Open Pull Requests grouped by month created.')}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: csegen_696()}}}));
|
|
12071
12047
|
}
|
|
12072
12048
|
|
|
12073
12049
|
/* Commands.Graph.6434:6241:graphable */
|
|
@@ -12090,20 +12066,20 @@ function Commands_Graph_n__5984_5860_countInParens($0, $1, $2) {
|
|
|
12090
12066
|
|
|
12091
12067
|
/* Commands.Graph.6831:6636:completedBox */
|
|
12092
12068
|
function Commands_Graph_n__6831_6636_completedBox($0, $1, $2, $3, $4, $5, $6) {
|
|
12093
|
-
return Theme_theme($6,
|
|
12069
|
+
return Theme_theme($6, csegen_616(), csegen_616(), 3)(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\u{25aa}'));
|
|
12094
12070
|
}
|
|
12095
12071
|
|
|
12096
12072
|
/* Commands.Graph.5984:5859:coloredLabel */
|
|
12097
12073
|
function Commands_Graph_n__5984_5859_coloredLabel($0, $1, $2) {
|
|
12098
12074
|
switch((($2.a2===0n)?1:0)) {
|
|
12099
|
-
case 1: return Theme_theme($0,
|
|
12075
|
+
case 1: return Theme_theme($0, csegen_616(), csegen_616(), 0)($1.a1(undefined)($2.a1));
|
|
12100
12076
|
case 0: {
|
|
12101
12077
|
switch(Prelude_Types_x3c_Ord_Nat($2.a2, 2n)) {
|
|
12102
12078
|
case 1: return $1.a1(undefined)($2.a1);
|
|
12103
12079
|
case 0: {
|
|
12104
12080
|
switch(Prelude_Types_x3c_Ord_Nat($2.a2, 6n)) {
|
|
12105
|
-
case 1: return Theme_theme($0,
|
|
12106
|
-
case 0: return Theme_theme($0,
|
|
12081
|
+
case 1: return Theme_theme($0, csegen_637(), csegen_635(), 1)($1.a1(undefined)($2.a1));
|
|
12082
|
+
case 0: return Theme_theme($0, csegen_636(), csegen_636(), 2)($1.a1(undefined)($2.a1));
|
|
12107
12083
|
}
|
|
12108
12084
|
}
|
|
12109
12085
|
}
|
|
@@ -12217,9 +12193,9 @@ function Commands_Graph_reviewsGraph($0, $1, $2, $3, $4, $5, $6) {
|
|
|
12217
12193
|
|
|
12218
12194
|
/* Commands.Graph.healthGraph : Config => List PullRequest -> String -> String -> Doc AnsiStyle */
|
|
12219
12195
|
function Commands_Graph_healthGraph($0, $1, $2, $3) {
|
|
12220
|
-
const $4 = Data_List_groupBy($7 => $8 => Prelude_Basics_on($b => $c => Prelude_Basics_on($f => $10 => (($f===$10)?1:0), $14 => $14.a2, $b, $c),
|
|
12196
|
+
const $4 = Data_List_groupBy($7 => $8 => Prelude_Basics_on($b => $c => Prelude_Basics_on($f => $10 => (($f===$10)?1:0), $14 => $14.a2, $b, $c), csegen_595(), $7, $8), Data_List_sortBy(csegen_596(), $1));
|
|
12221
12197
|
const $21 = Prelude_Types_foldr_Foldable_List(xs => m => Prelude_Types_max_Ord_Nat(Data_List1_length(xs), m), 1n, $4);
|
|
12222
|
-
return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Commands_Graph_n__6434_6242_header($3, $2, $1, $0), a2: {a1: Commands_Graph_graph($0, {a1: $39 => Commands_Graph_totalWidth_Graphable_x28PRsOnDatex20x24dateTyx29($0,
|
|
12198
|
+
return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Commands_Graph_n__6434_6242_header($3, $2, $1, $0), a2: {a1: Commands_Graph_graph($0, {a1: $39 => Commands_Graph_totalWidth_Graphable_x28PRsOnDatex20x24dateTyx29($0, csegen_713(), $39), a2: $40 => Commands_Graph_label_Graphable_x28PRsOnDatex20x24dateTyx29($0, csegen_713(), $40), a3: $47 => Commands_Graph_score_Graphable_x28PRsOnDatex20x24dateTyx29($0, csegen_713(), $47), a4: $4e => Commands_Graph_detractor_Graphable_x28PRsOnDatex20x24dateTyx29($0, csegen_713(), $4e), a5: $55 => Commands_Graph_bonus_Graphable_x28PRsOnDatex20x24dateTyx29($0, csegen_713(), $55)}, $21, Commands_Graph_n__6434_6244_unfoldGraph($3, $2, $1, $0, Data_Fuel_limit(48n), $4, {h: 0})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Commands_Graph_n__6434_6243_link($3, $2, $1, $0)), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}});
|
|
12223
12199
|
}
|
|
12224
12200
|
|
|
12225
12201
|
/* Commands.Graph.graphOne : Config -> Graphable g => Nat -> g -> Doc AnsiStyle */
|
|
@@ -12236,7 +12212,7 @@ function Commands_Graph_graph($0, $1, $2, $3) {
|
|
|
12236
12212
|
|
|
12237
12213
|
/* Commands.Graph.bar : Config -> Nat -> Nat -> Nat -> Nat -> Doc AnsiStyle */
|
|
12238
12214
|
function Commands_Graph_bar($0, $1, $2, $3, $4) {
|
|
12239
|
-
return Text_PrettyPrint_Prettyprinter_Doc_indent(Number(_truncBigInt32($1)), Text_PrettyPrint_Prettyprinter_Doc_hcat({a1: Theme_theme($0,
|
|
12215
|
+
return Text_PrettyPrint_Prettyprinter_Doc_indent(Number(_truncBigInt32($1)), Text_PrettyPrint_Prettyprinter_Doc_hcat({a1: Theme_theme($0, csegen_636(), csegen_636(), 7)(Text_PrettyPrint_Prettyprinter_Doc_hcat(Data_List_replicateTR({h: 0}, $3, Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Char('\u{25e6}')))), a2: {a1: Theme_theme($0, csegen_637(), csegen_635(), 6)(Text_PrettyPrint_Prettyprinter_Doc_hcat(Data_List_replicateTR({h: 0}, $2, Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Char('\u{b7}')))), a2: {a1: Theme_theme($0, csegen_616(), csegen_616(), 3)(Text_PrettyPrint_Prettyprinter_Doc_hcat(Data_List_replicateTR({h: 0}, $4, Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Char('\u{25aa}')))), a2: {h: 0}}}}));
|
|
12240
12216
|
}
|
|
12241
12217
|
|
|
12242
12218
|
|