@mattpolzin/harmony 0.5.0 → 0.7.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.
- harmony-npm/harmony +1172 -826
- harmony-npm/package.json +1 -1
harmony-npm/harmony
CHANGED
|
@@ -89,10 +89,34 @@ const _truncBigInt8 = x => {
|
|
|
89
89
|
return res >= 0x80 ? res - 0x100 : res;
|
|
90
90
|
}
|
|
91
91
|
|
|
92
|
+
// Euclidian Division
|
|
93
|
+
const _div = (a,b) => {
|
|
94
|
+
let q = Math.trunc(a / b)
|
|
95
|
+
let r = a % b
|
|
96
|
+
return r < 0 ? (b > 0 ? q - 1 : q + 1) : q
|
|
97
|
+
}
|
|
98
|
+
|
|
99
|
+
const _divBigInt = (a,b) => {
|
|
100
|
+
let q = a / b
|
|
101
|
+
let r = a % b
|
|
102
|
+
return r < 0n ? (b > 0n ? q - 1n : q + 1n) : q
|
|
103
|
+
}
|
|
104
|
+
|
|
105
|
+
// Euclidian Modulo
|
|
106
|
+
const _mod = (a,b) => {
|
|
107
|
+
r = a % b
|
|
108
|
+
return r < 0 ? (b > 0 ? r + b : r - b) : r
|
|
109
|
+
}
|
|
110
|
+
|
|
111
|
+
const _modBigInt = (a,b) => {
|
|
112
|
+
r = a % b
|
|
113
|
+
return r < 0n ? (b > 0n ? r + b : r - b) : r
|
|
114
|
+
}
|
|
115
|
+
|
|
92
116
|
const _add8s = (a,b) => _truncInt8(a + b)
|
|
93
117
|
const _sub8s = (a,b) => _truncInt8(a - b)
|
|
94
118
|
const _mul8s = (a,b) => _truncInt8(a * b)
|
|
95
|
-
const _div8s = (a,b) => _truncInt8(
|
|
119
|
+
const _div8s = (a,b) => _truncInt8(_div(a,b))
|
|
96
120
|
const _shl8s = (a,b) => _truncInt8(a << b)
|
|
97
121
|
const _shr8s = (a,b) => _truncInt8(a >> b)
|
|
98
122
|
|
|
@@ -110,7 +134,7 @@ const _truncBigInt16 = x => {
|
|
|
110
134
|
const _add16s = (a,b) => _truncInt16(a + b)
|
|
111
135
|
const _sub16s = (a,b) => _truncInt16(a - b)
|
|
112
136
|
const _mul16s = (a,b) => _truncInt16(a * b)
|
|
113
|
-
const _div16s = (a,b) => _truncInt16(
|
|
137
|
+
const _div16s = (a,b) => _truncInt16(_div(a,b))
|
|
114
138
|
const _shl16s = (a,b) => _truncInt16(a << b)
|
|
115
139
|
const _shr16s = (a,b) => _truncInt16(a >> b)
|
|
116
140
|
|
|
@@ -124,7 +148,7 @@ const _truncBigInt32 = x => {
|
|
|
124
148
|
|
|
125
149
|
const _add32s = (a,b) => _truncInt32(a + b)
|
|
126
150
|
const _sub32s = (a,b) => _truncInt32(a - b)
|
|
127
|
-
const _div32s = (a,b) => _truncInt32(
|
|
151
|
+
const _div32s = (a,b) => _truncInt32(_div(a,b))
|
|
128
152
|
|
|
129
153
|
const _mul32s = (a,b) => {
|
|
130
154
|
const res = a * b;
|
|
@@ -144,7 +168,7 @@ const _truncBigInt64 = x => {
|
|
|
144
168
|
const _add64s = (a,b) => _truncBigInt64(a + b)
|
|
145
169
|
const _sub64s = (a,b) => _truncBigInt64(a - b)
|
|
146
170
|
const _mul64s = (a,b) => _truncBigInt64(a * b)
|
|
147
|
-
const _div64s = (a,b) => _truncBigInt64(a
|
|
171
|
+
const _div64s = (a,b) => _truncBigInt64(_divBigInt(a,b))
|
|
148
172
|
const _shl64s = (a,b) => _truncBigInt64(a << b)
|
|
149
173
|
const _shr64s = (a,b) => _truncBigInt64(a >> b)
|
|
150
174
|
|
|
@@ -259,6 +283,13 @@ const git_current_branch = (git, onSuccess, onFailure) =>
|
|
|
259
283
|
onFailure
|
|
260
284
|
)
|
|
261
285
|
|
|
286
|
+
const git_checkout_branch = (git, branch, onSuccess, onFailure) =>
|
|
287
|
+
idris__git_unpromisify(
|
|
288
|
+
git.raw('checkout', `${branch}`),
|
|
289
|
+
r => onSuccess(''),
|
|
290
|
+
onFailure()
|
|
291
|
+
)
|
|
292
|
+
|
|
262
293
|
// push the current branch, setting its upstream
|
|
263
294
|
// Executes callback with empty string on success.
|
|
264
295
|
const git_push_new_branch = (git, remoteName, branch, onSuccess, onFailure) =>
|
|
@@ -289,6 +320,13 @@ const git_remote_tracking_branch = (git, onSuccess, onFailure) =>
|
|
|
289
320
|
onFailure
|
|
290
321
|
)
|
|
291
322
|
|
|
323
|
+
const git_user_email = (git, onSuccess, onFailure) =>
|
|
324
|
+
idris__git_unpromisify(
|
|
325
|
+
git.raw('config', '--get', 'user.email'),
|
|
326
|
+
r => onSuccess(r.trim()),
|
|
327
|
+
onFailure
|
|
328
|
+
)
|
|
329
|
+
|
|
292
330
|
|
|
293
331
|
|
|
294
332
|
const { Octokit } = require('octokit')
|
|
@@ -328,7 +366,7 @@ const okit_get_repo_default_branch = (octokit, org, repo, onSuccess, onFailure)
|
|
|
328
366
|
const digTeams = teamsJson =>
|
|
329
367
|
teamsJson.map(t => t.slug)
|
|
330
368
|
|
|
331
|
-
// Executes callback with [String]
|
|
369
|
+
// Executes callback with [String] (string array)
|
|
332
370
|
const okit_list_teams = (octokit, org, onSuccess, onFailure) =>
|
|
333
371
|
idris__okit_unpromisify(
|
|
334
372
|
octokit.rest.teams.list({ org, per_page: 100 }),
|
|
@@ -336,6 +374,14 @@ const okit_list_teams = (octokit, org, onSuccess, onFailure) =>
|
|
|
336
374
|
idris__okit_stringify_error(onFailure)
|
|
337
375
|
)
|
|
338
376
|
|
|
377
|
+
// Executes callback with [String] (string array)
|
|
378
|
+
const okit_list_my_teams = (octokit, onSuccess, onFailure) =>
|
|
379
|
+
idris__okit_unpromisify(
|
|
380
|
+
octokit.rest.teams.listForAuthenticatedUser({per_page: 100}),
|
|
381
|
+
r => onSuccess(newline_delimited(digTeams(r.data))),
|
|
382
|
+
idris__okit_stringify_error(onFailure)
|
|
383
|
+
)
|
|
384
|
+
|
|
339
385
|
// list PRs for branch
|
|
340
386
|
const digPr = pr => {
|
|
341
387
|
return {
|
|
@@ -343,7 +389,8 @@ const digPr = pr => {
|
|
|
343
389
|
author: pr.user.login,
|
|
344
390
|
state: pr.state,
|
|
345
391
|
created_at: pr.created_at,
|
|
346
|
-
reviewers: pr.requested_reviewers.map(u => u.login)
|
|
392
|
+
reviewers: pr.requested_reviewers.map(u => u.login),
|
|
393
|
+
head_ref: pr.head.ref
|
|
347
394
|
}
|
|
348
395
|
}
|
|
349
396
|
const digPrs = prJson =>
|
|
@@ -555,6 +602,16 @@ function support_system_file_chmod (filename, mode) {
|
|
|
555
602
|
}
|
|
556
603
|
}
|
|
557
604
|
|
|
605
|
+
function support_system_file_removeFile (filename) {
|
|
606
|
+
try {
|
|
607
|
+
support_system_file_fs.unlinkSync(filename)
|
|
608
|
+
return 0
|
|
609
|
+
} catch (e) {
|
|
610
|
+
process.__lasterr = e
|
|
611
|
+
return 1
|
|
612
|
+
}
|
|
613
|
+
}
|
|
614
|
+
|
|
558
615
|
const Prelude_Types_fastUnpack = ((str)=>__prim_js2idris_array(Array.from(str)));
|
|
559
616
|
const Prelude_Types_fastPack = ((xs)=>__prim_idris2js_array(xs).join(''));
|
|
560
617
|
const Prelude_Types_fastConcat = ((xs)=>__prim_idris2js_array(xs).join(''));
|
|
@@ -588,17 +645,20 @@ const FFI_GitHub_prim__listPullReviews = okit_list_pr_reviews;
|
|
|
588
645
|
const FFI_GitHub_prim__listPullRequests = okit_list_pull_requests;
|
|
589
646
|
const FFI_GitHub_prim__listPRsForBranch = okit_list_prs;
|
|
590
647
|
const FFI_GitHub_prim__listOrgMembers = okit_list_org_members;
|
|
648
|
+
const FFI_GitHub_prim__listMyTeams = okit_list_my_teams;
|
|
591
649
|
const FFI_GitHub_prim__getUser = okit_get_user;
|
|
592
650
|
const FFI_GitHub_prim__getSelf = okit_get_self;
|
|
593
651
|
const FFI_GitHub_prim__getRepoDefaultBranch = okit_get_repo_default_branch;
|
|
594
652
|
const FFI_GitHub_prim__createPR = okit_create_pr;
|
|
595
653
|
const FFI_GitHub_prim__createComment = okit_create_comment;
|
|
596
654
|
const FFI_GitHub_prim__addPullReviewers = okit_add_reviewers;
|
|
655
|
+
const FFI_Git_prim__userEmail = git_user_email;
|
|
597
656
|
const FFI_Git_prim__remoteURI = git_remote_uri;
|
|
598
657
|
const FFI_Git_prim__remoteTrackingBranch = git_remote_tracking_branch;
|
|
599
658
|
const FFI_Git_prim__pushNewBranch = git_push_new_branch;
|
|
600
659
|
const FFI_Git_prim__git = git_git;
|
|
601
660
|
const FFI_Git_prim__currentBranch = git_current_branch;
|
|
661
|
+
const FFI_Git_prim__checkoutBranch = git_checkout_branch;
|
|
602
662
|
const FFI_Concurrency_prim__singleton = ((p)=>Promise.all([p]));
|
|
603
663
|
const FFI_Concurrency_prim__neutral = (()=>Promise.all([]));
|
|
604
664
|
const FFI_Concurrency_prim__future = concurrency_future;
|
|
@@ -618,7 +678,7 @@ function x24tcOpt_1($0) {
|
|
|
618
678
|
default: {
|
|
619
679
|
switch($0.a7.h) {
|
|
620
680
|
case 0: return {h: 0, a1: $0.a6};
|
|
621
|
-
case 1: return {h: 0, a1: Prelude_Interfaces_x3cx24x3e(
|
|
681
|
+
case 1: return {h: 0, a1: Prelude_Interfaces_x3cx24x3e(csegen_119(), $c => ({a1: $c.a1, a2: $c.a2, a3: 0n}), $0.a6)};
|
|
622
682
|
default: {
|
|
623
683
|
switch($0.a6.h) {
|
|
624
684
|
case 0: {
|
|
@@ -627,30 +687,30 @@ function x24tcOpt_1($0) {
|
|
|
627
687
|
case 0: return {h: 0, a1: $0.a5};
|
|
628
688
|
default: {
|
|
629
689
|
const $18 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
|
|
630
|
-
const $1c = Data_List_DeleteBy_deleteByx27($1f => $20 => Prelude_Basics_on($23 => $24 => $0.a1.a1.a1($23)($24),
|
|
690
|
+
const $1c = Data_List_DeleteBy_deleteByx27($1f => $20 => Prelude_Basics_on($23 => $24 => $0.a1.a1.a1($23)($24), csegen_471(), $1f, $20), $18, $0.a6);
|
|
631
691
|
switch($1c.a1.h) {
|
|
632
692
|
case 0: {
|
|
633
693
|
switch($0.a8) {
|
|
634
|
-
case 0: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2:
|
|
694
|
+
case 0: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2: Reviewer_n__4753_1596_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $1c.a2, $0.a7, $0.a8)}};
|
|
635
695
|
case 1: return {h: 1, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a2, a6: $1c.a2, a7: $0.a7, a8: $0.a8};
|
|
636
696
|
}
|
|
637
697
|
}
|
|
638
|
-
case undefined: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3:
|
|
698
|
+
case undefined: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: Reviewer_n__4780_1748_calc($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a1.a1, $0.a5.a1.a3, $0.a5.a1.a2, $18, $0.a5.a2, $0.a8, $0.a7, $0.a6, $0.a5.a1.a3, $1c.a1.a1.a3)}, a2: Reviewer_n__4753_1596_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $1c.a2, $0.a7, $0.a8)}};
|
|
639
699
|
}
|
|
640
700
|
}
|
|
641
701
|
}
|
|
642
702
|
}
|
|
643
703
|
default: {
|
|
644
704
|
const $6b = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
|
|
645
|
-
const $6f = Data_List_DeleteBy_deleteByx27($72 => $73 => Prelude_Basics_on($76 => $77 => $0.a1.a1.a1($76)($77),
|
|
705
|
+
const $6f = Data_List_DeleteBy_deleteByx27($72 => $73 => Prelude_Basics_on($76 => $77 => $0.a1.a1.a1($76)($77), csegen_471(), $72, $73), $6b, $0.a6);
|
|
646
706
|
switch($6f.a1.h) {
|
|
647
707
|
case 0: {
|
|
648
708
|
switch($0.a8) {
|
|
649
|
-
case 0: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2:
|
|
709
|
+
case 0: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2: Reviewer_n__4753_1596_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $6f.a2, $0.a7, $0.a8)}};
|
|
650
710
|
case 1: return {h: 1, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a2, a6: $6f.a2, a7: $0.a7, a8: $0.a8};
|
|
651
711
|
}
|
|
652
712
|
}
|
|
653
|
-
case undefined: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3:
|
|
713
|
+
case undefined: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: Reviewer_n__4780_1748_calc($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a1.a1, $0.a5.a1.a3, $0.a5.a1.a2, $6b, $0.a5.a2, $0.a8, $0.a7, $0.a6, $0.a5.a1.a3, $6f.a1.a1.a3)}, a2: Reviewer_n__4753_1596_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $6f.a2, $0.a7, $0.a8)}};
|
|
654
714
|
}
|
|
655
715
|
}
|
|
656
716
|
}
|
|
@@ -667,30 +727,30 @@ function x24tcOpt_1($0) {
|
|
|
667
727
|
case 0: return {h: 0, a1: $0.a5};
|
|
668
728
|
default: {
|
|
669
729
|
const $c2 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
|
|
670
|
-
const $c6 = Data_List_DeleteBy_deleteByx27($c9 => $ca => Prelude_Basics_on($cd => $ce => $0.a1.a1.a1($cd)($ce),
|
|
730
|
+
const $c6 = Data_List_DeleteBy_deleteByx27($c9 => $ca => Prelude_Basics_on($cd => $ce => $0.a1.a1.a1($cd)($ce), csegen_471(), $c9, $ca), $c2, $0.a6);
|
|
671
731
|
switch($c6.a1.h) {
|
|
672
732
|
case 0: {
|
|
673
733
|
switch($0.a8) {
|
|
674
|
-
case 0: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2:
|
|
734
|
+
case 0: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2: Reviewer_n__4753_1596_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $c6.a2, $0.a7, $0.a8)}};
|
|
675
735
|
case 1: return {h: 1, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a2, a6: $c6.a2, a7: $0.a7, a8: $0.a8};
|
|
676
736
|
}
|
|
677
737
|
}
|
|
678
|
-
case undefined: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3:
|
|
738
|
+
case undefined: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: Reviewer_n__4780_1748_calc($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a1.a1, $0.a5.a1.a3, $0.a5.a1.a2, $c2, $0.a5.a2, $0.a8, $0.a7, $0.a6, $0.a5.a1.a3, $c6.a1.a1.a3)}, a2: Reviewer_n__4753_1596_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $c6.a2, $0.a7, $0.a8)}};
|
|
679
739
|
}
|
|
680
740
|
}
|
|
681
741
|
}
|
|
682
742
|
}
|
|
683
743
|
default: {
|
|
684
744
|
const $115 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
|
|
685
|
-
const $119 = Data_List_DeleteBy_deleteByx27($11c => $11d => Prelude_Basics_on($120 => $121 => $0.a1.a1.a1($120)($121),
|
|
745
|
+
const $119 = Data_List_DeleteBy_deleteByx27($11c => $11d => Prelude_Basics_on($120 => $121 => $0.a1.a1.a1($120)($121), csegen_471(), $11c, $11d), $115, $0.a6);
|
|
686
746
|
switch($119.a1.h) {
|
|
687
747
|
case 0: {
|
|
688
748
|
switch($0.a8) {
|
|
689
|
-
case 0: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2:
|
|
749
|
+
case 0: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2: Reviewer_n__4753_1596_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $119.a2, $0.a7, $0.a8)}};
|
|
690
750
|
case 1: return {h: 1, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a2, a6: $119.a2, a7: $0.a7, a8: $0.a8};
|
|
691
751
|
}
|
|
692
752
|
}
|
|
693
|
-
case undefined: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3:
|
|
753
|
+
case undefined: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: Reviewer_n__4780_1748_calc($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a1.a1, $0.a5.a1.a3, $0.a5.a1.a2, $115, $0.a5.a2, $0.a8, $0.a7, $0.a6, $0.a5.a1.a3, $119.a1.a1.a3)}, a2: Reviewer_n__4753_1596_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $119.a2, $0.a7, $0.a8)}};
|
|
694
754
|
}
|
|
695
755
|
}
|
|
696
756
|
}
|
|
@@ -698,7 +758,7 @@ function x24tcOpt_1($0) {
|
|
|
698
758
|
}
|
|
699
759
|
}
|
|
700
760
|
|
|
701
|
-
function
|
|
761
|
+
function Reviewer_n__4753_1596_zipReviews($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
702
762
|
return __tailRec(x24tcOpt_1, {h: 1, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4, a6: $5, a7: $6, a8: $7});
|
|
703
763
|
}
|
|
704
764
|
|
|
@@ -719,7 +779,7 @@ function x24tcOpt_2($0) {
|
|
|
719
779
|
}
|
|
720
780
|
}
|
|
721
781
|
|
|
722
|
-
function
|
|
782
|
+
function Data_List_n__7156_6663_splitRec($0, $1, $2, $3, $4) {
|
|
723
783
|
return __tailRec(x24tcOpt_2, {h: 1, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4});
|
|
724
784
|
}
|
|
725
785
|
|
|
@@ -735,7 +795,7 @@ function x24tcOpt_3($0) {
|
|
|
735
795
|
}
|
|
736
796
|
}
|
|
737
797
|
|
|
738
|
-
function
|
|
798
|
+
function Prelude_Show_n__3172_11556_showx27($0, $1, $2, $3) {
|
|
739
799
|
return __tailRec(x24tcOpt_3, {h: 1, a1: $0, a2: $1, a3: $2, a4: $3});
|
|
740
800
|
}
|
|
741
801
|
|
|
@@ -748,7 +808,7 @@ function x24tcOpt_4($0) {
|
|
|
748
808
|
}
|
|
749
809
|
}
|
|
750
810
|
|
|
751
|
-
function
|
|
811
|
+
function Text_PrettyPrint_Prettyprinter_Doc_n__8712_6697_initialIndentation($0, $1, $2, $3) {
|
|
752
812
|
return __tailRec(x24tcOpt_4, {h: 1, a1: $0, a2: $1, a3: $2, a4: $3});
|
|
753
813
|
}
|
|
754
814
|
|
|
@@ -763,8 +823,8 @@ function x24tcOpt_5($0) {
|
|
|
763
823
|
case 2: {
|
|
764
824
|
switch($0.a11.h) {
|
|
765
825
|
case undefined: {
|
|
766
|
-
const $16 = _add32s($0.a5, Prelude_Cast_cast_Cast_Nat_Int(
|
|
767
|
-
const $23 =
|
|
826
|
+
const $16 = _add32s($0.a5, Prelude_Cast_cast_Cast_Nat_Int(Text_Lexer_Core_n__3659_2499_countNLs($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, $0.a6, $0.a11.a1.a1)));
|
|
827
|
+
const $23 = Text_Lexer_Core_n__3659_2500_getCols($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, $0.a6, $0.a11.a1.a1, $0.a4);
|
|
768
828
|
return {h: 0, a1: {a1: {a1: {a1: $0.a8(Prelude_Types_fastPack(Prelude_Types_List_reverse($0.a11.a1.a1))), a2: 0, a3: {a1: $0.a5, a2: $0.a4, a3: $16, a4: $23}}, a2: {a1: $16, a2: {a1: $23, a2: $0.a11.a1.a2}}}}};
|
|
769
829
|
}
|
|
770
830
|
case 0: return {h: 1, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: $0.a6, a7: $0.a9, a8: $0.a10};
|
|
@@ -773,11 +833,11 @@ function x24tcOpt_5($0) {
|
|
|
773
833
|
}
|
|
774
834
|
}
|
|
775
835
|
|
|
776
|
-
function
|
|
836
|
+
function Text_Lexer_Core_n__3659_2501_getFirstToken($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
777
837
|
return __tailRec(x24tcOpt_5, {h: 1, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4, a6: $5, a7: $6, a8: $7});
|
|
778
838
|
}
|
|
779
839
|
|
|
780
|
-
function
|
|
840
|
+
function Text_Lexer_Core_case__tokenisex2cgetFirstToken_2636($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a) {
|
|
781
841
|
return __tailRec(x24tcOpt_5, {h: 2, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4, a6: $5, a7: $6, a8: $7, a9: $8, a10: $9, a11: $a});
|
|
782
842
|
}
|
|
783
843
|
|
|
@@ -812,7 +872,7 @@ function Prelude_Types_compare_Ord_x28Listx20x24ax29($0, $1, $2) {
|
|
|
812
872
|
return __tailRec(x24tcOpt_6, {h: 1, a1: $0, a2: $1, a3: $2});
|
|
813
873
|
}
|
|
814
874
|
|
|
815
|
-
function
|
|
875
|
+
function Prelude_Types_case__compare_6195($0, $1, $2, $3, $4, $5) {
|
|
816
876
|
return __tailRec(x24tcOpt_6, {h: 2, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4, a6: $5});
|
|
817
877
|
}
|
|
818
878
|
|
|
@@ -846,17 +906,17 @@ function Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29($0, $1, $2) {
|
|
|
846
906
|
function x24tcOpt_8($0) {
|
|
847
907
|
switch($0.a2.h) {
|
|
848
908
|
case 0: return {h: 0, a1: _truncToChar($0.a3)};
|
|
849
|
-
case undefined: return {h: 1, a1: $0.a1, a2: $0.a2.a2, a3: _add32s(
|
|
909
|
+
case undefined: return {h: 1, a1: $0.a1, a2: $0.a2.a2, a3: _add32s(Language_JSON_String_Tokens_n__3203_1166_hexVal($0.a1, $0.a2.a1), _mul32s(Number(_truncBigInt32(16n)), $0.a3))};
|
|
850
910
|
}
|
|
851
911
|
}
|
|
852
912
|
|
|
853
|
-
function
|
|
913
|
+
function Language_JSON_String_Tokens_n__3203_1167_fromHex($0, $1, $2) {
|
|
854
914
|
return __tailRec(x24tcOpt_8, {h: 1, a1: $0, a2: $1, a3: $2});
|
|
855
915
|
}
|
|
856
916
|
|
|
857
917
|
function x24tcOpt_9($0) {
|
|
858
918
|
switch($0.h) {
|
|
859
|
-
case 1: return {h: 2, a1: $0.a6, a2: $0.a5, a3: $0.a4, a4: $0.a3, a5: $0.a2, a6: $0.a1, a7:
|
|
919
|
+
case 1: return {h: 2, a1: $0.a6, a2: $0.a5, a3: $0.a4, a4: $0.a3, a5: $0.a2, a6: $0.a1, a7: Text_Lexer_Core_n__3659_2501_getFirstToken($0.a6, $0.a5, $0.a4, $0.a3, $0.a2, $0.a1, $0.a5, $0.a6)};
|
|
860
920
|
case 2: {
|
|
861
921
|
switch($0.a7.h) {
|
|
862
922
|
case undefined: {
|
|
@@ -875,7 +935,7 @@ function Text_Lexer_Core_tokenise($0, $1, $2, $3, $4, $5) {
|
|
|
875
935
|
return __tailRec(x24tcOpt_9, {h: 1, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4, a6: $5});
|
|
876
936
|
}
|
|
877
937
|
|
|
878
|
-
function
|
|
938
|
+
function Text_Lexer_Core_case__tokenise_2726($0, $1, $2, $3, $4, $5, $6) {
|
|
879
939
|
return __tailRec(x24tcOpt_9, {h: 2, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4, a6: $5, a7: $6});
|
|
880
940
|
}
|
|
881
941
|
|
|
@@ -910,15 +970,15 @@ function x24tcOpt_11($0) {
|
|
|
910
970
|
switch($0.a3.h) {
|
|
911
971
|
case 0: return {h: 0, a1: {h: 0}};
|
|
912
972
|
case undefined: {
|
|
913
|
-
switch(Prelude_Types_elemBy(
|
|
973
|
+
switch(Prelude_Types_elemBy(csegen_77(), $0.a2, $0.a3.a1, $0.a1)) {
|
|
914
974
|
case 1: return {h: 1, a1: $0.a1, a2: $0.a2, a3: $0.a3.a2};
|
|
915
|
-
case 0: return {h: 0, a1: {a1: $0.a3.a1, a2:
|
|
975
|
+
case 0: return {h: 0, a1: {a1: $0.a3.a1, a2: Data_List_n__4343_3930_nubByx27({a1: $0.a3.a1, a2: $0.a1}, $0.a2, $0.a3.a2)}};
|
|
916
976
|
}
|
|
917
977
|
}
|
|
918
978
|
}
|
|
919
979
|
}
|
|
920
980
|
|
|
921
|
-
function
|
|
981
|
+
function Data_List_n__4343_3930_nubByx27($0, $1, $2) {
|
|
922
982
|
return __tailRec(x24tcOpt_11, {h: 1, a1: $0, a2: $1, a3: $2});
|
|
923
983
|
}
|
|
924
984
|
|
|
@@ -946,7 +1006,7 @@ function x24tcOpt_12($0) {
|
|
|
946
1006
|
}
|
|
947
1007
|
}
|
|
948
1008
|
|
|
949
|
-
function
|
|
1009
|
+
function Data_String_with__ltrim_6503($0, $1) {
|
|
950
1010
|
return __tailRec(x24tcOpt_12, {h: 1, a1: $0, a2: $1});
|
|
951
1011
|
}
|
|
952
1012
|
|
|
@@ -997,14 +1057,14 @@ function Data_List_lookupBy($0, $1, $2) {
|
|
|
997
1057
|
}
|
|
998
1058
|
|
|
999
1059
|
function x24tcOpt_15($0) {
|
|
1000
|
-
switch($0.
|
|
1001
|
-
case 0: return {h: 0, a1: Prelude_Types_List_reverse($0.
|
|
1002
|
-
case undefined: return {h: 1, a1: $0.a1, a2:
|
|
1060
|
+
switch($0.a3.h) {
|
|
1061
|
+
case 0: return {h: 0, a1: Prelude_Types_List_reverse($0.a2)};
|
|
1062
|
+
case undefined: return {h: 1, a1: $0.a1, a2: Prelude_Types_List_reverseOnto($0.a2, $0.a1($0.a3.a1)), a3: $0.a3.a2};
|
|
1003
1063
|
}
|
|
1004
1064
|
}
|
|
1005
1065
|
|
|
1006
|
-
function
|
|
1007
|
-
return __tailRec(x24tcOpt_15, {h: 1, a1: $0, a2: $1, a3: $2
|
|
1066
|
+
function Prelude_Types_listBindOnto($0, $1, $2) {
|
|
1067
|
+
return __tailRec(x24tcOpt_15, {h: 1, a1: $0, a2: $1, a3: $2});
|
|
1008
1068
|
}
|
|
1009
1069
|
|
|
1010
1070
|
function x24tcOpt_16($0) {
|
|
@@ -1017,16 +1077,16 @@ function x24tcOpt_16($0) {
|
|
|
1017
1077
|
case 0: return {h: 0, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: {h: 0}}};
|
|
1018
1078
|
case undefined: {
|
|
1019
1079
|
switch($0.a3.a1) {
|
|
1020
|
-
case '\n': return {h: 0, a1: {a1: Prelude_Types_List_reverse($0.a2), a2:
|
|
1080
|
+
case '\n': return {h: 0, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3748_6341_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
|
|
1021
1081
|
case '\r': {
|
|
1022
1082
|
switch($0.a3.a2.h) {
|
|
1023
1083
|
case undefined: {
|
|
1024
1084
|
switch($0.a3.a2.a1) {
|
|
1025
|
-
case '\n': return {h: 0, a1: {a1: Prelude_Types_List_reverse($0.a2), a2:
|
|
1026
|
-
default: return {h: 0, a1: {a1: Prelude_Types_List_reverse($0.a2), a2:
|
|
1085
|
+
case '\n': return {h: 0, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3748_6341_linesHelp($0.a1, {h: 0}, $0.a3.a2.a2)}};
|
|
1086
|
+
default: return {h: 0, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3748_6341_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
|
|
1027
1087
|
}
|
|
1028
1088
|
}
|
|
1029
|
-
default: return {h: 0, a1: {a1: Prelude_Types_List_reverse($0.a2), a2:
|
|
1089
|
+
default: return {h: 0, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3748_6341_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
|
|
1030
1090
|
}
|
|
1031
1091
|
}
|
|
1032
1092
|
default: return {h: 1, a1: $0.a1, a2: {a1: $0.a3.a1, a2: $0.a2}, a3: $0.a3.a2};
|
|
@@ -1041,16 +1101,16 @@ function x24tcOpt_16($0) {
|
|
|
1041
1101
|
case 0: return {h: 0, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: {h: 0}}};
|
|
1042
1102
|
case undefined: {
|
|
1043
1103
|
switch($0.a3.a1) {
|
|
1044
|
-
case '\n': return {h: 0, a1: {a1: Prelude_Types_List_reverse($0.a2), a2:
|
|
1104
|
+
case '\n': return {h: 0, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3748_6341_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
|
|
1045
1105
|
case '\r': {
|
|
1046
1106
|
switch($0.a3.a2.h) {
|
|
1047
1107
|
case undefined: {
|
|
1048
1108
|
switch($0.a3.a2.a1) {
|
|
1049
|
-
case '\n': return {h: 0, a1: {a1: Prelude_Types_List_reverse($0.a2), a2:
|
|
1050
|
-
default: return {h: 0, a1: {a1: Prelude_Types_List_reverse($0.a2), a2:
|
|
1109
|
+
case '\n': return {h: 0, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3748_6341_linesHelp($0.a1, {h: 0}, $0.a3.a2.a2)}};
|
|
1110
|
+
default: return {h: 0, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3748_6341_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
|
|
1051
1111
|
}
|
|
1052
1112
|
}
|
|
1053
|
-
default: return {h: 0, a1: {a1: Prelude_Types_List_reverse($0.a2), a2:
|
|
1113
|
+
default: return {h: 0, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3748_6341_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
|
|
1054
1114
|
}
|
|
1055
1115
|
}
|
|
1056
1116
|
default: return {h: 1, a1: $0.a1, a2: {a1: $0.a3.a1, a2: $0.a2}, a3: $0.a3.a2};
|
|
@@ -1061,7 +1121,7 @@ function x24tcOpt_16($0) {
|
|
|
1061
1121
|
}
|
|
1062
1122
|
}
|
|
1063
1123
|
|
|
1064
|
-
function
|
|
1124
|
+
function Data_String_n__3748_6341_linesHelp($0, $1, $2) {
|
|
1065
1125
|
return __tailRec(x24tcOpt_16, {h: 1, a1: $0, a2: $1, a3: $2});
|
|
1066
1126
|
}
|
|
1067
1127
|
|
|
@@ -1079,14 +1139,14 @@ function Prelude_Types_List_lengthPlus($0, $1) {
|
|
|
1079
1139
|
function x24tcOpt_18($0) {
|
|
1080
1140
|
switch($0.a6.h) {
|
|
1081
1141
|
case 0: return {h: 0, a1: {h: 0}};
|
|
1082
|
-
case 2: return {h: 0, a1: {h: 5, a1:
|
|
1142
|
+
case 2: return {h: 0, a1: {h: 5, a1: Text_PrettyPrint_Prettyprinter_Doc_n__8712_6699_best($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, $0.a6.a1)}};
|
|
1083
1143
|
case 1: {
|
|
1084
1144
|
switch($0.a6.a2.h) {
|
|
1085
1145
|
case 0: return {h: 1, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: $0.a6.a3};
|
|
1086
|
-
case 1: return {h: 0, a1: {h: 1, a1: $0.a6.a2.a1, a2: () =>
|
|
1087
|
-
case 2: return {h: 0, a1: {h: 2, a1: $0.a6.a2.a1, a2: $0.a6.a2.a2, a3: () =>
|
|
1146
|
+
case 1: return {h: 0, a1: {h: 1, a1: $0.a6.a2.a1, a2: () => Text_PrettyPrint_Prettyprinter_Doc_n__8712_6699_best($0.a1, $0.a2, $0.a3, $0.a4, _add32s($0.a5, 1), $0.a6.a3)}};
|
|
1147
|
+
case 2: return {h: 0, a1: {h: 2, a1: $0.a6.a2.a1, a2: $0.a6.a2.a2, a3: () => Text_PrettyPrint_Prettyprinter_Doc_n__8712_6699_best($0.a1, $0.a2, $0.a3, $0.a4, _add32s($0.a5, $0.a6.a2.a1), $0.a6.a3)}};
|
|
1088
1148
|
case 3: {
|
|
1089
|
-
const $2d =
|
|
1149
|
+
const $2d = Text_PrettyPrint_Prettyprinter_Doc_n__8712_6699_best($0.a1, $0.a2, $0.a3, $0.a6.a1, $0.a6.a1, $0.a6.a3);
|
|
1090
1150
|
let $35;
|
|
1091
1151
|
switch($2d.h) {
|
|
1092
1152
|
case 0: {
|
|
@@ -1105,20 +1165,20 @@ function x24tcOpt_18($0) {
|
|
|
1105
1165
|
case 5: return {h: 1, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: {h: 1, a1: $0.a6.a1, a2: $0.a6.a2.a1, a3: {h: 1, a1: $0.a6.a1, a2: $0.a6.a2.a2, a3: $0.a6.a3}}};
|
|
1106
1166
|
case 6: return {h: 1, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: {h: 1, a1: _add32s($0.a6.a1, $0.a6.a2.a1), a2: $0.a6.a2.a2, a3: $0.a6.a3}};
|
|
1107
1167
|
case 7: {
|
|
1108
|
-
const $5d =
|
|
1109
|
-
const $69 =
|
|
1110
|
-
return {h: 0, a1:
|
|
1168
|
+
const $5d = Text_PrettyPrint_Prettyprinter_Doc_n__8712_6699_best($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, {h: 1, a1: $0.a6.a1, a2: $0.a6.a2.a1(), a3: $0.a6.a3});
|
|
1169
|
+
const $69 = Text_PrettyPrint_Prettyprinter_Doc_n__8712_6699_best($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, {h: 1, a1: $0.a6.a1, a2: $0.a6.a2.a2(), a3: $0.a6.a3});
|
|
1170
|
+
return {h: 0, a1: Text_PrettyPrint_Prettyprinter_Doc_n__8712_6698_selectNicer($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, $5d, () => $69)};
|
|
1111
1171
|
}
|
|
1112
1172
|
case 8: return {h: 1, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: {h: 1, a1: $0.a6.a1, a2: $0.a6.a2.a1($0.a5), a3: $0.a6.a3}};
|
|
1113
1173
|
case 9: return {h: 1, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: {h: 1, a1: $0.a6.a1, a2: $0.a6.a2.a1($0.a2), a3: $0.a6.a3}};
|
|
1114
1174
|
case 10: return {h: 1, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: {h: 1, a1: $0.a6.a1, a2: $0.a6.a2.a1($0.a6.a1), a3: $0.a6.a3}};
|
|
1115
|
-
case 11: return {h: 0, a1: {h: 4, a1: $0.a6.a2.a1, a2:
|
|
1175
|
+
case 11: return {h: 0, a1: {h: 4, a1: $0.a6.a2.a1, a2: Text_PrettyPrint_Prettyprinter_Doc_n__8712_6699_best($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, {h: 1, a1: $0.a6.a1, a2: $0.a6.a2.a2, a3: {h: 2, a1: $0.a6.a3}})}};
|
|
1116
1176
|
}
|
|
1117
1177
|
}
|
|
1118
1178
|
}
|
|
1119
1179
|
}
|
|
1120
1180
|
|
|
1121
|
-
function
|
|
1181
|
+
function Text_PrettyPrint_Prettyprinter_Doc_n__8712_6699_best($0, $1, $2, $3, $4, $5) {
|
|
1122
1182
|
return __tailRec(x24tcOpt_18, {h: 1, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4, a6: $5});
|
|
1123
1183
|
}
|
|
1124
1184
|
|
|
@@ -1172,7 +1232,7 @@ function x24tcOpt_21($0) {
|
|
|
1172
1232
|
}
|
|
1173
1233
|
}
|
|
1174
1234
|
|
|
1175
|
-
function
|
|
1235
|
+
function Data_String_Extra_with__index_1618($0, $1, $2) {
|
|
1176
1236
|
return __tailRec(x24tcOpt_21, {h: 1, a1: $0, a2: $1, a3: $2});
|
|
1177
1237
|
}
|
|
1178
1238
|
|
|
@@ -1244,18 +1304,34 @@ function x24tcOpt_25($0) {
|
|
|
1244
1304
|
case 0: return {h: 0, a1: {h: 0}};
|
|
1245
1305
|
case undefined: {
|
|
1246
1306
|
switch($0.a1($0.a2.a1)) {
|
|
1247
|
-
case 1: return {h: 0, a1: {a1: $0.a2.a1
|
|
1307
|
+
case 1: return {h: 0, a1: {a1: $0.a2.a1}};
|
|
1248
1308
|
case 0: return {h: 1, a1: $0.a1, a2: $0.a2.a2};
|
|
1249
1309
|
}
|
|
1250
1310
|
}
|
|
1251
1311
|
}
|
|
1252
1312
|
}
|
|
1253
1313
|
|
|
1254
|
-
function
|
|
1314
|
+
function Data_List_find($0, $1) {
|
|
1255
1315
|
return __tailRec(x24tcOpt_25, {h: 1, a1: $0, a2: $1});
|
|
1256
1316
|
}
|
|
1257
1317
|
|
|
1258
1318
|
function x24tcOpt_26($0) {
|
|
1319
|
+
switch($0.a2.h) {
|
|
1320
|
+
case 0: return {h: 0, a1: {h: 0}};
|
|
1321
|
+
case undefined: {
|
|
1322
|
+
switch($0.a1($0.a2.a1)) {
|
|
1323
|
+
case 1: return {h: 0, a1: {a1: $0.a2.a1, a2: Prelude_Types_List_filter($0.a1, $0.a2.a2)}};
|
|
1324
|
+
case 0: return {h: 1, a1: $0.a1, a2: $0.a2.a2};
|
|
1325
|
+
}
|
|
1326
|
+
}
|
|
1327
|
+
}
|
|
1328
|
+
}
|
|
1329
|
+
|
|
1330
|
+
function Prelude_Types_List_filter($0, $1) {
|
|
1331
|
+
return __tailRec(x24tcOpt_26, {h: 1, a1: $0, a2: $1});
|
|
1332
|
+
}
|
|
1333
|
+
|
|
1334
|
+
function x24tcOpt_27($0) {
|
|
1259
1335
|
switch($0.a1) {
|
|
1260
1336
|
case 0n: return {h: 0, a1: $0.a2};
|
|
1261
1337
|
default: {
|
|
@@ -1269,10 +1345,10 @@ function x24tcOpt_26($0) {
|
|
|
1269
1345
|
}
|
|
1270
1346
|
|
|
1271
1347
|
function Data_List_drop($0, $1) {
|
|
1272
|
-
return __tailRec(
|
|
1348
|
+
return __tailRec(x24tcOpt_27, {h: 1, a1: $0, a2: $1});
|
|
1273
1349
|
}
|
|
1274
1350
|
|
|
1275
|
-
function
|
|
1351
|
+
function x24tcOpt_28($0) {
|
|
1276
1352
|
switch($0.a2.h) {
|
|
1277
1353
|
case 0: return {h: 0, a1: $0.a1};
|
|
1278
1354
|
case undefined: return {h: 1, a1: {a1: $0.a2.a1, a2: $0.a1}, a2: $0.a2.a2};
|
|
@@ -1280,27 +1356,27 @@ function x24tcOpt_27($0) {
|
|
|
1280
1356
|
}
|
|
1281
1357
|
|
|
1282
1358
|
function Prelude_Types_List_reverseOnto($0, $1) {
|
|
1283
|
-
return __tailRec(
|
|
1359
|
+
return __tailRec(x24tcOpt_28, {h: 1, a1: $0, a2: $1});
|
|
1284
1360
|
}
|
|
1285
1361
|
|
|
1286
|
-
function
|
|
1362
|
+
function x24tcOpt_29($0) {
|
|
1287
1363
|
switch($0.a2.h) {
|
|
1288
1364
|
case 0: return {h: 0, a1: {h: 0}};
|
|
1289
1365
|
case undefined: {
|
|
1290
1366
|
const $4 = $0.a1($0.a2.a1);
|
|
1291
1367
|
switch($4.h) {
|
|
1292
1368
|
case 0: return {h: 1, a1: $0.a1, a2: $0.a2.a2};
|
|
1293
|
-
case undefined: return {h: 0, a1: {a1: $4.a1, a2:
|
|
1369
|
+
case undefined: return {h: 0, a1: {a1: $4.a1, a2: Prelude_Types_List_mapMaybe($0.a1, $0.a2.a2)}};
|
|
1294
1370
|
}
|
|
1295
1371
|
}
|
|
1296
1372
|
}
|
|
1297
1373
|
}
|
|
1298
1374
|
|
|
1299
|
-
function
|
|
1300
|
-
return __tailRec(
|
|
1375
|
+
function Prelude_Types_List_mapMaybe($0, $1) {
|
|
1376
|
+
return __tailRec(x24tcOpt_29, {h: 1, a1: $0, a2: $1});
|
|
1301
1377
|
}
|
|
1302
1378
|
|
|
1303
|
-
function
|
|
1379
|
+
function x24tcOpt_30($0) {
|
|
1304
1380
|
switch($0.a3.h) {
|
|
1305
1381
|
case 0: return {h: 0, a1: $0.a2};
|
|
1306
1382
|
case undefined: return {h: 1, a1: $0.a1, a2: $0.a1($0.a2)($0.a3.a1), a3: $0.a3.a2};
|
|
@@ -1308,10 +1384,10 @@ function x24tcOpt_29($0) {
|
|
|
1308
1384
|
}
|
|
1309
1385
|
|
|
1310
1386
|
function Prelude_Types_foldl_Foldable_List($0, $1, $2) {
|
|
1311
|
-
return __tailRec(
|
|
1387
|
+
return __tailRec(x24tcOpt_30, {h: 1, a1: $0, a2: $1, a3: $2});
|
|
1312
1388
|
}
|
|
1313
1389
|
|
|
1314
|
-
function
|
|
1390
|
+
function x24tcOpt_31($0) {
|
|
1315
1391
|
switch($0.a1) {
|
|
1316
1392
|
case 0n: return {h: 0, a1: Prelude_Uninhabited_absurd($6 => Data_Nat_uninhabited_Uninhabited_x28x28LTEx20x28Sx20x24nx29x29x20Zx29($6), $0.a2)};
|
|
1317
1393
|
default: {
|
|
@@ -1328,54 +1404,58 @@ function x24tcOpt_30($0) {
|
|
|
1328
1404
|
}
|
|
1329
1405
|
|
|
1330
1406
|
function Data_Nat_LTEImpliesNotGT($0, $1) {
|
|
1331
|
-
return __tailRec(
|
|
1407
|
+
return __tailRec(x24tcOpt_31, {h: 1, a1: $0, a2: $1});
|
|
1332
1408
|
}
|
|
1333
1409
|
|
|
1334
1410
|
const __mainExpression_0 = __lazy(function () {
|
|
1335
1411
|
return PrimIO_unsafePerformIO($2 => Main_main($2));
|
|
1336
1412
|
});
|
|
1337
1413
|
|
|
1338
|
-
const
|
|
1339
|
-
return $0 => $1 => ($0
|
|
1414
|
+
const csegen_3 = __lazy(function () {
|
|
1415
|
+
return b => a => func => $0 => $1 => $2 => Data_Promise_map_Functor_Promise(func, $0, $1, $2);
|
|
1340
1416
|
});
|
|
1341
1417
|
|
|
1342
|
-
const
|
|
1343
|
-
return $
|
|
1418
|
+
const csegen_9 = __lazy(function () {
|
|
1419
|
+
return {a1: csegen_3(), a2: a => $3 => $4 => $5 => Data_Promise_pure_Applicative_Promise($3, $4, $5), a3: b => a => $b => $c => $d => $e => Data_Promise_x3cx2ax3e_Applicative_Promise($b, $c, $d, $e)};
|
|
1344
1420
|
});
|
|
1345
1421
|
|
|
1346
|
-
const
|
|
1347
|
-
return {a1:
|
|
1422
|
+
const csegen_15 = __lazy(function () {
|
|
1423
|
+
return {a1: csegen_9(), a2: b => a => $3 => $4 => $5 => $6 => Data_Promise_x3ex3ex3d_Monad_Promise($3, $4, $5, $6), a3: a => $d => $e => $f => Data_Promise_join_Monad_Promise($d, $e, $f)};
|
|
1348
1424
|
});
|
|
1349
1425
|
|
|
1350
|
-
const
|
|
1351
|
-
return
|
|
1426
|
+
const csegen_18 = __lazy(function () {
|
|
1427
|
+
return $0 => $1 => $2 => $3 => Prelude_Types_map_Functor_Maybe($2, $3);
|
|
1352
1428
|
});
|
|
1353
1429
|
|
|
1354
|
-
const
|
|
1355
|
-
return {a1:
|
|
1430
|
+
const csegen_21 = __lazy(function () {
|
|
1431
|
+
return {a1: csegen_15(), a2: a => $3 => $4 => $5 => $6 => Data_Promise_liftIO_HasIO_Promise($3, $4, $5, $6)};
|
|
1356
1432
|
});
|
|
1357
1433
|
|
|
1358
|
-
const
|
|
1359
|
-
return
|
|
1434
|
+
const csegen_27 = __lazy(function () {
|
|
1435
|
+
return $0 => $1 => ($0+$1);
|
|
1360
1436
|
});
|
|
1361
1437
|
|
|
1362
|
-
const
|
|
1363
|
-
return
|
|
1438
|
+
const csegen_28 = __lazy(function () {
|
|
1439
|
+
return $0 => $1 => ($0*$1);
|
|
1364
1440
|
});
|
|
1365
1441
|
|
|
1366
|
-
const
|
|
1367
|
-
return
|
|
1442
|
+
const csegen_29 = __lazy(function () {
|
|
1443
|
+
return {a1: csegen_27(), a2: csegen_28(), a3: $5 => $5};
|
|
1368
1444
|
});
|
|
1369
1445
|
|
|
1370
|
-
const
|
|
1371
|
-
return {a1:
|
|
1446
|
+
const csegen_30 = __lazy(function () {
|
|
1447
|
+
return {a1: csegen_27(), a2: csegen_28(), a3: $5 => Prelude_Types_prim__integerToNat($5)};
|
|
1372
1448
|
});
|
|
1373
1449
|
|
|
1374
|
-
const
|
|
1375
|
-
return {a1:
|
|
1450
|
+
const csegen_37 = __lazy(function () {
|
|
1451
|
+
return {a1: b => a => func => $1 => Prelude_Types_map_Functor_Maybe(func, $1), a2: a => $6 => ({a1: $6}), a3: b => a => $9 => $a => Prelude_Types_x3cx2ax3e_Applicative_Maybe($9, $a)};
|
|
1376
1452
|
});
|
|
1377
1453
|
|
|
1378
|
-
const
|
|
1454
|
+
const csegen_42 = __lazy(function () {
|
|
1455
|
+
return {a1: csegen_37(), a2: b => a => $3 => $4 => Prelude_Types_x3ex3ex3d_Monad_Maybe($3, $4), a3: a => $9 => Prelude_Types_join_Monad_Maybe($9)};
|
|
1456
|
+
});
|
|
1457
|
+
|
|
1458
|
+
const csegen_52 = __lazy(function () {
|
|
1379
1459
|
const $a = b => a => $b => $c => $d => {
|
|
1380
1460
|
const $e = $b($d);
|
|
1381
1461
|
const $11 = $c($d);
|
|
@@ -1384,216 +1464,228 @@ const csegen_49 = __lazy(function () {
|
|
|
1384
1464
|
return {a1: b => a => func => $1 => $2 => Prelude_IO_map_Functor_IO(func, $1, $2), a2: a => $8 => $9 => $8, a3: $a};
|
|
1385
1465
|
});
|
|
1386
1466
|
|
|
1387
|
-
const
|
|
1467
|
+
const csegen_55 = __lazy(function () {
|
|
1388
1468
|
return b => a => $0 => $1 => $2 => {
|
|
1389
1469
|
const $3 = $0($2);
|
|
1390
1470
|
return $1($3)($2);
|
|
1391
1471
|
};
|
|
1392
1472
|
});
|
|
1393
1473
|
|
|
1394
|
-
const
|
|
1474
|
+
const csegen_59 = __lazy(function () {
|
|
1395
1475
|
const $5 = a => $6 => $7 => {
|
|
1396
1476
|
const $8 = $6($7);
|
|
1397
1477
|
return $8($7);
|
|
1398
1478
|
};
|
|
1399
|
-
const $0 = {a1:
|
|
1479
|
+
const $0 = {a1: csegen_52(), a2: csegen_55(), a3: $5};
|
|
1400
1480
|
return {a1: $0, a2: a => $e => $e};
|
|
1401
1481
|
});
|
|
1402
1482
|
|
|
1403
1483
|
const csegen_62 = __lazy(function () {
|
|
1484
|
+
return {a1: $1 => $2 => ($1+$2), a2: ''};
|
|
1485
|
+
});
|
|
1486
|
+
|
|
1487
|
+
const csegen_77 = __lazy(function () {
|
|
1488
|
+
return {a1: acc => elem => func => init => input => Prelude_Types_foldr_Foldable_List(func, init, input), a2: elem => acc => func => init => input => Prelude_Types_foldl_Foldable_List(func, init, input), a3: elem => $b => Prelude_Types_null_Foldable_List($b), a4: elem => acc => m => $f => funcM => init => input => Prelude_Types_foldlM_Foldable_List($f, funcM, init, input), a5: elem => $16 => $16, a6: a => m => $18 => f => $19 => Prelude_Types_foldMap_Foldable_List($18, f, $19)};
|
|
1489
|
+
});
|
|
1490
|
+
|
|
1491
|
+
const csegen_80 = __lazy(function () {
|
|
1492
|
+
return {a1: csegen_37(), a2: a => ({h: 0}), a3: a => $4 => $5 => Prelude_Types_x3cx7cx3e_Alternative_Maybe($4, $5)};
|
|
1493
|
+
});
|
|
1494
|
+
|
|
1495
|
+
const csegen_85 = __lazy(function () {
|
|
1404
1496
|
return $0 => $1 => $2 => $3 => $4 => Prelude_IO_map_Functor_IO($2, $3, $4);
|
|
1405
1497
|
});
|
|
1406
1498
|
|
|
1407
|
-
const
|
|
1499
|
+
const csegen_91 = __lazy(function () {
|
|
1408
1500
|
const $4 = a => $5 => $6 => {
|
|
1409
1501
|
const $7 = $5($6);
|
|
1410
1502
|
return $7($6);
|
|
1411
1503
|
};
|
|
1412
|
-
return {a1:
|
|
1504
|
+
return {a1: csegen_52(), a2: csegen_55(), a3: $4};
|
|
1413
1505
|
});
|
|
1414
1506
|
|
|
1415
|
-
const
|
|
1507
|
+
const csegen_94 = __lazy(function () {
|
|
1416
1508
|
return {a1: $1 => $2 => Prelude_EqOrd_x3dx3d_Eq_String($1, $2), a2: $7 => $8 => Prelude_EqOrd_x2fx3d_Eq_String($7, $8)};
|
|
1417
1509
|
});
|
|
1418
1510
|
|
|
1419
|
-
const
|
|
1420
|
-
return System_exitSuccess(
|
|
1511
|
+
const csegen_95 = __lazy(function () {
|
|
1512
|
+
return System_exitSuccess(csegen_59());
|
|
1421
1513
|
});
|
|
1422
1514
|
|
|
1423
|
-
const
|
|
1515
|
+
const csegen_103 = __lazy(function () {
|
|
1424
1516
|
return $0 => $1 => $2 => $3 => $4 => $5 => Data_Promise_map_Functor_Promise($2, $3, $4, $5);
|
|
1425
1517
|
});
|
|
1426
1518
|
|
|
1427
|
-
const
|
|
1428
|
-
return {a1:
|
|
1519
|
+
const csegen_111 = __lazy(function () {
|
|
1520
|
+
return {a1: csegen_94(), a2: $3 => $4 => Prelude_EqOrd_compare_Ord_String($3, $4), a3: $9 => $a => Prelude_EqOrd_x3c_Ord_String($9, $a), a4: $f => $10 => Prelude_EqOrd_x3e_Ord_String($f, $10), a5: $15 => $16 => Prelude_EqOrd_x3cx3d_Ord_String($15, $16), a6: $1b => $1c => Prelude_EqOrd_x3ex3d_Ord_String($1b, $1c), a7: $21 => $22 => Prelude_EqOrd_max_Ord_String($21, $22), a8: $27 => $28 => Prelude_EqOrd_min_Ord_String($27, $28)};
|
|
1429
1521
|
});
|
|
1430
1522
|
|
|
1431
|
-
const
|
|
1432
|
-
return
|
|
1523
|
+
const csegen_112 = __lazy(function () {
|
|
1524
|
+
return $0 => Data_List_sort(csegen_111(), $0);
|
|
1433
1525
|
});
|
|
1434
1526
|
|
|
1435
|
-
const
|
|
1436
|
-
return $0 => $1 => $2 => FFI_Concurrency_promiseAll(
|
|
1527
|
+
const csegen_113 = __lazy(function () {
|
|
1528
|
+
return $0 => $1 => $2 => FFI_Concurrency_promiseAll(csegen_77(), $0, $1, $2);
|
|
1437
1529
|
});
|
|
1438
1530
|
|
|
1439
|
-
const
|
|
1531
|
+
const csegen_115 = __lazy(function () {
|
|
1440
1532
|
return {a1: x => Prelude_Show_show_Show_String(x), a2: d => x => Prelude_Show_showPrec_Show_String(d, x)};
|
|
1441
1533
|
});
|
|
1442
1534
|
|
|
1443
|
-
const
|
|
1535
|
+
const csegen_119 = __lazy(function () {
|
|
1444
1536
|
return $0 => $1 => $2 => $3 => Prelude_Types_map_Functor_List($2, $3);
|
|
1445
1537
|
});
|
|
1446
1538
|
|
|
1447
|
-
const
|
|
1448
|
-
return {a1: $1 => $2 => ($1+$2), a2: ''};
|
|
1449
|
-
});
|
|
1450
|
-
|
|
1451
|
-
const csegen_122 = __lazy(function () {
|
|
1539
|
+
const csegen_128 = __lazy(function () {
|
|
1452
1540
|
return $0 => $1 => Data_Promise_pure_Applicative_Promise(undefined, $0, $1);
|
|
1453
1541
|
});
|
|
1454
1542
|
|
|
1455
|
-
const
|
|
1543
|
+
const csegen_134 = __lazy(function () {
|
|
1456
1544
|
return Data_Fin_finFromInteger(100n, Prelude_Types_prim__integerToNat(101n));
|
|
1457
1545
|
});
|
|
1458
1546
|
|
|
1459
|
-
const
|
|
1547
|
+
const csegen_139 = __lazy(function () {
|
|
1460
1548
|
return $0 => $0.a1;
|
|
1461
1549
|
});
|
|
1462
1550
|
|
|
1463
|
-
const
|
|
1551
|
+
const csegen_141 = __lazy(function () {
|
|
1464
1552
|
return $0 => $1 => Data_Date_compare_Ord_Date($0, $1);
|
|
1465
1553
|
});
|
|
1466
1554
|
|
|
1467
|
-
const
|
|
1468
|
-
return $0 => $0.a2;
|
|
1469
|
-
});
|
|
1470
|
-
|
|
1471
|
-
const csegen_152 = __lazy(function () {
|
|
1472
|
-
return $0 => $0.a1;
|
|
1473
|
-
});
|
|
1474
|
-
|
|
1475
|
-
const csegen_157 = __lazy(function () {
|
|
1476
|
-
return $0 => $1 => Prelude_Types_max_Ord_Nat($0, $1);
|
|
1477
|
-
});
|
|
1478
|
-
|
|
1479
|
-
const csegen_161 = __lazy(function () {
|
|
1480
|
-
return $0 => $1 => $2 => $3 => Prelude_Types_map_Functor_Maybe($2, $3);
|
|
1481
|
-
});
|
|
1482
|
-
|
|
1483
|
-
const csegen_162 = __lazy(function () {
|
|
1484
|
-
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}}}));
|
|
1485
|
-
});
|
|
1486
|
-
|
|
1487
|
-
const csegen_186 = __lazy(function () {
|
|
1555
|
+
const csegen_159 = __lazy(function () {
|
|
1488
1556
|
return {a1: {a1: b => a => func => $2 => Control_Monad_ST_map_Functor_x28STx20x24sx29(func, $2), a2: a => $7 => $8 => $7, a3: b => a => $a => $b => $c => Control_Monad_ST_x3cx2ax3e_Applicative_x28STx20x24sx29($a, $b, $c)}, a2: b => a => $12 => $13 => $14 => Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($12, $13, $14), a3: a => $1a => $1b => Control_Monad_ST_join_Monad_x28STx20x24sx29($1a, $1b)};
|
|
1489
1557
|
});
|
|
1490
1558
|
|
|
1491
|
-
const
|
|
1559
|
+
const csegen_172 = __lazy(function () {
|
|
1492
1560
|
return $0 => $1 => Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29($0, $1);
|
|
1493
1561
|
});
|
|
1494
1562
|
|
|
1495
|
-
const
|
|
1563
|
+
const csegen_176 = __lazy(function () {
|
|
1496
1564
|
return {a1: $1 => $2 => Prelude_EqOrd_x3dx3d_Eq_Char($1, $2), a2: $7 => $8 => Prelude_EqOrd_x2fx3d_Eq_Char($7, $8)};
|
|
1497
1565
|
});
|
|
1498
1566
|
|
|
1499
|
-
const
|
|
1567
|
+
const csegen_192 = __lazy(function () {
|
|
1500
1568
|
return $0 => $1 => ({a1: $0, a2: $1});
|
|
1501
1569
|
});
|
|
1502
1570
|
|
|
1503
|
-
const
|
|
1571
|
+
const csegen_193 = __lazy(function () {
|
|
1504
1572
|
return $0 => $1 => $2 => $0($1($2));
|
|
1505
1573
|
});
|
|
1506
1574
|
|
|
1507
|
-
const
|
|
1575
|
+
const csegen_244 = __lazy(function () {
|
|
1508
1576
|
return b => a => $0 => $1 => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($0, $1);
|
|
1509
1577
|
});
|
|
1510
1578
|
|
|
1511
|
-
const
|
|
1579
|
+
const csegen_245 = __lazy(function () {
|
|
1512
1580
|
return a => $0 => Prelude_Types_join_Monad_x28Eitherx20x24ex29($0);
|
|
1513
1581
|
});
|
|
1514
1582
|
|
|
1515
|
-
const
|
|
1583
|
+
const csegen_246 = __lazy(function () {
|
|
1516
1584
|
return $0 => Data_Either_maybeToEither(() => 'Failed to parse JSON', Language_JSON_parse($0));
|
|
1517
1585
|
});
|
|
1518
1586
|
|
|
1519
|
-
const
|
|
1587
|
+
const csegen_249 = __lazy(function () {
|
|
1520
1588
|
return b => a => func => $0 => Text_Bounded_map_Functor_WithBounds(func, $0);
|
|
1521
1589
|
});
|
|
1522
1590
|
|
|
1523
|
-
const
|
|
1591
|
+
const csegen_260 = __lazy(function () {
|
|
1524
1592
|
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)};
|
|
1525
1593
|
});
|
|
1526
1594
|
|
|
1527
|
-
const
|
|
1595
|
+
const csegen_268 = __lazy(function () {
|
|
1528
1596
|
return {a1: $1 => Language_JSON_Tokens_TokType_TokenKind_JSONTokenKind($1), a2: kind => $5 => Language_JSON_Tokens_tokValue_TokenKind_JSONTokenKind(kind, $5)};
|
|
1529
1597
|
});
|
|
1530
1598
|
|
|
1531
|
-
const
|
|
1599
|
+
const csegen_271 = __lazy(function () {
|
|
1532
1600
|
return {a1: $1 => $2 => Language_JSON_Tokens_x3dx3d_Eq_JSONTokenKind($1, $2), a2: $7 => $8 => Language_JSON_Tokens_x2fx3d_Eq_JSONTokenKind($7, $8)};
|
|
1533
1601
|
});
|
|
1534
1602
|
|
|
1535
|
-
const
|
|
1603
|
+
const csegen_307 = __lazy(function () {
|
|
1536
1604
|
return {a1: $1 => Language_JSON_String_Tokens_TokType_TokenKind_JSONStringTokenKind($1), a2: kind => $5 => Language_JSON_String_Tokens_tokValue_TokenKind_JSONStringTokenKind(kind, $5)};
|
|
1537
1605
|
});
|
|
1538
1606
|
|
|
1539
|
-
const
|
|
1607
|
+
const csegen_310 = __lazy(function () {
|
|
1540
1608
|
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)};
|
|
1541
1609
|
});
|
|
1542
1610
|
|
|
1543
|
-
const
|
|
1611
|
+
const csegen_326 = __lazy(function () {
|
|
1544
1612
|
return $0 => $1 => $2 => $3 => Text_Bounded_map_Functor_WithBounds($2, $3);
|
|
1545
1613
|
});
|
|
1546
1614
|
|
|
1547
|
-
const
|
|
1615
|
+
const csegen_328 = __lazy(function () {
|
|
1548
1616
|
return {a1: {a1: 'End of input', a2: {h: 0}}, a2: {h: 0}};
|
|
1549
1617
|
});
|
|
1550
1618
|
|
|
1551
|
-
const
|
|
1552
|
-
return
|
|
1619
|
+
const csegen_380 = __lazy(function () {
|
|
1620
|
+
return $0 => $0.a2;
|
|
1553
1621
|
});
|
|
1554
1622
|
|
|
1555
|
-
const
|
|
1623
|
+
const csegen_383 = __lazy(function () {
|
|
1624
|
+
return $0 => $0.a1;
|
|
1625
|
+
});
|
|
1626
|
+
|
|
1627
|
+
const csegen_388 = __lazy(function () {
|
|
1628
|
+
return $0 => $1 => Prelude_Types_max_Ord_Nat($0, $1);
|
|
1629
|
+
});
|
|
1630
|
+
|
|
1631
|
+
const csegen_390 = __lazy(function () {
|
|
1632
|
+
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
|
+
});
|
|
1634
|
+
|
|
1635
|
+
const csegen_402 = __lazy(function () {
|
|
1636
|
+
return $0 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($0));
|
|
1637
|
+
});
|
|
1638
|
+
|
|
1639
|
+
const csegen_404 = __lazy(function () {
|
|
1640
|
+
return Prelude_IO_getLine(csegen_21());
|
|
1641
|
+
});
|
|
1642
|
+
|
|
1643
|
+
const csegen_434 = __lazy(function () {
|
|
1556
1644
|
return $0 => Language_JSON_Accessors_array($3 => Data_PullRequest_parsePR($3), $0);
|
|
1557
1645
|
});
|
|
1558
1646
|
|
|
1559
|
-
const
|
|
1647
|
+
const csegen_454 = __lazy(function () {
|
|
1560
1648
|
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)};
|
|
1561
1649
|
});
|
|
1562
1650
|
|
|
1563
|
-
const
|
|
1651
|
+
const csegen_458 = __lazy(function () {
|
|
1564
1652
|
return b => a => f => $0 => $1 => $2 => Prelude_Types_traverse_Traversable_x28Eitherx20x24ex29($0, $1, $2);
|
|
1565
1653
|
});
|
|
1566
1654
|
|
|
1567
|
-
const
|
|
1655
|
+
const csegen_471 = __lazy(function () {
|
|
1568
1656
|
return $0 => $0.a1;
|
|
1569
1657
|
});
|
|
1570
1658
|
|
|
1571
|
-
const
|
|
1572
|
-
return $0 => $1 => $2 => Data_Promise_either(
|
|
1659
|
+
const csegen_479 = __lazy(function () {
|
|
1660
|
+
return $0 => $1 => $2 => Data_Promise_either(csegen_115(), Data_PullRequest_parsePullRequestsString($0), $1, $2);
|
|
1573
1661
|
});
|
|
1574
1662
|
|
|
1575
|
-
const
|
|
1576
|
-
return $0 => $1 => $2 => Data_Promise_either(
|
|
1663
|
+
const csegen_480 = __lazy(function () {
|
|
1664
|
+
return $0 => $1 => $2 => Data_Promise_either(csegen_115(), Data_User_parseUserString($0), $1, $2);
|
|
1577
1665
|
});
|
|
1578
1666
|
|
|
1579
|
-
const
|
|
1667
|
+
const csegen_513 = __lazy(function () {
|
|
1580
1668
|
return {a1: $1 => $2 => _add32s($1, $2), a2: $6 => $7 => _mul32s($6, $7), a3: $b => Number(_truncBigInt32($b))};
|
|
1581
1669
|
});
|
|
1582
1670
|
|
|
1583
|
-
const
|
|
1671
|
+
const csegen_528 = __lazy(function () {
|
|
1584
1672
|
return $0 => $0.a2;
|
|
1585
1673
|
});
|
|
1586
1674
|
|
|
1587
|
-
const
|
|
1675
|
+
const csegen_532 = __lazy(function () {
|
|
1588
1676
|
return $0 => $0.a1;
|
|
1589
1677
|
});
|
|
1590
1678
|
|
|
1591
|
-
const
|
|
1592
|
-
return Prelude_Interfaces_x3cx24x3e(
|
|
1679
|
+
const csegen_535 = __lazy(function () {
|
|
1680
|
+
return Prelude_Interfaces_x3cx24x3e(csegen_103(), $4 => Prelude_Cast_cast_Cast_Integer_Bits32($4), System_time(csegen_21()));
|
|
1593
1681
|
});
|
|
1594
1682
|
|
|
1595
|
-
const
|
|
1596
|
-
return {a1:
|
|
1683
|
+
const csegen_539 = __lazy(function () {
|
|
1684
|
+
return {a1: csegen_21(), a2: {a1: x => Data_Config_show_Show_Config(x), a2: d => x => Data_Config_showPrec_Show_Config(d, x)}};
|
|
1685
|
+
});
|
|
1686
|
+
|
|
1687
|
+
const csegen_564 = __lazy(function () {
|
|
1688
|
+
return {a1: {a1: '--checkout', a2: {a1: '-c', a2: {h: 0}}}};
|
|
1597
1689
|
});
|
|
1598
1690
|
|
|
1599
1691
|
function prim__add_Integer($0, $1) {
|
|
@@ -1608,60 +1700,66 @@ function prim__mul_Integer($0, $1) {
|
|
|
1608
1700
|
return ($0*$1);
|
|
1609
1701
|
}
|
|
1610
1702
|
|
|
1611
|
-
function
|
|
1612
|
-
|
|
1703
|
+
function Main_case__contribute_2186($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a) {
|
|
1704
|
+
const $c = Data_List_headx27(Data_List_drop($6, Prelude_Types_List_tailRecAppend($a.a1, $a.a2)));
|
|
1705
|
+
switch($c.h) {
|
|
1706
|
+
case 0: return $16 => $17 => Data_Promise_reject('No open PRs to review!', $16, $17);
|
|
1613
1707
|
case undefined: {
|
|
1614
|
-
|
|
1615
|
-
|
|
1616
|
-
|
|
1617
|
-
|
|
1618
|
-
|
|
1619
|
-
case 0: return csegen_21();
|
|
1620
|
-
}
|
|
1708
|
+
const $1f = $20 => $21 => {
|
|
1709
|
+
const $22 = Prelude_Interfaces_x24x3e(csegen_18(), $7, $c.a1.a6);
|
|
1710
|
+
switch($22.h) {
|
|
1711
|
+
case undefined: return FFI_Git_checkoutBranch($0, $22.a1, $20, $21);
|
|
1712
|
+
case 0: return Data_Promise_pure_Applicative_Promise(undefined, $20, $21);
|
|
1621
1713
|
}
|
|
1622
|
-
|
|
1623
|
-
|
|
1714
|
+
};
|
|
1715
|
+
return Prelude_Interfaces_x3ex3e(csegen_15(), $1f, () => Prelude_IO_putStrLn(csegen_21(), Data_PullRequest_rf__webURI($3, $c.a1)));
|
|
1624
1716
|
}
|
|
1625
|
-
default: return csegen_21();
|
|
1626
1717
|
}
|
|
1627
1718
|
}
|
|
1628
1719
|
|
|
1629
|
-
function
|
|
1720
|
+
function Main_n__6408_1831_putNameLn($0, $1, $2, $3) {
|
|
1630
1721
|
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}}}});
|
|
1631
1722
|
}
|
|
1632
1723
|
|
|
1633
|
-
function
|
|
1634
|
-
switch($3.h) {
|
|
1635
|
-
case 0: return $5 => $6 => Data_Promise_reject('No open PRs to review!', $5, $6);
|
|
1636
|
-
case undefined: return Prelude_IO_putStrLn(csegen_20(), $3.a1);
|
|
1637
|
-
}
|
|
1638
|
-
}
|
|
1639
|
-
|
|
1640
|
-
function Main_n__5697_2617_partitionedArgs($0, $1, $2, $3, $4) {
|
|
1724
|
+
function Main_n__6276_1721_partitionedArgs($0, $1, $2, $3, $4) {
|
|
1641
1725
|
const $5 = Data_List_partition($8 => Data_String_isPrefixOf('+', $8), $4);
|
|
1642
1726
|
return {a1: Prelude_Types_map_Functor_List($11 => Data_String_Extra_drop(1n, $11), $5.a1), a2: $5.a2};
|
|
1643
1727
|
}
|
|
1644
1728
|
|
|
1645
|
-
function
|
|
1646
|
-
|
|
1729
|
+
function Main_n__6956_2384_parseSkipArg($0, $1) {
|
|
1730
|
+
const $2 = Prelude_Types_fastUnpack($1);
|
|
1731
|
+
switch($2.h) {
|
|
1732
|
+
case undefined: {
|
|
1733
|
+
switch($2.a1) {
|
|
1734
|
+
case '-': return Prelude_Types_map_Functor_Maybe($8 => ({a1: Prelude_Cast_cast_Cast_Integer_Nat($8)}), Data_String_parsePositive(csegen_29(), Prelude_Types_fastPack($2.a2)));
|
|
1735
|
+
default: return {h: 0};
|
|
1736
|
+
}
|
|
1737
|
+
}
|
|
1738
|
+
default: return {h: 0};
|
|
1739
|
+
}
|
|
1740
|
+
}
|
|
1741
|
+
|
|
1742
|
+
function Main_n__7155_2644_parsePg($0, $1, $2, $3, $4, $5) {
|
|
1743
|
+
return Data_String_parsePositive(csegen_30(), $5);
|
|
1647
1744
|
}
|
|
1648
1745
|
|
|
1649
|
-
function
|
|
1650
|
-
return Prelude_Interfaces_x3cx3dx3c(
|
|
1746
|
+
function Main_n__7155_2643_parseLim($0, $1, $2, $3, $4) {
|
|
1747
|
+
return Prelude_Interfaces_x3cx3dx3c(csegen_42(), x => Data_Fin_natToFin(x, Prelude_Types_prim__integerToNat(101n)), $f => Data_String_parsePositive(csegen_30(), $f));
|
|
1651
1748
|
}
|
|
1652
1749
|
|
|
1653
|
-
function
|
|
1654
|
-
switch(
|
|
1655
|
-
case
|
|
1656
|
-
case
|
|
1750
|
+
function Main_n__6956_2383_parseCheckoutArg($0, $1) {
|
|
1751
|
+
switch($1) {
|
|
1752
|
+
case '-c': return {a1: {h: 0}};
|
|
1753
|
+
case '--checkout': return {a1: {h: 0}};
|
|
1754
|
+
default: return {h: 0};
|
|
1657
1755
|
}
|
|
1658
1756
|
}
|
|
1659
1757
|
|
|
1660
|
-
function
|
|
1661
|
-
return FFI_Concurrency_fork(
|
|
1758
|
+
function Main_n__6408_1830_forkedUser($0, $1, $2, $3) {
|
|
1759
|
+
return FFI_Concurrency_fork(csegen_21(), ('user --json '+$3));
|
|
1662
1760
|
}
|
|
1663
1761
|
|
|
1664
|
-
function
|
|
1762
|
+
function Main_n__6146_1583_configuredOpts($0, $1, $2) {
|
|
1665
1763
|
const $10 = $11 => {
|
|
1666
1764
|
switch($11.h) {
|
|
1667
1765
|
case 1: return $0.a1.a1.a2(undefined)(BashCompletion_opts($11.a1, $2, $1));
|
|
@@ -1671,6 +1769,13 @@ function Main_n__5567_2479_configuredOpts($0, $1, $2) {
|
|
|
1671
1769
|
return $0.a1.a2(undefined)(undefined)(Config_loadConfig($0, 0, {h: 0}))($10);
|
|
1672
1770
|
}
|
|
1673
1771
|
|
|
1772
|
+
function Main_skipArg($0) {
|
|
1773
|
+
switch($0.h) {
|
|
1774
|
+
case undefined: return {a1: $0.a1};
|
|
1775
|
+
default: return {h: 0};
|
|
1776
|
+
}
|
|
1777
|
+
}
|
|
1778
|
+
|
|
1674
1779
|
function Main_shouldUseColors($0) {
|
|
1675
1780
|
const $e = tty => {
|
|
1676
1781
|
const $1b = noColors => {
|
|
@@ -1693,61 +1798,107 @@ function Main_shouldUseColors($0) {
|
|
|
1693
1798
|
}
|
|
1694
1799
|
|
|
1695
1800
|
function Main_resolvex27x27($0) {
|
|
1696
|
-
return Data_Promise_resolvex27($3 => $4 => $3, $6 => Main_exitError(
|
|
1801
|
+
return Data_Promise_resolvex27($3 => $4 => $3, $6 => Main_exitError(csegen_59(), $6), $0);
|
|
1802
|
+
}
|
|
1803
|
+
|
|
1804
|
+
function Main_printCurrentBranchURI($0, $1, $2, $3) {
|
|
1805
|
+
const $c = branch => {
|
|
1806
|
+
const $d = $0.a2;
|
|
1807
|
+
const $f = $0.a3;
|
|
1808
|
+
const $11 = Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'https://github.com/', a2: {a1: $d, a2: {a1: '/', a2: {a1: $f, a2: {a1: '/tree/', a2: {a1: branch, a2: {h: 0}}}}}}});
|
|
1809
|
+
return Prelude_IO_putStrLn(csegen_21(), $11);
|
|
1810
|
+
};
|
|
1811
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise($6 => $7 => FFI_Git_currentBranch($1, $6, $7), $c, $2, $3);
|
|
1812
|
+
}
|
|
1813
|
+
|
|
1814
|
+
function Main_parseContributeArgs($0) {
|
|
1815
|
+
switch($0.h) {
|
|
1816
|
+
case 0: return {h: 1, a1: {h: 0}};
|
|
1817
|
+
case undefined: {
|
|
1818
|
+
switch($0.a2.h) {
|
|
1819
|
+
case undefined: {
|
|
1820
|
+
switch($0.a2.a2.h) {
|
|
1821
|
+
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
|
+
default: {
|
|
1823
|
+
const $6 = Prelude_Types_traverse_Traversable_List(csegen_37(), $b => Main_x3cx7cx7cx3e(csegen_80(), $10 => Main_n__6956_2384_parseSkipArg($0, $10), $15 => Main_n__6956_2383_parseCheckoutArg($0, $15), $b), $0);
|
|
1824
|
+
switch($6.h) {
|
|
1825
|
+
case undefined: return {h: 1, a1: $6.a1};
|
|
1826
|
+
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.'};
|
|
1827
|
+
}
|
|
1828
|
+
}
|
|
1829
|
+
}
|
|
1830
|
+
}
|
|
1831
|
+
default: {
|
|
1832
|
+
const $1d = Prelude_Types_traverse_Traversable_List(csegen_37(), $22 => Main_x3cx7cx7cx3e(csegen_80(), $27 => Main_n__6956_2384_parseSkipArg($0, $27), $2c => Main_n__6956_2383_parseCheckoutArg($0, $2c), $22), $0);
|
|
1833
|
+
switch($1d.h) {
|
|
1834
|
+
case undefined: return {h: 1, a1: $1d.a1};
|
|
1835
|
+
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.'};
|
|
1836
|
+
}
|
|
1837
|
+
}
|
|
1838
|
+
}
|
|
1839
|
+
}
|
|
1840
|
+
default: {
|
|
1841
|
+
const $34 = Prelude_Types_traverse_Traversable_List(csegen_37(), $39 => Main_x3cx7cx7cx3e(csegen_80(), $3e => Main_n__6956_2384_parseSkipArg($0, $3e), $43 => Main_n__6956_2383_parseCheckoutArg($0, $43), $39), $0);
|
|
1842
|
+
switch($34.h) {
|
|
1843
|
+
case undefined: return {h: 1, a1: $34.a1};
|
|
1844
|
+
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.'};
|
|
1845
|
+
}
|
|
1846
|
+
}
|
|
1847
|
+
}
|
|
1697
1848
|
}
|
|
1698
1849
|
|
|
1699
1850
|
function Main_main($0) {
|
|
1700
|
-
const $1 = Main_shouldUseColors(
|
|
1701
|
-
const $7 = System_getEnv(
|
|
1702
|
-
const $e = Prelude_Interfaces_x3cx24x3e(
|
|
1851
|
+
const $1 = Main_shouldUseColors(csegen_59())($0);
|
|
1852
|
+
const $7 = System_getEnv(csegen_59(), 'EDITOR')($0);
|
|
1853
|
+
const $e = Prelude_Interfaces_x3cx24x3e(csegen_85(), $14 => Data_List_drop(2n, $14), System_getArgs(csegen_59()))($0);
|
|
1703
1854
|
let $25;
|
|
1704
|
-
switch(Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29(
|
|
1855
|
+
switch(Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29(csegen_94(), $e, {a1: 'help', a2: {h: 0}})) {
|
|
1705
1856
|
case 1: {
|
|
1706
1857
|
$25 = 1;
|
|
1707
1858
|
break;
|
|
1708
1859
|
}
|
|
1709
1860
|
case 0: {
|
|
1710
|
-
$25 = Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29(
|
|
1861
|
+
$25 = Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29(csegen_94(), $e, {a1: '--help', a2: {h: 0}});
|
|
1711
1862
|
break;
|
|
1712
1863
|
}
|
|
1713
1864
|
}
|
|
1714
|
-
const $21 = Prelude_Interfaces_when(
|
|
1865
|
+
const $21 = Prelude_Interfaces_when(csegen_52(), $25, () => Prelude_Interfaces_x3ex3e(csegen_91(), Prelude_IO_putStrLn(csegen_59(), Help_help($1)), () => csegen_95()));
|
|
1715
1866
|
const $42 = () => {
|
|
1716
1867
|
let $4a;
|
|
1717
|
-
switch(Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29(
|
|
1868
|
+
switch(Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29(csegen_94(), $e, {a1: 'version', a2: {h: 0}})) {
|
|
1718
1869
|
case 1: {
|
|
1719
1870
|
$4a = 1;
|
|
1720
1871
|
break;
|
|
1721
1872
|
}
|
|
1722
1873
|
case 0: {
|
|
1723
|
-
$4a = Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29(
|
|
1874
|
+
$4a = Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29(csegen_94(), $e, {a1: '--version', a2: {h: 0}});
|
|
1724
1875
|
break;
|
|
1725
1876
|
}
|
|
1726
1877
|
}
|
|
1727
|
-
const $46 = Prelude_Interfaces_when(
|
|
1728
|
-
return Prelude_Interfaces_x3ex3e(
|
|
1729
|
-
const $66 = System_getEnv(
|
|
1878
|
+
const $46 = Prelude_Interfaces_when(csegen_52(), $4a, () => Prelude_Interfaces_x3ex3e(csegen_91(), AppVersion_printVersion(csegen_59()), () => csegen_95()));
|
|
1879
|
+
return Prelude_Interfaces_x3ex3e(csegen_91(), $46, () => $65 => {
|
|
1880
|
+
const $66 = System_getEnv(csegen_59(), 'GITHUB_PAT')($65);
|
|
1730
1881
|
switch($66.h) {
|
|
1731
1882
|
case undefined: {
|
|
1732
1883
|
const $6e = FFI_GitHub_octokit($66.a1)($65);
|
|
1733
|
-
const $73 = FFI_Git_git(
|
|
1884
|
+
const $73 = FFI_Git_git(csegen_59())($65);
|
|
1734
1885
|
return Main_handleArgs($73, $6e, $1, $7, $e)($65);
|
|
1735
1886
|
}
|
|
1736
|
-
case 0: return Main_exitError(
|
|
1887
|
+
case 0: return Main_exitError(csegen_59(), 'GITHUB_PAT environment variable must be set to a personal access token.')($65);
|
|
1737
1888
|
}
|
|
1738
1889
|
});
|
|
1739
1890
|
};
|
|
1740
|
-
const $1d = Prelude_Interfaces_x3ex3e(
|
|
1891
|
+
const $1d = Prelude_Interfaces_x3ex3e(csegen_91(), $21, $42);
|
|
1741
1892
|
return $1d($0);
|
|
1742
1893
|
}
|
|
1743
1894
|
|
|
1744
1895
|
function Main_listTeam($0, $1, $2, $3, $4) {
|
|
1745
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(
|
|
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 => Main_n__6408_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__6408_1831_putNameLn($1, $2, $0, $49), teamMembers))), $29, $2a), $13, $14), $3, $4);
|
|
1746
1897
|
}
|
|
1747
1898
|
|
|
1748
1899
|
function Main_handleConfiguredArgs($0, $1, $2, $3) {
|
|
1749
1900
|
switch($3.h) {
|
|
1750
|
-
case 0: return Prelude_IO_putStrLn(
|
|
1901
|
+
case 0: return Prelude_IO_putStrLn(csegen_21(), Help_help(Data_Config_rf__colors($0)));
|
|
1751
1902
|
case undefined: {
|
|
1752
1903
|
switch($3.a1) {
|
|
1753
1904
|
case 'reviews': {
|
|
@@ -1761,24 +1912,24 @@ function Main_handleConfiguredArgs($0, $1, $2, $3) {
|
|
|
1761
1912
|
switch($3.a2.a2.a2.h) {
|
|
1762
1913
|
case 0: {
|
|
1763
1914
|
return $13 => {
|
|
1764
|
-
const $14 = Data_String_parsePositive(
|
|
1915
|
+
const $14 = Data_String_parsePositive(csegen_29(), $3.a2.a2.a1);
|
|
1765
1916
|
switch($14.h) {
|
|
1766
|
-
case undefined: return Data_Promise_x3ex3ex3d_Monad_Promise($1b => $1c => FFI_GitHub_listPullReviewsJsonStr($2, $0.a2, $0.a3, $14.a1, $1b, $1c), reviewsJsonStr => Prelude_IO_putStr(
|
|
1917
|
+
case undefined: return Data_Promise_x3ex3ex3d_Monad_Promise($1b => $1c => FFI_GitHub_listPullReviewsJsonStr($2, $0.a2, $0.a3, $14.a1, $1b, $1c), reviewsJsonStr => Prelude_IO_putStr(csegen_21(), reviewsJsonStr), $11, $13);
|
|
1767
1918
|
case 0: return Data_Promise_pure_Applicative_Promise(undefined, $11, $13);
|
|
1768
1919
|
}
|
|
1769
1920
|
};
|
|
1770
1921
|
}
|
|
1771
|
-
default: return $31 => Data_Promise_reject(Prelude_Interfaces_concat(
|
|
1922
|
+
default: return $31 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $11, $31);
|
|
1772
1923
|
}
|
|
1773
1924
|
};
|
|
1774
1925
|
}
|
|
1775
|
-
default: return $46 => $47 => Data_Promise_reject(Prelude_Interfaces_concat(
|
|
1926
|
+
default: return $46 => $47 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $46, $47);
|
|
1776
1927
|
}
|
|
1777
1928
|
}
|
|
1778
|
-
default: return $5c => $5d => Data_Promise_reject(Prelude_Interfaces_concat(
|
|
1929
|
+
default: return $5c => $5d => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $5c, $5d);
|
|
1779
1930
|
}
|
|
1780
1931
|
}
|
|
1781
|
-
default: return $72 => $73 => Data_Promise_reject(Prelude_Interfaces_concat(
|
|
1932
|
+
default: return $72 => $73 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $72, $73);
|
|
1782
1933
|
}
|
|
1783
1934
|
}
|
|
1784
1935
|
case 'pulls': {
|
|
@@ -1792,27 +1943,27 @@ function Main_handleConfiguredArgs($0, $1, $2, $3) {
|
|
|
1792
1943
|
case undefined: {
|
|
1793
1944
|
switch($3.a2.a2.a2.a2.h) {
|
|
1794
1945
|
case 0: {
|
|
1795
|
-
const $8d = Prelude_Types_x3cx2ax3e_Applicative_Maybe(Prelude_Types_x3cx2ax3e_Applicative_Maybe({a1: $93 => $94 => ({a1: $93, a2: $94})},
|
|
1946
|
+
const $8d = Prelude_Types_x3cx2ax3e_Applicative_Maybe(Prelude_Types_x3cx2ax3e_Applicative_Maybe({a1: $93 => $94 => ({a1: $93, a2: $94})}, Main_n__7155_2643_parseLim($1, $2, $3.a2.a2.a1, $3.a2.a2.a2.a1, $0)($3.a2.a2.a1)), Main_n__7155_2644_parsePg($1, $2, $3.a2.a2.a1, $3.a2.a2.a2.a1, $0, $3.a2.a2.a2.a1));
|
|
1796
1947
|
return $a8 => $a9 => {
|
|
1797
1948
|
switch($8d.h) {
|
|
1798
|
-
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(
|
|
1949
|
+
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);
|
|
1799
1950
|
case 0: return Data_Promise_pure_Applicative_Promise(undefined, $a8, $a9);
|
|
1800
1951
|
}
|
|
1801
1952
|
};
|
|
1802
1953
|
}
|
|
1803
|
-
default: return $c2 => $c3 => Data_Promise_reject(Prelude_Interfaces_concat(
|
|
1954
|
+
default: return $c2 => $c3 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $c2, $c3);
|
|
1804
1955
|
}
|
|
1805
1956
|
}
|
|
1806
|
-
default: return $d8 => $d9 => Data_Promise_reject(Prelude_Interfaces_concat(
|
|
1957
|
+
default: return $d8 => $d9 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $d8, $d9);
|
|
1807
1958
|
}
|
|
1808
1959
|
}
|
|
1809
|
-
default: return $ee => $ef => Data_Promise_reject(Prelude_Interfaces_concat(
|
|
1960
|
+
default: return $ee => $ef => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $ee, $ef);
|
|
1810
1961
|
}
|
|
1811
1962
|
}
|
|
1812
|
-
default: return $104 => $105 => Data_Promise_reject(Prelude_Interfaces_concat(
|
|
1963
|
+
default: return $104 => $105 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $104, $105);
|
|
1813
1964
|
}
|
|
1814
1965
|
}
|
|
1815
|
-
default: return $11a => $11b => Data_Promise_reject(Prelude_Interfaces_concat(
|
|
1966
|
+
default: return $11a => $11b => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $11a, $11b);
|
|
1816
1967
|
}
|
|
1817
1968
|
}
|
|
1818
1969
|
case 'user': {
|
|
@@ -1825,143 +1976,154 @@ function Main_handleConfiguredArgs($0, $1, $2, $3) {
|
|
|
1825
1976
|
case undefined: {
|
|
1826
1977
|
return $134 => {
|
|
1827
1978
|
switch($3.a2.a2.a2.h) {
|
|
1828
|
-
case 0: return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_getUser($2)($3.a2.a2.a1), $13d => Prelude_IO_print({a1:
|
|
1829
|
-
default: return Data_Promise_reject(Prelude_Interfaces_concat(
|
|
1979
|
+
case 0: return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_getUser($2)($3.a2.a2.a1), $13d => Prelude_IO_print({a1: csegen_21(), a2: {a1: x => Language_JSON_Data_show_Show_JSON(x), a2: d => x => Language_JSON_Data_showPrec_Show_JSON(d, x)}}, Data_User_json($13d)), $132, $134);
|
|
1980
|
+
default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $132, $134);
|
|
1830
1981
|
}
|
|
1831
1982
|
};
|
|
1832
1983
|
}
|
|
1833
|
-
default: return $163 => Data_Promise_reject(Prelude_Interfaces_concat(
|
|
1984
|
+
default: return $163 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $132, $163);
|
|
1834
1985
|
}
|
|
1835
1986
|
};
|
|
1836
1987
|
}
|
|
1837
|
-
default: return $178 => $179 => Data_Promise_reject(Prelude_Interfaces_concat(
|
|
1988
|
+
default: return $178 => $179 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $178, $179);
|
|
1838
1989
|
}
|
|
1839
1990
|
}
|
|
1840
|
-
default: return $18e => $18f => Data_Promise_reject(Prelude_Interfaces_concat(
|
|
1991
|
+
default: return $18e => $18f => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $18e, $18f);
|
|
1841
1992
|
}
|
|
1842
1993
|
}
|
|
1843
|
-
case '
|
|
1994
|
+
case 'whoami': {
|
|
1844
1995
|
return $1a4 => $1a5 => {
|
|
1845
1996
|
switch($3.a2.h) {
|
|
1846
|
-
case 0: return
|
|
1847
|
-
default: return Data_Promise_reject(Prelude_Interfaces_concat(
|
|
1997
|
+
case 0: return User_Me_printInfoOnSelf($0, $2, $1, $1a4, $1a5);
|
|
1998
|
+
default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $1a4, $1a5);
|
|
1999
|
+
}
|
|
2000
|
+
};
|
|
2001
|
+
}
|
|
2002
|
+
case 'sync': {
|
|
2003
|
+
return $1c1 => $1c2 => {
|
|
2004
|
+
switch($3.a2.h) {
|
|
2005
|
+
case 0: return Data_Promise_map_Functor_Promise($1c6 => (undefined), $1c8 => $1c9 => Config_syncConfig($0, $2, 1, $1c8, $1c9), $1c1, $1c2);
|
|
2006
|
+
default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $1c1, $1c2);
|
|
2007
|
+
}
|
|
2008
|
+
};
|
|
2009
|
+
}
|
|
2010
|
+
case 'branch': {
|
|
2011
|
+
return $1e6 => {
|
|
2012
|
+
switch($3.a2.h) {
|
|
2013
|
+
case 0: return $1e8 => Main_printCurrentBranchURI($0, $1, $1e6, $1e8);
|
|
2014
|
+
default: return $1ee => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $1e6, $1ee);
|
|
1848
2015
|
}
|
|
1849
2016
|
};
|
|
1850
2017
|
}
|
|
1851
2018
|
case 'pr': {
|
|
1852
|
-
return $
|
|
2019
|
+
return $203 => $204 => {
|
|
1853
2020
|
switch($3.a2.h) {
|
|
1854
2021
|
case 0: {
|
|
1855
|
-
const $
|
|
1856
|
-
switch($
|
|
2022
|
+
const $21f = $220 => {
|
|
2023
|
+
switch($220.h) {
|
|
1857
2024
|
case undefined: {
|
|
1858
|
-
switch($
|
|
1859
|
-
case 0: return Prelude_IO_putStrLn(
|
|
1860
|
-
default: return
|
|
2025
|
+
switch($220.a1) {
|
|
2026
|
+
case 0: return Prelude_IO_putStrLn(csegen_21(), Data_PullRequest_rf__webURI($0, $220.a2));
|
|
2027
|
+
default: return csegen_128();
|
|
1861
2028
|
}
|
|
1862
2029
|
}
|
|
1863
|
-
default: return
|
|
2030
|
+
default: return csegen_128();
|
|
1864
2031
|
}
|
|
1865
2032
|
};
|
|
1866
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise($
|
|
2033
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise($208 => $209 => Data_Promise_x3ex3ex3d_Monad_Promise($20c => $20d => FFI_Git_currentBranch($1, $20c, $20d), $213 => $214 => $215 => PullRequest_identifyOrCreatePR($0, $1, $2, $213, $214, $215), $208, $209), $21f, $203, $204);
|
|
1867
2034
|
}
|
|
1868
|
-
default: return Data_Promise_reject(Prelude_Interfaces_concat(
|
|
2035
|
+
default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $203, $204);
|
|
1869
2036
|
}
|
|
1870
2037
|
};
|
|
1871
2038
|
}
|
|
1872
2039
|
case 'reflect': {
|
|
1873
|
-
return $
|
|
2040
|
+
return $242 => $243 => {
|
|
1874
2041
|
switch($3.a2.h) {
|
|
1875
|
-
case 0: return User_Reflect_reflectOnSelf($0, $2, $
|
|
1876
|
-
default: return Data_Promise_reject(Prelude_Interfaces_concat(
|
|
2042
|
+
case 0: return User_Reflect_reflectOnSelf($0, $2, $242, $243);
|
|
2043
|
+
default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $242, $243);
|
|
1877
2044
|
}
|
|
1878
2045
|
};
|
|
1879
2046
|
}
|
|
1880
2047
|
case 'config': {
|
|
1881
2048
|
switch($3.a2.h) {
|
|
1882
2049
|
case undefined: {
|
|
1883
|
-
return $
|
|
2050
|
+
return $25f => {
|
|
1884
2051
|
switch($3.a2.a2.h) {
|
|
1885
|
-
case 0: return $
|
|
2052
|
+
case 0: return $261 => Data_Promise_x3ex3ex3d_Monad_Promise($264 => Config_getConfig($0, $3.a2.a1, $264), value => Prelude_IO_putStrLn(csegen_21(), value), $25f, $261);
|
|
1886
2053
|
case undefined: {
|
|
1887
|
-
return $
|
|
2054
|
+
return $270 => {
|
|
1888
2055
|
switch($3.a2.a2.a2.h) {
|
|
1889
|
-
case 0: return Data_Promise_map_Functor_Promise($
|
|
1890
|
-
default: return Data_Promise_reject(Prelude_Interfaces_concat(
|
|
2056
|
+
case 0: return Data_Promise_map_Functor_Promise($274 => (undefined), Config_setConfig($0, $3.a2.a1, $3.a2.a2.a1), $25f, $270);
|
|
2057
|
+
default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $25f, $270);
|
|
1891
2058
|
}
|
|
1892
2059
|
};
|
|
1893
2060
|
}
|
|
1894
|
-
default: return $
|
|
2061
|
+
default: return $290 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $25f, $290);
|
|
1895
2062
|
}
|
|
1896
2063
|
};
|
|
1897
2064
|
}
|
|
1898
|
-
default: return $
|
|
2065
|
+
default: return $2a5 => $2a6 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $2a5, $2a6);
|
|
1899
2066
|
}
|
|
1900
2067
|
}
|
|
1901
2068
|
case 'contribute': {
|
|
1902
|
-
|
|
1903
|
-
|
|
1904
|
-
case
|
|
1905
|
-
|
|
1906
|
-
case 0: return Main_case__handleConfiguredArgs_3520($0, $1, $2, $3.a2.a1, Prelude_Types_fastUnpack($3.a2.a1));
|
|
1907
|
-
default: return $293 => $294 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_107(), $3), a2: {a1: '.', a2: {h: 0}}}}), $293, $294);
|
|
1908
|
-
}
|
|
1909
|
-
}
|
|
1910
|
-
default: return $2a9 => $2aa => Data_Promise_reject(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_107(), $3), a2: {a1: '.', a2: {h: 0}}}}), $2a9, $2aa);
|
|
2069
|
+
const $2bb = Main_parseContributeArgs($3.a2);
|
|
2070
|
+
switch($2bb.h) {
|
|
2071
|
+
case 1: return $2be => $2bf => Main_contribute($0, $1, $2, $2bb.a1, $2be, $2bf);
|
|
2072
|
+
case 0: return Main_exitError(csegen_21(), $2bb.a1);
|
|
1911
2073
|
}
|
|
1912
2074
|
}
|
|
1913
2075
|
case 'list': {
|
|
1914
2076
|
switch($3.a2.h) {
|
|
1915
|
-
case 0: return $
|
|
2077
|
+
case 0: return $2cc => $2cd => Data_Promise_reject('The list command expects the name of a GitHub Team as an argument.', $2cc, $2cd);
|
|
1916
2078
|
case undefined: {
|
|
1917
|
-
return $
|
|
2079
|
+
return $2d2 => {
|
|
1918
2080
|
switch($3.a2.a2.h) {
|
|
1919
|
-
case 0: return $
|
|
1920
|
-
default: return $
|
|
2081
|
+
case 0: return $2d4 => Main_listTeam($0, $2, $3.a2.a1, $2d2, $2d4);
|
|
2082
|
+
default: return $2db => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $2d2, $2db);
|
|
1921
2083
|
}
|
|
1922
2084
|
};
|
|
1923
2085
|
}
|
|
1924
|
-
default: return $
|
|
2086
|
+
default: return $2f0 => $2f1 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $2f0, $2f1);
|
|
1925
2087
|
}
|
|
1926
2088
|
}
|
|
1927
2089
|
case 'graph': {
|
|
1928
2090
|
switch($3.a2.h) {
|
|
1929
|
-
case 0: return $
|
|
2091
|
+
case 0: return $307 => $308 => Data_Promise_reject('The graph command expects the name of a GitHub Team as an argument.', $307, $308);
|
|
1930
2092
|
case undefined: {
|
|
1931
|
-
return $
|
|
2093
|
+
return $30d => {
|
|
1932
2094
|
switch($3.a2.a2.h) {
|
|
1933
|
-
case 0: return $
|
|
1934
|
-
default: return $
|
|
2095
|
+
case 0: return $30f => Main_graphTeam($0, $2, $3.a2.a1, $30d, $30f);
|
|
2096
|
+
default: return $316 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $30d, $316);
|
|
1935
2097
|
}
|
|
1936
2098
|
};
|
|
1937
2099
|
}
|
|
1938
|
-
default: return $
|
|
2100
|
+
default: return $32b => $32c => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $32b, $32c);
|
|
1939
2101
|
}
|
|
1940
2102
|
}
|
|
1941
2103
|
case 'assign': {
|
|
1942
2104
|
switch($3.a2.h) {
|
|
1943
|
-
case 0: return $
|
|
2105
|
+
case 0: return $342 => $343 => Data_Promise_reject('The assign commaand expects one or more names of GitHub Teams or Users as arguments.', $342, $343);
|
|
1944
2106
|
case undefined: {
|
|
1945
2107
|
switch($3.a2.a1) {
|
|
1946
2108
|
case '--dry': {
|
|
1947
|
-
return $
|
|
2109
|
+
return $349 => {
|
|
1948
2110
|
switch($3.a2.a2.h) {
|
|
1949
|
-
case 0: return $
|
|
1950
|
-
case undefined: return $
|
|
1951
|
-
default: return $
|
|
2111
|
+
case 0: return $34b => Data_Promise_reject('The assign commaand expects one or more names of GitHub Teams or Users as arguments.', $349, $34b);
|
|
2112
|
+
case undefined: return $350 => Main_assign($0, $1, $2, {a1: $3.a2.a2.a1, a2: $3.a2.a2.a2}, 1, $349, $350);
|
|
2113
|
+
default: return $35b => Main_assign($0, $1, $2, {a1: $3.a2.a1, a2: $3.a2.a2}, 0, $349, $35b);
|
|
1952
2114
|
}
|
|
1953
2115
|
};
|
|
1954
2116
|
}
|
|
1955
|
-
default: return $
|
|
2117
|
+
default: return $366 => $367 => Main_assign($0, $1, $2, {a1: $3.a2.a1, a2: $3.a2.a2}, 0, $366, $367);
|
|
1956
2118
|
}
|
|
1957
2119
|
}
|
|
1958
|
-
default: return $
|
|
2120
|
+
default: return $372 => $373 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $372, $373);
|
|
1959
2121
|
}
|
|
1960
2122
|
}
|
|
1961
|
-
default: return $
|
|
2123
|
+
default: return $388 => $389 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $388, $389);
|
|
1962
2124
|
}
|
|
1963
2125
|
}
|
|
1964
|
-
default: return $
|
|
2126
|
+
default: return $39e => $39f => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $39e, $39f);
|
|
1965
2127
|
}
|
|
1966
2128
|
}
|
|
1967
2129
|
|
|
@@ -1975,31 +2137,31 @@ function Main_handleArgs($0, $1, $2, $3, $4) {
|
|
|
1975
2137
|
switch($4.a2.a2.h) {
|
|
1976
2138
|
case undefined: {
|
|
1977
2139
|
switch($4.a2.a2.a2.h) {
|
|
1978
|
-
case 0: return Main_bashCompletion(
|
|
1979
|
-
default: return Main_resolvex27x27($11 => $12 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(
|
|
2140
|
+
case 0: return Main_bashCompletion(csegen_59(), $4.a2.a1, $4.a2.a2.a1);
|
|
2141
|
+
default: return Main_resolvex27x27($11 => $12 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_15(), $19 => $1a => $1b => Config_syncIfOld($1, $19, $1a, $1b), $22 => $23 => Config_loadOrCreateConfig($0, $1, $2, $3, $22, $23)), _ => Main_handleConfiguredArgs(_, $0, $1, $4), $11, $12));
|
|
1980
2142
|
}
|
|
1981
2143
|
}
|
|
1982
|
-
default: return Main_resolvex27x27($35 => $36 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(
|
|
2144
|
+
default: return Main_resolvex27x27($35 => $36 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_15(), $3d => $3e => $3f => Config_syncIfOld($1, $3d, $3e, $3f), $46 => $47 => Config_loadOrCreateConfig($0, $1, $2, $3, $46, $47)), _ => Main_handleConfiguredArgs(_, $0, $1, $4), $35, $36));
|
|
1983
2145
|
}
|
|
1984
2146
|
}
|
|
1985
|
-
default: return Main_resolvex27x27($59 => $5a => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(
|
|
2147
|
+
default: return Main_resolvex27x27($59 => $5a => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_15(), $61 => $62 => $63 => Config_syncIfOld($1, $61, $62, $63), $6a => $6b => Config_loadOrCreateConfig($0, $1, $2, $3, $6a, $6b)), _ => Main_handleConfiguredArgs(_, $0, $1, $4), $59, $5a));
|
|
1986
2148
|
}
|
|
1987
2149
|
}
|
|
1988
2150
|
case '--bash-completion-script': {
|
|
1989
2151
|
switch($4.a2.h) {
|
|
1990
|
-
case 0: return Prelude_IO_putStrLn(
|
|
1991
|
-
default: return Main_resolvex27x27($83 => $84 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(
|
|
2152
|
+
case 0: return Prelude_IO_putStrLn(csegen_59(), BashCompletion_script());
|
|
2153
|
+
default: return Main_resolvex27x27($83 => $84 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_15(), $8b => $8c => $8d => Config_syncIfOld($1, $8b, $8c, $8d), $94 => $95 => Config_loadOrCreateConfig($0, $1, $2, $3, $94, $95)), _ => Main_handleConfiguredArgs(_, $0, $1, $4), $83, $84));
|
|
1992
2154
|
}
|
|
1993
2155
|
}
|
|
1994
|
-
default: return Main_resolvex27x27($a7 => $a8 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(
|
|
2156
|
+
default: return Main_resolvex27x27($a7 => $a8 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_15(), $af => $b0 => $b1 => Config_syncIfOld($1, $af, $b0, $b1), $b8 => $b9 => Config_loadOrCreateConfig($0, $1, $2, $3, $b8, $b9)), _ => Main_handleConfiguredArgs(_, $0, $1, $4), $a7, $a8));
|
|
1995
2157
|
}
|
|
1996
2158
|
}
|
|
1997
|
-
default: return Main_resolvex27x27($cb => $cc => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(
|
|
2159
|
+
default: return Main_resolvex27x27($cb => $cc => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_15(), $d3 => $d4 => $d5 => Config_syncIfOld($1, $d3, $d4, $d5), $dc => $dd => Config_loadOrCreateConfig($0, $1, $2, $3, $dc, $dd)), _ => Main_handleConfiguredArgs(_, $0, $1, $4), $cb, $cc));
|
|
1998
2160
|
}
|
|
1999
2161
|
}
|
|
2000
2162
|
|
|
2001
2163
|
function Main_graphTeam($0, $1, $2, $3, $4) {
|
|
2002
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listTeamMembers($1, $0.a2, $2), teamMemberLogins => $d => $e => Data_Promise_x3ex3ex3d_Monad_Promise($11 => $12 => PullRequest_listReviewers($0, $1, 4n,
|
|
2164
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listTeamMembers($1, $0.a2, $2), teamMemberLogins => $d => $e => Data_Promise_x3ex3ex3d_Monad_Promise($11 => $12 => PullRequest_listReviewers($0, $1, 4n, csegen_134(), $11, $12), $1c => Util_renderIO($0, csegen_21(), Reviewer_reviewsGraph(csegen_111(), {a1: ann => $28 => Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($28), a2: ann => $2c => $2d => Text_PrettyPrint_Prettyprinter_Doc_prettyPrec_Pretty_String($2c, $2d)}, $1c.a2, $1c.a1, teamMemberLogins)), $d, $e), $3, $4);
|
|
2003
2165
|
}
|
|
2004
2166
|
|
|
2005
2167
|
function Main_exitError($0, $1) {
|
|
@@ -2020,120 +2182,53 @@ function Main_exitError($0, $1) {
|
|
|
2020
2182
|
return $0.a1.a2(undefined)(undefined)(System_File_Meta_isTTY($0, System_File_Virtual_stderr()))($f);
|
|
2021
2183
|
}
|
|
2022
2184
|
|
|
2023
|
-
function Main_contribute($0, $1, $2, $3, $4) {
|
|
2024
|
-
const $
|
|
2025
|
-
const $
|
|
2026
|
-
const $
|
|
2027
|
-
|
|
2185
|
+
function Main_contribute($0, $1, $2, $3, $4, $5) {
|
|
2186
|
+
const $13 = openPrs => $14 => $15 => {
|
|
2187
|
+
const $20 = myLogin => {
|
|
2188
|
+
const $21 = Data_Maybe_fromMaybe(() => Prelude_Types_prim__integerToNat(0n), Data_List_headx27(Prelude_Types_List_mapMaybe($2b => Main_skipArg($2b), $3)));
|
|
2189
|
+
const $31 = $32 => {
|
|
2190
|
+
switch($32.h) {
|
|
2191
|
+
case 0: return 1;
|
|
2192
|
+
default: return 0;
|
|
2193
|
+
}
|
|
2194
|
+
};
|
|
2195
|
+
const $2f = Data_List_find($31, $3);
|
|
2196
|
+
const $37 = $38 => {
|
|
2197
|
+
switch(Data_PullRequest_isAuthor(myLogin, $38)) {
|
|
2028
2198
|
case 1: return 0;
|
|
2029
2199
|
case 0: return 1;
|
|
2030
2200
|
}
|
|
2031
2201
|
};
|
|
2032
|
-
const $
|
|
2033
|
-
const $
|
|
2034
|
-
|
|
2035
|
-
const $5f = Prelude_Types_map_Functor_Maybe($62 => Data_PullRequest_rf__webURI($0, $62), Data_List_headx27(Data_List_drop($2, Prelude_Types_List_tailRecAppend($31.a1, $31.a2))));
|
|
2036
|
-
return Main_n__6077_2987_printResult($1, $2, $0, $5f);
|
|
2202
|
+
const $35 = Prelude_Types_List_filter($37, openPrs);
|
|
2203
|
+
const $3e = Data_List_partition($41 => Data_PullRequest_isRequestedReviewer(myLogin, $41), $35);
|
|
2204
|
+
return Main_case__contribute_2186($1, $2, $3, $0, openPrs, myLogin, $21, $2f, $35, $3e, Prelude_Interfaces_mapHom({a1: d => b => c => a => $55 => $56 => $57 => ({a1: $55($57.a1), a2: $56($57.a2)}), a2: b => c => a => $60 => $61 => ({a1: $60($61.a1), a2: $61.a2}), a3: a => d => b => $68 => $69 => ({a1: $69.a1, a2: $68($69.a2)})}, $70 => Data_List_sortBy($73 => $74 => Prelude_Basics_on(csegen_141(), $79 => $79.a2, $73, $74), $70), $3e));
|
|
2037
2205
|
};
|
|
2038
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(
|
|
2206
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), csegen_139(), FFI_GitHub_getSelf($2)), $20, $14, $15);
|
|
2039
2207
|
};
|
|
2040
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listPullRequests($
|
|
2208
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listPullRequests($2, $0.a2, $0.a3, {a1: 0}, csegen_134(), 0n), $13, $4, $5);
|
|
2041
2209
|
}
|
|
2042
2210
|
|
|
2043
2211
|
function Main_bashCompletion($0, $1, $2) {
|
|
2044
|
-
const $3 = Prelude_Types_maybe(() =>
|
|
2212
|
+
const $3 = Prelude_Types_maybe(() => Main_n__6146_1583_configuredOpts($0, $2, $1), () => $b => $0.a1.a1.a2(undefined)($b), BashCompletion_cmdOpts($1, $2));
|
|
2045
2213
|
return $0.a1.a2(undefined)(undefined)($3)($21 => Prelude_IO_putStr($0, Data_String_fastUnlines($21)));
|
|
2046
2214
|
}
|
|
2047
2215
|
|
|
2048
2216
|
function Main_assign($0, $1, $2, $3, $4, $5, $6) {
|
|
2049
2217
|
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 => {
|
|
2050
|
-
const $25 =
|
|
2218
|
+
const $25 = Main_n__6276_1721_partitionedArgs($0, $1, $2, $4, $3);
|
|
2051
2219
|
return PullRequest_requestReviewers($0, $2, $21.a2, $25.a2, $25.a1, $4, $22, $24);
|
|
2052
2220
|
}, $5, $6);
|
|
2053
2221
|
}
|
|
2054
2222
|
|
|
2055
|
-
function
|
|
2056
|
-
|
|
2057
|
-
return Prelude_IO_putStrLn(csegen_20(), Util_renderString($0, User_Reflect_print(Prelude_Types_String_length(User_Reflect_intro()), Prelude_Types_List_lengthTR($4), Prelude_Types_List_lengthTR($9.a1), Prelude_Types_List_lengthTR($9.a2), Prelude_Types_List_lengthTR($8), Prelude_Types_List_lengthTR($7), $5, $b.a1, $b.a2)));
|
|
2058
|
-
}
|
|
2059
|
-
|
|
2060
|
-
function User_Reflect_n__4808_1428_ital($0, $1) {
|
|
2061
|
-
return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($1));
|
|
2223
|
+
function Main_x3cx7cx7cx3e($0, $1, $2, $3) {
|
|
2224
|
+
return $0.a3(undefined)($1($3))(() => $2($3));
|
|
2062
2225
|
}
|
|
2063
2226
|
|
|
2064
|
-
const
|
|
2065
|
-
return 'authored';
|
|
2066
|
-
});
|
|
2067
|
-
|
|
2068
|
-
const User_Reflect_reviewDetailsCount = __lazy(function () {
|
|
2069
|
-
return 25n;
|
|
2070
|
-
});
|
|
2071
|
-
|
|
2072
|
-
function User_replicatex27($0, $1, $2) {
|
|
2073
|
-
return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color($0), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_String_replicate($1, $2)));
|
|
2074
|
-
}
|
|
2075
|
-
|
|
2076
|
-
function User_Reflect_reflectOnSelf($0, $1, $2, $3) {
|
|
2077
|
-
const $c = prs => $d => $e => {
|
|
2078
|
-
const $19 = myLogin => $1a => $1b => {
|
|
2079
|
-
const $37 = reviews => {
|
|
2080
|
-
const $38 = Prelude_Types_map_Functor_Maybe(csegen_152(), Data_List_headx27(Data_List_sortBy($41 => $42 => Prelude_Basics_on(csegen_134(), csegen_152(), $41, $42), reviews)));
|
|
2081
|
-
const $4b = PullRequest_tuple(prs);
|
|
2082
|
-
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 => Data_List_filter($70 => Prelude_EqOrd_x3dx3d_Eq_String($70.a3, myLogin), $6d), $4b);
|
|
2083
|
-
return User_Reflect_case__casex20blockx20inx20reflectOnSelf_2234($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 => Data_List_filter($a3 => Prelude_Interfaces_any(csegen_104(), $a8 => Prelude_EqOrd_x3dx3d_Eq_String($a8, myLogin), $a3.a5), $a0), $4b));
|
|
2084
|
-
};
|
|
2085
|
-
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_134(), csegen_149(), $2b, $2c), PullRequest_combined(prs))))), $37, $1a, $1b);
|
|
2086
|
-
};
|
|
2087
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_80(), csegen_133(), FFI_GitHub_getSelf($1)), $19, $d, $e);
|
|
2088
|
-
};
|
|
2089
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_listPartitionedPRs($0, $1, 4n, User_Reflect_prCount()), $c, $2, $3);
|
|
2090
|
-
}
|
|
2091
|
-
|
|
2092
|
-
function User_Reflect_print($0, $1, $2, $3, $4, $5, $6, $7, $8) {
|
|
2093
|
-
return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Reflect_graph($0, $1, $2, $3, $4, $5), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Reflect_details($0, $1, $2, $3, $4, $5, $6, $7, $8), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}});
|
|
2094
|
-
}
|
|
2095
|
-
|
|
2096
|
-
const User_Reflect_prCount = __lazy(function () {
|
|
2097
|
-
return csegen_128();
|
|
2098
|
-
});
|
|
2099
|
-
|
|
2100
|
-
const User_Reflect_leftTitle = __lazy(function () {
|
|
2101
|
-
return 'requested';
|
|
2102
|
-
});
|
|
2103
|
-
|
|
2104
|
-
const User_Reflect_intro = __lazy(function () {
|
|
2105
|
-
return Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Your current pull request summary (out of the past ', a2: {a1: Data_Fin_show_Show_x28Finx20x24nx29(User_Reflect_prCount()), a2: {a1: ' PRs):', a2: {h: 0}}}});
|
|
2106
|
-
});
|
|
2107
|
-
|
|
2108
|
-
function User_Reflect_header($0) {
|
|
2109
|
-
return Text_PrettyPrint_Prettyprinter_Doc_indent(Prelude_Cast_cast_Cast_Nat_Int($0), Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: User_Reflect_n__4808_1428_ital($0, User_Reflect_leftTitle()), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(' '), a2: {a1: User_Reflect_n__4808_1428_ital($0, User_Reflect_rightTitle()), a2: {h: 0}}}}));
|
|
2110
|
-
}
|
|
2111
|
-
|
|
2112
|
-
function User_Reflect_graph($0, $1, $2, $3, $4, $5) {
|
|
2113
|
-
const $6 = ($2+$3);
|
|
2114
|
-
const $9 = ($5+$4);
|
|
2115
|
-
const $c = Prelude_Types_foldr_Foldable_List(csegen_157(), Prelude_Types_String_length(User_Reflect_leftTitle()), {a1: ($6+$1), a2: {a1: $9, a2: {h: 0}}});
|
|
2116
|
-
const $1b = Prelude_Types_foldr_Foldable_List(csegen_157(), Prelude_Types_String_length(User_Reflect_rightTitle()), {a1: $6, a2: {a1: $9, a2: {h: 0}}});
|
|
2117
|
-
const $28 = (($c+$1b)+3n);
|
|
2118
|
-
const $2d = ((Prelude_Cast_cast_Cast_Nat_Double($0)/2.0)-(Prelude_Cast_cast_Cast_Nat_Double($28)/2.0));
|
|
2119
|
-
const $38 = (Prelude_Cast_cast_Cast_Double_Nat($2d)+Prelude_Types_prim__integerToNat(($c-Prelude_Types_String_length(User_Reflect_leftTitle()))));
|
|
2120
|
-
const $44 = (Prelude_Cast_cast_Cast_Double_Nat($2d)+Prelude_Types_prim__integerToNat(($c-($6+$1))));
|
|
2121
|
-
return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: User_Reflect_header($38), a2: {a1: User_Reflect_chart($0, $1, $2, $3, $4, $5, $44), a2: {h: 0}}});
|
|
2122
|
-
}
|
|
2123
|
-
|
|
2124
|
-
function User_Reflect_details($0, $1, $2, $3, $4, $5, $6, $7, $8) {
|
|
2125
|
-
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_161(), $8, csegen_162()), 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_161(), $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_161(), $7, csegen_162()), 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_114(), csegen_104(), {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}}}}}}}}}});
|
|
2126
|
-
}
|
|
2127
|
-
|
|
2128
|
-
function User_Reflect_chart($0, $1, $2, $3, $4, $5, $6) {
|
|
2129
|
-
return Text_PrettyPrint_Prettyprinter_Doc_indent(Prelude_Cast_cast_Cast_Nat_Int($6), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(User_replicatex27(2, $1, '\u{b7}'), User_replicatex27(1, $3, '\u{25e6}')), User_replicatex27(3, $2, '<')), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('|'), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(User_replicatex27(3, $5, '>'), User_replicatex27(2, $4, '\u{b7}')))));
|
|
2130
|
-
}
|
|
2131
|
-
|
|
2132
|
-
const Util_n__3907_1173_startOver = __lazy(function () {
|
|
2227
|
+
const Util_n__4476_1237_startOver = __lazy(function () {
|
|
2133
2228
|
return {a1: 0, a2: {h: 0}};
|
|
2134
2229
|
});
|
|
2135
2230
|
|
|
2136
|
-
function
|
|
2231
|
+
function Util_n__4476_1238_guardSuccess($0) {
|
|
2137
2232
|
switch($0.h) {
|
|
2138
2233
|
case undefined: {
|
|
2139
2234
|
switch($0.a1) {
|
|
@@ -2146,12 +2241,12 @@ function Util_n__3907_1174_guardSuccess($0) {
|
|
|
2146
2241
|
}
|
|
2147
2242
|
}
|
|
2148
2243
|
|
|
2149
|
-
function
|
|
2244
|
+
function Util_n__4476_1239_go($0, $1) {
|
|
2150
2245
|
switch($0.a1) {
|
|
2151
2246
|
case 0: {
|
|
2152
2247
|
switch(Prelude_Types_isAlpha($1)) {
|
|
2153
2248
|
case 1: return {a1: 1, a2: {a1: $1, a2: $0.a2}};
|
|
2154
|
-
case 0: return
|
|
2249
|
+
case 0: return Util_n__4476_1237_startOver();
|
|
2155
2250
|
}
|
|
2156
2251
|
}
|
|
2157
2252
|
case 1: {
|
|
@@ -2160,7 +2255,7 @@ function Util_n__3907_1175_go($0, $1) {
|
|
|
2160
2255
|
default: {
|
|
2161
2256
|
switch(Prelude_Types_isAlpha($1)) {
|
|
2162
2257
|
case 1: return {a1: 1, a2: {a1: $1, a2: $0.a2}};
|
|
2163
|
-
case 0: return
|
|
2258
|
+
case 0: return Util_n__4476_1237_startOver();
|
|
2164
2259
|
}
|
|
2165
2260
|
}
|
|
2166
2261
|
}
|
|
@@ -2168,7 +2263,7 @@ function Util_n__3907_1175_go($0, $1) {
|
|
|
2168
2263
|
case 2: {
|
|
2169
2264
|
switch(Prelude_Types_isDigit($1)) {
|
|
2170
2265
|
case 1: return {a1: 3, a2: {a1: $1, a2: $0.a2}};
|
|
2171
|
-
case 0: return
|
|
2266
|
+
case 0: return Util_n__4476_1237_startOver();
|
|
2172
2267
|
}
|
|
2173
2268
|
}
|
|
2174
2269
|
case 3: {
|
|
@@ -2181,7 +2276,7 @@ function Util_n__3907_1175_go($0, $1) {
|
|
|
2181
2276
|
}
|
|
2182
2277
|
}
|
|
2183
2278
|
|
|
2184
|
-
function
|
|
2279
|
+
function Util_n__4363_1128_getMoreLines($0, $1, $2) {
|
|
2185
2280
|
switch($2.h) {
|
|
2186
2281
|
case 0: return $0.a1.a1.a2(undefined)(Prelude_Types_List_reverse($1));
|
|
2187
2282
|
case undefined: {
|
|
@@ -2192,13 +2287,13 @@ function Util_n__3794_1064_getMoreLines($0, $1, $2) {
|
|
|
2192
2287
|
case '': {
|
|
2193
2288
|
switch(line) {
|
|
2194
2289
|
case '': return $0.a1.a1.a2(undefined)(Prelude_Types_List_reverse($1.a2));
|
|
2195
|
-
default: return
|
|
2290
|
+
default: return Util_n__4363_1128_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
|
|
2196
2291
|
}
|
|
2197
2292
|
}
|
|
2198
|
-
default: return
|
|
2293
|
+
default: return Util_n__4363_1128_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
|
|
2199
2294
|
}
|
|
2200
2295
|
}
|
|
2201
|
-
default: return
|
|
2296
|
+
default: return Util_n__4363_1128_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
|
|
2202
2297
|
}
|
|
2203
2298
|
};
|
|
2204
2299
|
return $0.a1.a2(undefined)(undefined)(Prelude_Interfaces_x3cx24x3e($0.a1.a1.a1, $1c => Data_String_trim($1c), Prelude_IO_getLine($0)))($22);
|
|
@@ -2222,33 +2317,49 @@ function Util_renderString($0, $1) {
|
|
|
2222
2317
|
return Text_PrettyPrint_Prettyprinter_Render_Terminal_renderString($3);
|
|
2223
2318
|
}
|
|
2224
2319
|
|
|
2320
|
+
function Util_renderIO($0, $1, $2) {
|
|
2321
|
+
let $9;
|
|
2322
|
+
switch(Data_Config_rf__colors($0)) {
|
|
2323
|
+
case 1: {
|
|
2324
|
+
$9 = $2;
|
|
2325
|
+
break;
|
|
2326
|
+
}
|
|
2327
|
+
case 0: {
|
|
2328
|
+
$9 = Text_PrettyPrint_Prettyprinter_Doc_unAnnotate($2);
|
|
2329
|
+
break;
|
|
2330
|
+
}
|
|
2331
|
+
}
|
|
2332
|
+
const $7 = Text_PrettyPrint_Prettyprinter_Render_Terminal_putDoc($9);
|
|
2333
|
+
return $1.a2(undefined)($7);
|
|
2334
|
+
}
|
|
2335
|
+
|
|
2225
2336
|
function Util_parseJiraPrefix($0) {
|
|
2226
|
-
return Prelude_Types_map_Functor_Maybe($3 => Prelude_Types_fastPack(Prelude_Types_List_reverse($3)),
|
|
2337
|
+
return Prelude_Types_map_Functor_Maybe($3 => Prelude_Types_fastPack(Prelude_Types_List_reverse($3)), Util_n__4476_1238_guardSuccess(Prelude_Types_foldl_Foldable_List($d => $e => Util_n__4476_1239_go($d, $e), Util_n__4476_1237_startOver(), Prelude_Types_fastUnpack($0))));
|
|
2227
2338
|
}
|
|
2228
2339
|
|
|
2229
2340
|
function Util_getManyLines($0, $1) {
|
|
2230
|
-
return
|
|
2341
|
+
return Util_n__4363_1128_getMoreLines($0, {h: 0}, $1);
|
|
2231
2342
|
}
|
|
2232
2343
|
|
|
2233
|
-
function
|
|
2344
|
+
function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5087_writeOutput($0, $1, $2, $3) {
|
|
2234
2345
|
return Control_Monad_ST_modifySTRef($1, $7 => ($7+$2), $3);
|
|
2235
2346
|
}
|
|
2236
2347
|
|
|
2237
|
-
function
|
|
2348
|
+
function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5084_push($0, $1, $2, $3) {
|
|
2238
2349
|
return Control_Monad_ST_modifySTRef($1, $7 => ({a1: $2, a2: $7}), $3);
|
|
2239
2350
|
}
|
|
2240
2351
|
|
|
2241
|
-
function
|
|
2352
|
+
function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5086_pop($0, $1, $2) {
|
|
2242
2353
|
const $9 = $a => {
|
|
2243
2354
|
switch($a.h) {
|
|
2244
|
-
case undefined: return Prelude_Interfaces_x3ex3e(
|
|
2355
|
+
case undefined: return Prelude_Interfaces_x3ex3e(csegen_159(), $10 => ($1.value=$a.a2), () => $16 => ({a1: $a.a1}));
|
|
2245
2356
|
case 0: return $18 => ({h: 0});
|
|
2246
2357
|
}
|
|
2247
2358
|
};
|
|
2248
2359
|
return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($5 => ($1.value), $9, $2);
|
|
2249
2360
|
}
|
|
2250
2361
|
|
|
2251
|
-
function
|
|
2362
|
+
function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5085_peek($0, $1, $2) {
|
|
2252
2363
|
const $9 = $a => $b => {
|
|
2253
2364
|
switch($a.h) {
|
|
2254
2365
|
case undefined: return {a1: $a.a1};
|
|
@@ -2258,24 +2369,24 @@ function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3714_4049_peek($0, $1
|
|
|
2258
2369
|
return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($5 => ($1.value), $9, $2);
|
|
2259
2370
|
}
|
|
2260
2371
|
|
|
2261
|
-
function
|
|
2372
|
+
function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5088_go($0, $1, $2, $3) {
|
|
2262
2373
|
switch($3.h) {
|
|
2263
2374
|
case 0: return $5 => (undefined);
|
|
2264
|
-
case 1: return Prelude_Interfaces_x3ex3e(
|
|
2265
|
-
case 2: return Prelude_Interfaces_x3ex3e(
|
|
2266
|
-
case 3: return Prelude_Interfaces_x3ex3e(
|
|
2375
|
+
case 1: return Prelude_Interfaces_x3ex3e(csegen_159(), $a => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5087_writeOutput($0, $2, Data_String_singleton($3.a1), $a), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5088_go($0, $1, $2, $3.a2()));
|
|
2376
|
+
case 2: return Prelude_Interfaces_x3ex3e(csegen_159(), $1d => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5087_writeOutput($0, $2, $3.a2, $1d), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5088_go($0, $1, $2, $3.a3()));
|
|
2377
|
+
case 3: return Prelude_Interfaces_x3ex3e(csegen_159(), $2e => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5087_writeOutput($0, $2, (Data_String_singleton('\n')+Text_PrettyPrint_Prettyprinter_Doc_textSpaces($3.a1)), $2e), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5088_go($0, $1, $2, $3.a2));
|
|
2267
2378
|
case 4: {
|
|
2268
2379
|
return $40 => {
|
|
2269
2380
|
const $48 = $49 => {
|
|
2270
2381
|
switch($49.h) {
|
|
2271
2382
|
case undefined: {
|
|
2272
2383
|
const $4b = Prelude_Types_List_tailRecAppend($3.a1, $49.a1);
|
|
2273
|
-
return Prelude_Interfaces_x3ex3e(
|
|
2384
|
+
return Prelude_Interfaces_x3ex3e(csegen_159(), $53 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5084_push($0, $1, $4b, $53), () => Prelude_Interfaces_x3ex3e(csegen_159(), $5e => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5087_writeOutput($0, $2, Control_ANSI_SGR_escapeSGR($4b), $5e), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5088_go($0, $1, $2, $3.a2)));
|
|
2274
2385
|
}
|
|
2275
2386
|
case 0: return $6c => ($1.value={h: 0});
|
|
2276
2387
|
}
|
|
2277
2388
|
};
|
|
2278
|
-
return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($43 =>
|
|
2389
|
+
return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($43 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5085_peek($0, $1, $43), $48, $40);
|
|
2279
2390
|
};
|
|
2280
2391
|
}
|
|
2281
2392
|
case 5: {
|
|
@@ -2283,13 +2394,13 @@ function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3714_4052_go($0, $1,
|
|
|
2283
2394
|
const $7a = _ => $7b => {
|
|
2284
2395
|
const $83 = $84 => {
|
|
2285
2396
|
switch($84.h) {
|
|
2286
|
-
case undefined: return Prelude_Interfaces_x3ex3e(
|
|
2397
|
+
case undefined: return Prelude_Interfaces_x3ex3e(csegen_159(), $8a => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5087_writeOutput($0, $2, Control_ANSI_SGR_escapeSGR({a1: {h: 0}, a2: $84.a1}), $8a), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5088_go($0, $1, $2, $3.a1));
|
|
2287
2398
|
case 0: return $9a => ($1.value={h: 0});
|
|
2288
2399
|
}
|
|
2289
2400
|
};
|
|
2290
|
-
return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($7e =>
|
|
2401
|
+
return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($7e => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5085_peek($0, $1, $7e), $83, $7b);
|
|
2291
2402
|
};
|
|
2292
|
-
return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($75 =>
|
|
2403
|
+
return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($75 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5086_pop($0, $1, $75), $7a, $72);
|
|
2293
2404
|
};
|
|
2294
2405
|
}
|
|
2295
2406
|
}
|
|
@@ -2300,7 +2411,7 @@ const Text_PrettyPrint_Prettyprinter_Render_Terminal_underline = __lazy(function
|
|
|
2300
2411
|
});
|
|
2301
2412
|
|
|
2302
2413
|
function Text_PrettyPrint_Prettyprinter_Render_Terminal_renderString($0) {
|
|
2303
|
-
return Data_Maybe_fromMaybe(() => '<internal pretty printing error>', Control_Monad_ST_runST($6 => $7 => Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($a => Control_Monad_ST_newSTRef({a1: {h: 0}, a2: {h: 0}}, $a), styleStackRef => $11 => Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($14 => Control_Monad_ST_newSTRef('', $14), outputRef => Prelude_Interfaces_x3ex3e(
|
|
2414
|
+
return Data_Maybe_fromMaybe(() => '<internal pretty printing error>', Control_Monad_ST_runST($6 => $7 => Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($a => Control_Monad_ST_newSTRef({a1: {h: 0}, a2: {h: 0}}, $a), styleStackRef => $11 => Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($14 => Control_Monad_ST_newSTRef('', $14), outputRef => Prelude_Interfaces_x3ex3e(csegen_159(), Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5088_go($0, styleStackRef, outputRef, $0), () => $23 => {
|
|
2304
2415
|
const $2a = $2b => {
|
|
2305
2416
|
switch($2b.h) {
|
|
2306
2417
|
case 0: return $2d => ({h: 0});
|
|
@@ -2318,7 +2429,7 @@ function Text_PrettyPrint_Prettyprinter_Render_Terminal_renderString($0) {
|
|
|
2318
2429
|
}
|
|
2319
2430
|
|
|
2320
2431
|
function Text_PrettyPrint_Prettyprinter_Render_Terminal_renderIO($0) {
|
|
2321
|
-
return Prelude_IO_putStrLn(
|
|
2432
|
+
return Prelude_IO_putStrLn(csegen_59(), Text_PrettyPrint_Prettyprinter_Render_Terminal_renderString($0));
|
|
2322
2433
|
}
|
|
2323
2434
|
|
|
2324
2435
|
function Text_PrettyPrint_Prettyprinter_Render_Terminal_putDoc($0) {
|
|
@@ -2333,7 +2444,11 @@ function Text_PrettyPrint_Prettyprinter_Render_Terminal_color($0) {
|
|
|
2333
2444
|
return Prelude_Types_pure_Applicative_List({h: 1, a1: $0});
|
|
2334
2445
|
}
|
|
2335
2446
|
|
|
2336
|
-
function
|
|
2447
|
+
const Text_PrettyPrint_Prettyprinter_Render_Terminal_bold = __lazy(function () {
|
|
2448
|
+
return Prelude_Types_pure_Applicative_List({h: 3, a1: 0});
|
|
2449
|
+
});
|
|
2450
|
+
|
|
2451
|
+
function Text_PrettyPrint_Prettyprinter_Doc_case__unsafeTextWithoutNewLines_3043($0, $1) {
|
|
2337
2452
|
switch($0) {
|
|
2338
2453
|
case '': {
|
|
2339
2454
|
switch($1.h) {
|
|
@@ -2357,7 +2472,7 @@ function Text_PrettyPrint_Prettyprinter_Doc_case__unsafeTextWithoutNewLines_3039
|
|
|
2357
2472
|
}
|
|
2358
2473
|
}
|
|
2359
2474
|
|
|
2360
|
-
function
|
|
2475
|
+
function Text_PrettyPrint_Prettyprinter_Doc_case__changesUponFlattening_2310($0, $1, $2) {
|
|
2361
2476
|
switch($2.a1.h) {
|
|
2362
2477
|
case 2: return {h: 2};
|
|
2363
2478
|
default: {
|
|
@@ -2384,8 +2499,8 @@ function Text_PrettyPrint_Prettyprinter_Doc_case__changesUponFlattening_2306($0,
|
|
|
2384
2499
|
}
|
|
2385
2500
|
}
|
|
2386
2501
|
|
|
2387
|
-
function
|
|
2388
|
-
switch($2($3)($4)(
|
|
2502
|
+
function Text_PrettyPrint_Prettyprinter_Doc_n__8712_6698_selectNicer($0, $1, $2, $3, $4, $5, $6) {
|
|
2503
|
+
switch($2($3)($4)(Text_PrettyPrint_Prettyprinter_Doc_n__8712_6697_initialIndentation($0, $1, $2, $6()))($5)) {
|
|
2389
2504
|
case 1: return $5;
|
|
2390
2505
|
case 0: return $6();
|
|
2391
2506
|
}
|
|
@@ -2450,7 +2565,7 @@ function Text_PrettyPrint_Prettyprinter_Doc_vcat($0) {
|
|
|
2450
2565
|
}
|
|
2451
2566
|
|
|
2452
2567
|
function Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines($0) {
|
|
2453
|
-
return
|
|
2568
|
+
return Text_PrettyPrint_Prettyprinter_Doc_case__unsafeTextWithoutNewLines_3043($0, Data_String_strM($0));
|
|
2454
2569
|
}
|
|
2455
2570
|
|
|
2456
2571
|
function Text_PrettyPrint_Prettyprinter_Doc_unAnnotate($0) {
|
|
@@ -2517,7 +2632,7 @@ const Text_PrettyPrint_Prettyprinter_Doc_line = __lazy(function () {
|
|
|
2517
2632
|
});
|
|
2518
2633
|
|
|
2519
2634
|
function Text_PrettyPrint_Prettyprinter_Doc_layoutWadlerLeijen($0, $1, $2) {
|
|
2520
|
-
return
|
|
2635
|
+
return Text_PrettyPrint_Prettyprinter_Doc_n__8712_6699_best($2, $1, $0, 0, 0, {h: 1, a1: 0, a2: $2, a3: {h: 0}});
|
|
2521
2636
|
}
|
|
2522
2637
|
|
|
2523
2638
|
function Text_PrettyPrint_Prettyprinter_Doc_layoutUnbounded($0) {
|
|
@@ -2540,7 +2655,7 @@ function Text_PrettyPrint_Prettyprinter_Doc_hsep($0) {
|
|
|
2540
2655
|
}
|
|
2541
2656
|
|
|
2542
2657
|
function Text_PrettyPrint_Prettyprinter_Doc_hcat($0) {
|
|
2543
|
-
return Text_PrettyPrint_Prettyprinter_Doc_concatWith(
|
|
2658
|
+
return Text_PrettyPrint_Prettyprinter_Doc_concatWith(csegen_172(), $0);
|
|
2544
2659
|
}
|
|
2545
2660
|
|
|
2546
2661
|
function Text_PrettyPrint_Prettyprinter_Doc_hang($0, $1) {
|
|
@@ -2585,10 +2700,10 @@ function Text_PrettyPrint_Prettyprinter_Doc_encloseSep($0, $1, $2, $3) {
|
|
|
2585
2700
|
case undefined: {
|
|
2586
2701
|
switch($3.a2.h) {
|
|
2587
2702
|
case 0: return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29($0, $3.a1), $1);
|
|
2588
|
-
default: return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_cat(Data_List_zipWith_Zippable_List(
|
|
2703
|
+
default: return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_cat(Data_List_zipWith_Zippable_List(csegen_172(), {a1: $0, a2: Data_List_replicate(Prelude_Types_prim__integerToNat((Prelude_Types_List_lengthTR($3)-1n)), $2)}, $3)), $1);
|
|
2589
2704
|
}
|
|
2590
2705
|
}
|
|
2591
|
-
default: return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_cat(Data_List_zipWith_Zippable_List(
|
|
2706
|
+
default: return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_cat(Data_List_zipWith_Zippable_List(csegen_172(), {a1: $0, a2: Data_List_replicate(Prelude_Types_prim__integerToNat((Prelude_Types_List_lengthTR($3)-1n)), $2)}, $3)), $1);
|
|
2592
2707
|
}
|
|
2593
2708
|
}
|
|
2594
2709
|
|
|
@@ -2626,7 +2741,7 @@ function Text_PrettyPrint_Prettyprinter_Doc_changesUponFlattening($0) {
|
|
|
2626
2741
|
case 2: return {h: 1};
|
|
2627
2742
|
case 3: return {h: 2};
|
|
2628
2743
|
case 4: return {h: 0, a1: Text_PrettyPrint_Prettyprinter_Doc_flatten($0.a2())};
|
|
2629
|
-
case 5: return
|
|
2744
|
+
case 5: return Text_PrettyPrint_Prettyprinter_Doc_case__changesUponFlattening_2310($0.a2, $0.a1, {a1: Text_PrettyPrint_Prettyprinter_Doc_changesUponFlattening($0.a1), a2: Text_PrettyPrint_Prettyprinter_Doc_changesUponFlattening($0.a2)});
|
|
2630
2745
|
case 6: return Text_PrettyPrint_Prettyprinter_Doc_map_Functor_FlattenResult($12 => ({h: 6, a1: $0.a1, a2: $12}), Text_PrettyPrint_Prettyprinter_Doc_changesUponFlattening($0.a2));
|
|
2631
2746
|
case 7: return {h: 0, a1: $0.a1()};
|
|
2632
2747
|
case 8: return {h: 0, a1: {h: 8, a1: $1c => Text_PrettyPrint_Prettyprinter_Doc_flatten($0.a1($1c))}};
|
|
@@ -2678,7 +2793,7 @@ function Data_String_Extra_join($0, $1, $2) {
|
|
|
2678
2793
|
}
|
|
2679
2794
|
|
|
2680
2795
|
function Data_String_Extra_index($0, $1) {
|
|
2681
|
-
return
|
|
2796
|
+
return Data_String_Extra_with__index_1618($1, Prelude_Types_fastUnpack($1), $0);
|
|
2682
2797
|
}
|
|
2683
2798
|
|
|
2684
2799
|
function Data_String_Extra_dropLast($0, $1) {
|
|
@@ -2689,7 +2804,7 @@ function Data_String_Extra_drop($0, $1) {
|
|
|
2689
2804
|
return Prelude_Types_substr($0, Prelude_Types_String_length($1), $1);
|
|
2690
2805
|
}
|
|
2691
2806
|
|
|
2692
|
-
function
|
|
2807
|
+
function Data_String_with__parsePositivex2cparsePosTrimmed_6830($0, $1, $2, $3, $4) {
|
|
2693
2808
|
switch($3) {
|
|
2694
2809
|
case '': {
|
|
2695
2810
|
switch($4.h) {
|
|
@@ -2743,7 +2858,7 @@ function Data_String_with__parsePositivex2cparsePosTrimmed_3968($0, $1, $2, $3,
|
|
|
2743
2858
|
}
|
|
2744
2859
|
}
|
|
2745
2860
|
|
|
2746
|
-
function
|
|
2861
|
+
function Data_String_with__asList_6479($0, $1) {
|
|
2747
2862
|
switch($0) {
|
|
2748
2863
|
case '': {
|
|
2749
2864
|
switch($1.h) {
|
|
@@ -2755,15 +2870,15 @@ function Data_String_with__asList_3617($0, $1) {
|
|
|
2755
2870
|
}
|
|
2756
2871
|
}
|
|
2757
2872
|
|
|
2758
|
-
function
|
|
2873
|
+
function Data_String_n__3615_6211_unlinesx27($0) {
|
|
2759
2874
|
switch($0.h) {
|
|
2760
2875
|
case 0: return {h: 0};
|
|
2761
|
-
case undefined: return {a1: $0.a1, a2: {a1: '\n', a2:
|
|
2876
|
+
case undefined: return {a1: $0.a1, a2: {a1: '\n', a2: Data_String_n__3615_6211_unlinesx27($0.a2)}};
|
|
2762
2877
|
}
|
|
2763
2878
|
}
|
|
2764
2879
|
|
|
2765
|
-
function
|
|
2766
|
-
return
|
|
2880
|
+
function Data_String_n__4219_6824_parsePosTrimmed($0, $1, $2) {
|
|
2881
|
+
return Data_String_with__parsePositivex2cparsePosTrimmed_6830(undefined, $0, $2, $2, Data_String_strM($2));
|
|
2767
2882
|
}
|
|
2768
2883
|
|
|
2769
2884
|
function Data_String_trim($0) {
|
|
@@ -2799,15 +2914,15 @@ function Data_String_replicate($0, $1) {
|
|
|
2799
2914
|
}
|
|
2800
2915
|
|
|
2801
2916
|
function Data_String_parsePositive($0, $1) {
|
|
2802
|
-
return
|
|
2917
|
+
return Data_String_n__4219_6824_parsePosTrimmed($0, $1, Data_String_trim($1));
|
|
2803
2918
|
}
|
|
2804
2919
|
|
|
2805
2920
|
function Data_String_ltrim($0) {
|
|
2806
|
-
return
|
|
2921
|
+
return Data_String_with__ltrim_6503($0, Data_String_asList($0));
|
|
2807
2922
|
}
|
|
2808
2923
|
|
|
2809
2924
|
function Data_String_linesx27($0) {
|
|
2810
|
-
return
|
|
2925
|
+
return Data_String_n__3748_6341_linesHelp($0, {h: 0}, $0);
|
|
2811
2926
|
}
|
|
2812
2927
|
|
|
2813
2928
|
function Data_String_lines($0) {
|
|
@@ -2815,11 +2930,11 @@ function Data_String_lines($0) {
|
|
|
2815
2930
|
}
|
|
2816
2931
|
|
|
2817
2932
|
function Data_String_isSuffixOf($0, $1) {
|
|
2818
|
-
return Data_List_isSuffixOf(
|
|
2933
|
+
return Data_List_isSuffixOf(csegen_176(), Prelude_Types_fastUnpack($0), Prelude_Types_fastUnpack($1));
|
|
2819
2934
|
}
|
|
2820
2935
|
|
|
2821
2936
|
function Data_String_isPrefixOf($0, $1) {
|
|
2822
|
-
return Data_List_isPrefixOf(
|
|
2937
|
+
return Data_List_isPrefixOf(csegen_176(), Prelude_Types_fastUnpack($0), Prelude_Types_fastUnpack($1));
|
|
2823
2938
|
}
|
|
2824
2939
|
|
|
2825
2940
|
function Data_String_indent($0, $1) {
|
|
@@ -2827,7 +2942,7 @@ function Data_String_indent($0, $1) {
|
|
|
2827
2942
|
}
|
|
2828
2943
|
|
|
2829
2944
|
function Data_String_fastUnlines($0) {
|
|
2830
|
-
return Prelude_Types_fastConcat(
|
|
2945
|
+
return Prelude_Types_fastConcat(Data_String_n__3615_6211_unlinesx27($0));
|
|
2831
2946
|
}
|
|
2832
2947
|
|
|
2833
2948
|
function Data_String_break$($0, $1) {
|
|
@@ -2841,7 +2956,7 @@ function Data_String_break$($0, $1) {
|
|
|
2841
2956
|
}
|
|
2842
2957
|
|
|
2843
2958
|
function Data_String_asList($0) {
|
|
2844
|
-
return
|
|
2959
|
+
return Data_String_with__asList_6479($0, Data_String_strM($0));
|
|
2845
2960
|
}
|
|
2846
2961
|
|
|
2847
2962
|
function Data_Fin_show_Show_x28Finx20x24nx29($0) {
|
|
@@ -2917,14 +3032,14 @@ function Builtin_believe_me($0) {
|
|
|
2917
3032
|
return $0;
|
|
2918
3033
|
}
|
|
2919
3034
|
|
|
2920
|
-
function
|
|
3035
|
+
function Prelude_Types_n__9361_8543_hexChars($0) {
|
|
2921
3036
|
return {a1: '0', a2: {a1: '1', a2: {a1: '2', a2: {a1: '3', a2: {a1: '4', a2: {a1: '5', a2: {a1: '6', a2: {a1: '7', a2: {a1: '8', a2: {a1: '9', a2: {a1: 'A', a2: {a1: 'B', a2: {a1: 'C', a2: {a1: 'D', a2: {a1: 'E', a2: {a1: 'F', a2: {h: 0}}}}}}}}}}}}}}}}};
|
|
2922
3037
|
}
|
|
2923
3038
|
|
|
2924
3039
|
function Prelude_Types_traverse_Traversable_List($0, $1, $2) {
|
|
2925
3040
|
switch($2.h) {
|
|
2926
3041
|
case 0: return $0.a2(undefined)({h: 0});
|
|
2927
|
-
case undefined: return $0.a3(undefined)(undefined)($0.a3(undefined)(undefined)($0.a2(undefined)(
|
|
3042
|
+
case undefined: return $0.a3(undefined)(undefined)($0.a3(undefined)(undefined)($0.a2(undefined)(csegen_192()))($1($2.a1)))(Prelude_Types_traverse_Traversable_List($0, $1, $2.a2));
|
|
2928
3043
|
}
|
|
2929
3044
|
}
|
|
2930
3045
|
|
|
@@ -2936,11 +3051,11 @@ function Prelude_Types_traverse_Traversable_x28Eitherx20x24ex29($0, $1, $2) {
|
|
|
2936
3051
|
}
|
|
2937
3052
|
|
|
2938
3053
|
function Prelude_Types_toList_Foldable_Maybe($0) {
|
|
2939
|
-
return Prelude_Types_foldr_Foldable_Maybe(
|
|
3054
|
+
return Prelude_Types_foldr_Foldable_Maybe(csegen_192(), {h: 0}, $0);
|
|
2940
3055
|
}
|
|
2941
3056
|
|
|
2942
3057
|
function Prelude_Types_toList_Foldable_x28Eitherx20x24ex29($0) {
|
|
2943
|
-
return Prelude_Types_foldr_Foldable_x28Eitherx20x24ex29(
|
|
3058
|
+
return Prelude_Types_foldr_Foldable_x28Eitherx20x24ex29(csegen_192(), {h: 0}, $0);
|
|
2944
3059
|
}
|
|
2945
3060
|
|
|
2946
3061
|
function Prelude_Types_rangeFromTo_Range_x24a($0, $1, $2) {
|
|
@@ -3059,7 +3174,7 @@ function Prelude_Types_foldr_Foldable_x28Eitherx20x24ex29($0, $1, $2) {
|
|
|
3059
3174
|
}
|
|
3060
3175
|
|
|
3061
3176
|
function Prelude_Types_foldl_Foldable_x28Eitherx20x24ex29($0, $1, $2) {
|
|
3062
|
-
return Prelude_Types_foldr_Foldable_x28Eitherx20x24ex29($6 => $7 => Prelude_Basics_flip(
|
|
3177
|
+
return Prelude_Types_foldr_Foldable_x28Eitherx20x24ex29($6 => $7 => Prelude_Basics_flip(csegen_193(), $c => Prelude_Basics_flip($0, $6, $c), $7), $13 => $13, $2)($1);
|
|
3063
3178
|
}
|
|
3064
3179
|
|
|
3065
3180
|
function Prelude_Types_foldlM_Foldable_List($0, $1, $2, $3) {
|
|
@@ -3210,7 +3325,7 @@ function Prelude_Types_maybe($0, $1, $2) {
|
|
|
3210
3325
|
}
|
|
3211
3326
|
|
|
3212
3327
|
function Prelude_Types_listBind($0, $1) {
|
|
3213
|
-
return
|
|
3328
|
+
return Prelude_Types_listBindOnto($1, {h: 0}, $0);
|
|
3214
3329
|
}
|
|
3215
3330
|
|
|
3216
3331
|
function Prelude_Types_List_lengthTR($0) {
|
|
@@ -3268,7 +3383,7 @@ function Prelude_Types_isLower($0) {
|
|
|
3268
3383
|
}
|
|
3269
3384
|
|
|
3270
3385
|
function Prelude_Types_isHexDigit($0) {
|
|
3271
|
-
return Prelude_Types_elem(
|
|
3386
|
+
return Prelude_Types_elem(csegen_77(), csegen_176(), Prelude_Types_toUpper($0), Prelude_Types_n__9361_8543_hexChars($0));
|
|
3272
3387
|
}
|
|
3273
3388
|
|
|
3274
3389
|
function Prelude_Types_isDigit($0) {
|
|
@@ -3329,15 +3444,15 @@ function Prelude_Types_countFrom($0, $1) {
|
|
|
3329
3444
|
|
|
3330
3445
|
function Prelude_Num_mod_Integral_Int($0, $1) {
|
|
3331
3446
|
switch(Prelude_EqOrd_x3dx3d_Eq_Int($1, Number(_truncBigInt32(0n)))) {
|
|
3332
|
-
case 0: return ($0
|
|
3333
|
-
default: return Builtin_idris_crash(undefined)('Unhandled input for Prelude.Num.case block in mod at Prelude.Num:
|
|
3447
|
+
case 0: return _mod($0, $1);
|
|
3448
|
+
default: return Builtin_idris_crash(undefined)('Unhandled input for Prelude.Num.case block in mod at Prelude.Num:131:3--133:40');
|
|
3334
3449
|
}
|
|
3335
3450
|
}
|
|
3336
3451
|
|
|
3337
3452
|
function Prelude_Num_div_Integral_Int($0, $1) {
|
|
3338
3453
|
switch(Prelude_EqOrd_x3dx3d_Eq_Int($1, Number(_truncBigInt32(0n)))) {
|
|
3339
3454
|
case 0: return _div32s($0, $1);
|
|
3340
|
-
default: return Builtin_idris_crash(undefined)('Unhandled input for Prelude.Num.case block in div at Prelude.Num:
|
|
3455
|
+
default: return Builtin_idris_crash(undefined)('Unhandled input for Prelude.Num.case block in div at Prelude.Num:128:3--130:40');
|
|
3341
3456
|
}
|
|
3342
3457
|
}
|
|
3343
3458
|
|
|
@@ -3740,7 +3855,11 @@ function Prelude_Interfaces_x2ax3e($0, $1, $2) {
|
|
|
3740
3855
|
return $0.a3(undefined)(undefined)($0.a1(undefined)(undefined)($13 => $14 => $14)($1))($2);
|
|
3741
3856
|
}
|
|
3742
3857
|
|
|
3743
|
-
function
|
|
3858
|
+
function Prelude_Interfaces_x24x3e($0, $1, $2) {
|
|
3859
|
+
return $0(undefined)(undefined)($a => $2)($1);
|
|
3860
|
+
}
|
|
3861
|
+
|
|
3862
|
+
function Prelude_Show_n__2390_10835_asciiTab($0) {
|
|
3744
3863
|
return {a1: 'NUL', a2: {a1: 'SOH', a2: {a1: 'STX', a2: {a1: 'ETX', a2: {a1: 'EOT', a2: {a1: 'ENQ', a2: {a1: 'ACK', a2: {a1: 'BEL', a2: {a1: 'BS', a2: {a1: 'HT', a2: {a1: 'LF', a2: {a1: 'VT', a2: {a1: 'FF', a2: {a1: 'CR', a2: {a1: 'SO', a2: {a1: 'SI', a2: {a1: 'DLE', a2: {a1: 'DC1', a2: {a1: 'DC2', a2: {a1: 'DC3', a2: {a1: 'DC4', a2: {a1: 'NAK', a2: {a1: 'SYN', a2: {a1: 'ETB', a2: {a1: 'CAN', a2: {a1: 'EM', a2: {a1: 'SUB', a2: {a1: 'ESC', a2: {a1: 'FS', a2: {a1: 'GS', a2: {a1: 'RS', a2: {a1: 'US', a2: {h: 0}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}};
|
|
3745
3864
|
}
|
|
3746
3865
|
|
|
@@ -3776,7 +3895,7 @@ function Prelude_Show_show_Show_Bits32($0) {
|
|
|
3776
3895
|
}
|
|
3777
3896
|
|
|
3778
3897
|
function Prelude_Show_show_Show_x28Listx20x24ax29($0, $1) {
|
|
3779
|
-
return ('['+(
|
|
3898
|
+
return ('['+(Prelude_Show_n__3172_11556_showx27($0, $1, '', $1)+']'));
|
|
3780
3899
|
}
|
|
3781
3900
|
|
|
3782
3901
|
function Prelude_Show_showPrec_Show_String($0, $1) {
|
|
@@ -3848,7 +3967,7 @@ function Prelude_Show_showLitChar($0) {
|
|
|
3848
3967
|
case '\u{5c}': return $23 => ('\u{5c}\u{5c}'+$23);
|
|
3849
3968
|
default: {
|
|
3850
3969
|
return $26 => {
|
|
3851
|
-
const $27 = Prelude_Types_getAt(Prelude_Types_prim__integerToNat(BigInt($0.codePointAt(0))),
|
|
3970
|
+
const $27 = Prelude_Types_getAt(Prelude_Types_prim__integerToNat(BigInt($0.codePointAt(0))), Prelude_Show_n__2390_10835_asciiTab($0));
|
|
3852
3971
|
switch($27.h) {
|
|
3853
3972
|
case undefined: return ('\u{5c}'+($27.a1+$26));
|
|
3854
3973
|
case 0: {
|
|
@@ -4189,7 +4308,7 @@ function Data_List1_x2bx2b($0, $1) {
|
|
|
4189
4308
|
return Data_List1_appendl($0, Data_List1_forget($1));
|
|
4190
4309
|
}
|
|
4191
4310
|
|
|
4192
|
-
function
|
|
4311
|
+
function Data_List_with__inBounds_3222($0, $1, $2, $3, $4) {
|
|
4193
4312
|
switch($3.h) {
|
|
4194
4313
|
case 0: return {h: 0, a1: ($3.a1+1n)};
|
|
4195
4314
|
case 1: {
|
|
@@ -4207,15 +4326,15 @@ function Data_List_with__inBounds_1883($0, $1, $2, $3, $4) {
|
|
|
4207
4326
|
}
|
|
4208
4327
|
}
|
|
4209
4328
|
|
|
4210
|
-
function
|
|
4211
|
-
return
|
|
4329
|
+
function Data_List_n__7156_6664_split($0, $1, $2) {
|
|
4330
|
+
return Data_List_n__7156_6663_splitRec($0, $1, $2, $2, $9 => $9);
|
|
4212
4331
|
}
|
|
4213
4332
|
|
|
4214
|
-
function
|
|
4333
|
+
function Data_List_n__7655_7156_go($0, $1, $2, $3, $4) {
|
|
4215
4334
|
switch($4.h) {
|
|
4216
4335
|
case 0: return {a1: Data_List1_singleton($3), a2: {h: 0}};
|
|
4217
4336
|
case undefined: {
|
|
4218
|
-
const $a =
|
|
4337
|
+
const $a = Data_List_n__7655_7156_go($0, $1, $2, $4.a1, $4.a2);
|
|
4219
4338
|
switch($2($3)($4.a1)) {
|
|
4220
4339
|
case 1: return {a1: Data_List1_cons($3, $a.a1), a2: $a.a2};
|
|
4221
4340
|
case 0: return {a1: Data_List1_singleton($3), a2: {a1: $a.a1, a2: $a.a2}};
|
|
@@ -4295,13 +4414,13 @@ function Data_List_sortBy($0, $1) {
|
|
|
4295
4414
|
switch($1.a2.h) {
|
|
4296
4415
|
case 0: return {a1: $1.a1, a2: {h: 0}};
|
|
4297
4416
|
default: {
|
|
4298
|
-
const $6 =
|
|
4417
|
+
const $6 = Data_List_n__7156_6664_split($1, $0, $1);
|
|
4299
4418
|
return Data_List_mergeBy($0, Data_List_sortBy($0, $6.a1), Data_List_sortBy($0, $6.a2));
|
|
4300
4419
|
}
|
|
4301
4420
|
}
|
|
4302
4421
|
}
|
|
4303
4422
|
default: {
|
|
4304
|
-
const $15 =
|
|
4423
|
+
const $15 = Data_List_n__7156_6664_split($1, $0, $1);
|
|
4305
4424
|
return Data_List_mergeBy($0, Data_List_sortBy($0, $15.a1), Data_List_sortBy($0, $15.a2));
|
|
4306
4425
|
}
|
|
4307
4426
|
}
|
|
@@ -4335,7 +4454,7 @@ function Data_List_partition($0, $1) {
|
|
|
4335
4454
|
}
|
|
4336
4455
|
|
|
4337
4456
|
function Data_List_nubBy($0, $1) {
|
|
4338
|
-
return
|
|
4457
|
+
return Data_List_n__4343_3930_nubByx27({h: 0}, $0, $1);
|
|
4339
4458
|
}
|
|
4340
4459
|
|
|
4341
4460
|
function Data_List_nub($0, $1) {
|
|
@@ -4404,7 +4523,7 @@ function Data_List_inBounds($0, $1) {
|
|
|
4404
4523
|
case 0n: return {h: 0, a1: 0n};
|
|
4405
4524
|
default: {
|
|
4406
4525
|
const $a = ($0-1n);
|
|
4407
|
-
return
|
|
4526
|
+
return Data_List_with__inBounds_3222(undefined, $a, $1.a2, Data_List_inBounds($a, $1.a2), $1.a1);
|
|
4408
4527
|
}
|
|
4409
4528
|
}
|
|
4410
4529
|
}
|
|
@@ -4430,7 +4549,7 @@ function Data_List_groupBy($0, $1) {
|
|
|
4430
4549
|
switch($1.h) {
|
|
4431
4550
|
case 0: return {h: 0};
|
|
4432
4551
|
case undefined: {
|
|
4433
|
-
const $3 =
|
|
4552
|
+
const $3 = Data_List_n__7655_7156_go($1.a1, $1.a2, $0, $1.a1, $1.a2);
|
|
4434
4553
|
return {a1: $3.a1, a2: $3.a2};
|
|
4435
4554
|
}
|
|
4436
4555
|
}
|
|
@@ -4457,7 +4576,7 @@ function Data_List_delete($0, $1, $2) {
|
|
|
4457
4576
|
}
|
|
4458
4577
|
|
|
4459
4578
|
function Data_List_catMaybes($0) {
|
|
4460
|
-
return
|
|
4579
|
+
return Prelude_Types_List_mapMaybe($3 => $3, $0);
|
|
4461
4580
|
}
|
|
4462
4581
|
|
|
4463
4582
|
function Data_List_break$($0, $1) {
|
|
@@ -4475,7 +4594,7 @@ function Data_List_x5cx5c($0, $1, $2) {
|
|
|
4475
4594
|
}
|
|
4476
4595
|
|
|
4477
4596
|
function Control_Monad_ST_map_Functor_x28STx20x24sx29($0, $1) {
|
|
4478
|
-
return Prelude_Interfaces_x3cx24x3e(
|
|
4597
|
+
return Prelude_Interfaces_x3cx24x3e(csegen_85(), $0, $1);
|
|
4479
4598
|
}
|
|
4480
4599
|
|
|
4481
4600
|
function Control_Monad_ST_join_Monad_x28STx20x24sx29($0, $1) {
|
|
@@ -4498,7 +4617,7 @@ function Control_Monad_ST_runST($0) {
|
|
|
4498
4617
|
}
|
|
4499
4618
|
|
|
4500
4619
|
function Control_Monad_ST_newSTRef($0, $1) {
|
|
4501
|
-
const $2 = Data_IORef_newIORef(
|
|
4620
|
+
const $2 = Data_IORef_newIORef(csegen_59(), $0)($1);
|
|
4502
4621
|
return $2;
|
|
4503
4622
|
}
|
|
4504
4623
|
|
|
@@ -4510,7 +4629,7 @@ function Data_IORef_newIORef($0, $1) {
|
|
|
4510
4629
|
return $0.a1.a2(undefined)(undefined)($0.a2(undefined)($10 => ({value:$1})))(m => $0.a1.a1.a2(undefined)(m));
|
|
4511
4630
|
}
|
|
4512
4631
|
|
|
4513
|
-
function
|
|
4632
|
+
function Control_ANSI_SGR_n__3202_2726_toCode($0, $1) {
|
|
4514
4633
|
switch($1.h) {
|
|
4515
4634
|
case 0: return '0';
|
|
4516
4635
|
case 1: return ('38;5;'+Control_ANSI_SGR_cast_Cast_Color_String($1.a1));
|
|
@@ -4564,7 +4683,7 @@ function Control_ANSI_SGR_cast_Cast_Blink_String($0) {
|
|
|
4564
4683
|
}
|
|
4565
4684
|
|
|
4566
4685
|
function Control_ANSI_SGR_escapeSGR($0) {
|
|
4567
|
-
return ('\u{1b}['+(Prelude_Interfaces_concat(
|
|
4686
|
+
return ('\u{1b}['+(Prelude_Interfaces_concat(csegen_62(), csegen_77(), Data_List_intersperse(';', Prelude_Interfaces_x3cx24x3e(csegen_119(), $11 => Control_ANSI_SGR_n__3202_2726_toCode($0, $11), $0)))+'m'));
|
|
4568
4687
|
}
|
|
4569
4688
|
|
|
4570
4689
|
const Text_PrettyPrint_Prettyprinter_Symbols_rparen = __lazy(function () {
|
|
@@ -4593,7 +4712,7 @@ const Data_Fuel_forever = __lazy(function () {
|
|
|
4593
4712
|
return {a1: () => Data_Fuel_forever()};
|
|
4594
4713
|
});
|
|
4595
4714
|
|
|
4596
|
-
function
|
|
4715
|
+
function Data_Config_n__5186_7922_parseConfigJson($0, $1) {
|
|
4597
4716
|
switch($1.h) {
|
|
4598
4717
|
case 5: {
|
|
4599
4718
|
const $18 = $19 => {
|
|
@@ -4614,7 +4733,7 @@ function Data_Config_n__4694_5004_parseConfigJson($0, $1) {
|
|
|
4614
4733
|
}
|
|
4615
4734
|
|
|
4616
4735
|
function Data_Config_show_Show_Config($0) {
|
|
4617
|
-
return Data_String_fastUnlines({a1: Prelude_Interfaces_concat(
|
|
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.a4), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' assignTeams: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a5), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'commentOnAssign: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a6), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' teamSlugs: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $0.a7), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' orgMembers: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $0.a8), a2: {h: 0}}}), a2: {h: 0}}}}}}}}});
|
|
4618
4737
|
}
|
|
4619
4738
|
|
|
4620
4739
|
function Data_Config_showPrec_Show_Config($0, $1) {
|
|
@@ -4656,33 +4775,33 @@ function Data_Config_parseConfig($0, $1) {
|
|
|
4656
4775
|
}
|
|
4657
4776
|
};
|
|
4658
4777
|
const $4 = {a1: $5, a2: a => $d => ({h: 1, a1: $d}), a3: $f};
|
|
4659
|
-
const $3 = {a1: $4, a2:
|
|
4660
|
-
return Prelude_Interfaces_x3ex3dx3e($3,
|
|
4778
|
+
const $3 = {a1: $4, a2: csegen_244(), a3: csegen_245()};
|
|
4779
|
+
return Prelude_Interfaces_x3ex3dx3e($3, csegen_246(), $20 => Data_Config_n__5186_7922_parseConfigJson($0, $20), $1);
|
|
4661
4780
|
}
|
|
4662
4781
|
|
|
4663
4782
|
function Data_Config_json($0) {
|
|
4664
|
-
return {h: 5, a1: {a1: {a1: 'mainBranch', a2: {h: 3, a1: $0.a4}}, a2: {a1: {a1: 'assignTeams', a2: {h: 1, a1: $0.a5}}, a2: {a1: {a1: 'commentOnAssign', a2: {h: 1, a1: $0.a6}}, a2: {a1: {a1: 'org', a2: {h: 3, a1: $0.a2}}, a2: {a1: {a1: 'orgMembers', a2: {h: 4, a1: Prelude_Interfaces_x3cx24x3e(
|
|
4783
|
+
return {h: 5, a1: {a1: {a1: 'mainBranch', a2: {h: 3, a1: $0.a4}}, a2: {a1: {a1: 'assignTeams', a2: {h: 1, a1: $0.a5}}, a2: {a1: {a1: 'commentOnAssign', a2: {h: 1, a1: $0.a6}}, a2: {a1: {a1: 'org', a2: {h: 3, a1: $0.a2}}, a2: {a1: {a1: 'orgMembers', a2: {h: 4, a1: Prelude_Interfaces_x3cx24x3e(csegen_119(), $1f => ({h: 3, a1: $1f}), Data_List_sort(csegen_111(), $0.a8))}}, a2: {a1: {a1: 'repo', a2: {h: 3, a1: $0.a3}}, a2: {a1: {a1: 'teamSlugs', a2: {h: 4, a1: Prelude_Interfaces_x3cx24x3e(csegen_119(), $34 => ({h: 3, a1: $34}), Data_List_sort(csegen_111(), $0.a7))}}, a2: {a1: {a1: 'updatedAt', a2: {h: 2, a1: Prelude_Cast_cast_Cast_Bits32_Double($0.a1)}}, a2: {h: 0}}}}}}}}}};
|
|
4665
4784
|
}
|
|
4666
4785
|
|
|
4667
4786
|
const Data_Config_filename = __lazy(function () {
|
|
4668
4787
|
return 'harmony.json';
|
|
4669
4788
|
});
|
|
4670
4789
|
|
|
4671
|
-
function
|
|
4672
|
-
return Data_Either_maybeToEither(() => Prelude_Interfaces_concat(
|
|
4790
|
+
function Language_JSON_Accessors_n__3991_6998_lookupx27($0, $1, $2, $3, $4) {
|
|
4791
|
+
return Data_Either_maybeToEither(() => Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Missing required key: ', a2: {a1: $3, a2: {a1: '.', a2: {h: 0}}}}), Data_List_lookup(csegen_94(), $3, $4));
|
|
4673
4792
|
}
|
|
4674
4793
|
|
|
4675
4794
|
function Language_JSON_Accessors_string($0) {
|
|
4676
4795
|
switch($0.h) {
|
|
4677
4796
|
case 3: return {h: 1, a1: $0.a1};
|
|
4678
|
-
default: return {h: 0, a1: Prelude_Interfaces_concat(
|
|
4797
|
+
default: return {h: 0, a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Expected a string but found ', a2: {a1: Language_JSON_Data_show_Show_JSON($0), a2: {a1: '.', a2: {h: 0}}}})};
|
|
4679
4798
|
}
|
|
4680
4799
|
}
|
|
4681
4800
|
|
|
4682
4801
|
function Language_JSON_Accessors_object($0) {
|
|
4683
4802
|
switch($0.h) {
|
|
4684
4803
|
case 5: return {h: 1, a1: $0.a1};
|
|
4685
|
-
default: return {h: 0, a1: Prelude_Interfaces_concat(
|
|
4804
|
+
default: return {h: 0, a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Expected an object but found ', a2: {a1: Language_JSON_Data_show_Show_JSON($0), a2: {a1: '.', a2: {h: 0}}}})};
|
|
4686
4805
|
}
|
|
4687
4806
|
}
|
|
4688
4807
|
|
|
@@ -4690,7 +4809,7 @@ function Language_JSON_Accessors_lookupAll($0, $1) {
|
|
|
4690
4809
|
switch($0.h) {
|
|
4691
4810
|
case 0: return {h: 1, a1: {h: 0}};
|
|
4692
4811
|
case undefined: {
|
|
4693
|
-
const $4 =
|
|
4812
|
+
const $4 = Language_JSON_Accessors_n__3991_6998_lookupx27($0.a1, $0.a2, $1, $0.a1, $1);
|
|
4694
4813
|
switch($4.h) {
|
|
4695
4814
|
case 1: {
|
|
4696
4815
|
const $b = Language_JSON_Accessors_lookupAll($0.a2, $1);
|
|
@@ -4708,14 +4827,14 @@ function Language_JSON_Accessors_lookupAll($0, $1) {
|
|
|
4708
4827
|
function Language_JSON_Accessors_integer($0) {
|
|
4709
4828
|
switch($0.h) {
|
|
4710
4829
|
case 2: return {h: 1, a1: Prelude_Cast_cast_Cast_Double_Integer($0.a1)};
|
|
4711
|
-
default: return {h: 0, a1: Prelude_Interfaces_concat(
|
|
4830
|
+
default: return {h: 0, a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Expected an integer but found ', a2: {a1: Language_JSON_Data_show_Show_JSON($0), a2: {a1: '.', a2: {h: 0}}}})};
|
|
4712
4831
|
}
|
|
4713
4832
|
}
|
|
4714
4833
|
|
|
4715
4834
|
function Language_JSON_Accessors_bool($0) {
|
|
4716
4835
|
switch($0.h) {
|
|
4717
4836
|
case 1: return {h: 1, a1: $0.a1};
|
|
4718
|
-
default: return {h: 0, a1: Prelude_Interfaces_concat(
|
|
4837
|
+
default: return {h: 0, a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Expected a bool but found ', a2: {a1: Language_JSON_Data_show_Show_JSON($0), a2: {a1: '.', a2: {h: 0}}}})};
|
|
4719
4838
|
}
|
|
4720
4839
|
}
|
|
4721
4840
|
|
|
@@ -4742,7 +4861,7 @@ function Language_JSON_Accessors_array($0, $1) {
|
|
|
4742
4861
|
const $4 = {a1: $5, a2: a => $d => ({h: 1, a1: $d}), a3: $f};
|
|
4743
4862
|
return Prelude_Types_traverse_Traversable_List($4, $0, $1.a1);
|
|
4744
4863
|
}
|
|
4745
|
-
default: return {h: 0, a1: Prelude_Interfaces_concat(
|
|
4864
|
+
default: return {h: 0, a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Expected an array but found ', a2: {a1: Language_JSON_Data_show_Show_JSON($1), a2: {a1: '.', a2: {h: 0}}}})};
|
|
4746
4865
|
}
|
|
4747
4866
|
}
|
|
4748
4867
|
|
|
@@ -4785,17 +4904,17 @@ function Text_Bounded_mergeBounds($0, $1) {
|
|
|
4785
4904
|
switch($1.h) {
|
|
4786
4905
|
case undefined: {
|
|
4787
4906
|
switch($1.a2) {
|
|
4788
|
-
case 1: return Prelude_Interfaces_x3cx24x3e(
|
|
4907
|
+
case 1: return Prelude_Interfaces_x3cx24x3e(csegen_249(), $e => $1.a1, $0);
|
|
4789
4908
|
default: {
|
|
4790
|
-
const $10 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(
|
|
4791
|
-
const $1c = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(
|
|
4909
|
+
const $10 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_260(), csegen_260(), Text_Bounded_start($0), Text_Bounded_start($1));
|
|
4910
|
+
const $1c = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_260(), csegen_260(), Text_Bounded_end($0), Text_Bounded_end($1));
|
|
4792
4911
|
return {a1: $1.a1, a2: 0, a3: {a1: $10.a1, a2: $10.a2, a3: $1c.a1, a4: $1c.a2}};
|
|
4793
4912
|
}
|
|
4794
4913
|
}
|
|
4795
4914
|
}
|
|
4796
4915
|
default: {
|
|
4797
|
-
const $30 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(
|
|
4798
|
-
const $3c = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(
|
|
4916
|
+
const $30 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_260(), csegen_260(), Text_Bounded_start($0), Text_Bounded_start($1));
|
|
4917
|
+
const $3c = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_260(), csegen_260(), Text_Bounded_end($0), Text_Bounded_end($1));
|
|
4799
4918
|
return {a1: $1.a1, a2: 0, a3: {a1: $30.a1, a2: $30.a2, a3: $3c.a1, a4: $3c.a2}};
|
|
4800
4919
|
}
|
|
4801
4920
|
}
|
|
@@ -4806,17 +4925,17 @@ function Text_Bounded_mergeBounds($0, $1) {
|
|
|
4806
4925
|
switch($1.h) {
|
|
4807
4926
|
case undefined: {
|
|
4808
4927
|
switch($1.a2) {
|
|
4809
|
-
case 1: return Prelude_Interfaces_x3cx24x3e(
|
|
4928
|
+
case 1: return Prelude_Interfaces_x3cx24x3e(csegen_249(), $56 => $1.a1, $0);
|
|
4810
4929
|
default: {
|
|
4811
|
-
const $58 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(
|
|
4812
|
-
const $64 = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(
|
|
4930
|
+
const $58 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_260(), csegen_260(), Text_Bounded_start($0), Text_Bounded_start($1));
|
|
4931
|
+
const $64 = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_260(), csegen_260(), Text_Bounded_end($0), Text_Bounded_end($1));
|
|
4813
4932
|
return {a1: $1.a1, a2: 0, a3: {a1: $58.a1, a2: $58.a2, a3: $64.a1, a4: $64.a2}};
|
|
4814
4933
|
}
|
|
4815
4934
|
}
|
|
4816
4935
|
}
|
|
4817
4936
|
default: {
|
|
4818
|
-
const $78 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(
|
|
4819
|
-
const $84 = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(
|
|
4937
|
+
const $78 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_260(), csegen_260(), Text_Bounded_start($0), Text_Bounded_start($1));
|
|
4938
|
+
const $84 = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_260(), csegen_260(), Text_Bounded_end($0), Text_Bounded_end($1));
|
|
4820
4939
|
return {a1: $1.a1, a2: 0, a3: {a1: $78.a1, a2: $78.a2, a3: $84.a1, a4: $84.a2}};
|
|
4821
4940
|
}
|
|
4822
4941
|
}
|
|
@@ -4836,7 +4955,7 @@ function Text_Bounded_end($0) {
|
|
|
4836
4955
|
return Text_Bounded_endBounds($0.a3);
|
|
4837
4956
|
}
|
|
4838
4957
|
|
|
4839
|
-
function
|
|
4958
|
+
function Language_JSON_Data_n__4587_6424_stringifyValues($0, $1) {
|
|
4840
4959
|
switch($1.h) {
|
|
4841
4960
|
case 0: return '';
|
|
4842
4961
|
case undefined: {
|
|
@@ -4847,7 +4966,7 @@ function Language_JSON_Data_n__4084_3506_stringifyValues($0, $1) {
|
|
|
4847
4966
|
break;
|
|
4848
4967
|
}
|
|
4849
4968
|
case 0: {
|
|
4850
|
-
$6 = (','+
|
|
4969
|
+
$6 = (','+Language_JSON_Data_n__4587_6424_stringifyValues($0, $1.a2));
|
|
4851
4970
|
break;
|
|
4852
4971
|
}
|
|
4853
4972
|
}
|
|
@@ -4856,7 +4975,7 @@ function Language_JSON_Data_n__4084_3506_stringifyValues($0, $1) {
|
|
|
4856
4975
|
}
|
|
4857
4976
|
}
|
|
4858
4977
|
|
|
4859
|
-
function
|
|
4978
|
+
function Language_JSON_Data_n__4587_6469_stringifyProps($0, $1) {
|
|
4860
4979
|
switch($1.h) {
|
|
4861
4980
|
case 0: return '';
|
|
4862
4981
|
case undefined: {
|
|
@@ -4867,25 +4986,25 @@ function Language_JSON_Data_n__4084_3551_stringifyProps($0, $1) {
|
|
|
4867
4986
|
break;
|
|
4868
4987
|
}
|
|
4869
4988
|
case 0: {
|
|
4870
|
-
$7 = (','+
|
|
4989
|
+
$7 = (','+Language_JSON_Data_n__4587_6469_stringifyProps($0, $1.a2));
|
|
4871
4990
|
break;
|
|
4872
4991
|
}
|
|
4873
4992
|
}
|
|
4874
|
-
return (
|
|
4993
|
+
return (Language_JSON_Data_n__4587_6468_stringifyProp($0, $1.a1)+$7);
|
|
4875
4994
|
}
|
|
4876
4995
|
}
|
|
4877
4996
|
}
|
|
4878
4997
|
|
|
4879
|
-
function
|
|
4998
|
+
function Language_JSON_Data_n__4587_6468_stringifyProp($0, $1) {
|
|
4880
4999
|
return (Language_JSON_Data_showString($1.a1)+(':'+Language_JSON_Data_stringify($1.a2)));
|
|
4881
5000
|
}
|
|
4882
5001
|
|
|
4883
|
-
function
|
|
5002
|
+
function Language_JSON_Data_n__4851_6669_formatValues($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
|
|
4884
5003
|
const $13 = {a1: $4, a2: $3};
|
|
4885
5004
|
let $12;
|
|
4886
5005
|
switch($8.a2.h) {
|
|
4887
5006
|
case undefined: {
|
|
4888
|
-
$12 = (',\n'+
|
|
5007
|
+
$12 = (',\n'+Language_JSON_Data_n__4851_6669_formatValues($0, $1, $2, $3, $4, $13, $6, $7, $8.a2, undefined));
|
|
4889
5008
|
break;
|
|
4890
5009
|
}
|
|
4891
5010
|
case 0: {
|
|
@@ -4896,19 +5015,19 @@ function Language_JSON_Data_n__4348_3751_formatValues($0, $1, $2, $3, $4, $5, $6
|
|
|
4896
5015
|
return (Language_JSON_Data_format(($7+$6), $6, $8.a1)+$12);
|
|
4897
5016
|
}
|
|
4898
5017
|
|
|
4899
|
-
function
|
|
5018
|
+
function Language_JSON_Data_n__4835_6640_formatValue($0, $1, $2, $3, $4, $5) {
|
|
4900
5019
|
switch($5.h) {
|
|
4901
5020
|
case 4: {
|
|
4902
5021
|
switch($5.a1.h) {
|
|
4903
5022
|
case 0: return '[]';
|
|
4904
|
-
case undefined: return ('[\n'+(
|
|
5023
|
+
case undefined: return ('[\n'+(Language_JSON_Data_n__4851_6669_formatValues($0, $1, $2, $5.a1.a2, $5.a1.a1, $5.a1, $4, $3, $5.a1, undefined)+Data_String_indent($3, ']')));
|
|
4905
5024
|
default: return Language_JSON_Data_stringify($5);
|
|
4906
5025
|
}
|
|
4907
5026
|
}
|
|
4908
5027
|
case 5: {
|
|
4909
5028
|
switch($5.a1.h) {
|
|
4910
5029
|
case 0: return '{}';
|
|
4911
|
-
case undefined: return ('{\n'+(
|
|
5030
|
+
case undefined: return ('{\n'+(Language_JSON_Data_n__4851_6774_formatProps($0, $1, $2, $5.a1.a2, $5.a1.a1, $5.a1, $4, $3, $5.a1, undefined)+Data_String_indent($3, '}')));
|
|
4912
5031
|
default: return Language_JSON_Data_stringify($5);
|
|
4913
5032
|
}
|
|
4914
5033
|
}
|
|
@@ -4916,12 +5035,12 @@ function Language_JSON_Data_n__4332_3722_formatValue($0, $1, $2, $3, $4, $5) {
|
|
|
4916
5035
|
}
|
|
4917
5036
|
}
|
|
4918
5037
|
|
|
4919
|
-
function
|
|
5038
|
+
function Language_JSON_Data_n__4851_6774_formatProps($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
|
|
4920
5039
|
const $17 = {a1: $4, a2: $3};
|
|
4921
5040
|
let $16;
|
|
4922
5041
|
switch($8.a2.h) {
|
|
4923
5042
|
case undefined: {
|
|
4924
|
-
$16 = (',\n'+
|
|
5043
|
+
$16 = (',\n'+Language_JSON_Data_n__4851_6774_formatProps($0, $1, $2, $3, $4, $17, $6, $7, $8.a2, undefined));
|
|
4925
5044
|
break;
|
|
4926
5045
|
}
|
|
4927
5046
|
case 0: {
|
|
@@ -4929,11 +5048,11 @@ function Language_JSON_Data_n__4348_3856_formatProps($0, $1, $2, $3, $4, $5, $6,
|
|
|
4929
5048
|
break;
|
|
4930
5049
|
}
|
|
4931
5050
|
}
|
|
4932
|
-
return (
|
|
5051
|
+
return (Language_JSON_Data_n__4851_6773_formatProp($0, $1, $2, $3, $4, $5, $6, $7, $8.a1)+$16);
|
|
4933
5052
|
}
|
|
4934
5053
|
|
|
4935
|
-
function
|
|
4936
|
-
return (Data_String_indent(($7+$6), (Language_JSON_Data_showString($8.a1)+': '))+
|
|
5054
|
+
function Language_JSON_Data_n__4851_6773_formatProp($0, $1, $2, $3, $4, $5, $6, $7, $8) {
|
|
5055
|
+
return (Data_String_indent(($7+$6), (Language_JSON_Data_showString($8.a1)+': '))+Language_JSON_Data_n__4835_6640_formatValue($0, $1, $2, ($7+$6), $6, $8.a2));
|
|
4937
5056
|
}
|
|
4938
5057
|
|
|
4939
5058
|
function Language_JSON_Data_show_Show_JSON($0) {
|
|
@@ -4955,13 +5074,13 @@ function Language_JSON_Data_stringify($0) {
|
|
|
4955
5074
|
}
|
|
4956
5075
|
case 2: return Prelude_Show_show_Show_Double($0.a1);
|
|
4957
5076
|
case 3: return Language_JSON_Data_showString($0.a1);
|
|
4958
|
-
case 4: return ('['+(
|
|
4959
|
-
case 5: return ('{'+(
|
|
5077
|
+
case 4: return ('['+(Language_JSON_Data_n__4587_6424_stringifyValues($0.a1, $0.a1)+']'));
|
|
5078
|
+
case 5: return ('{'+(Language_JSON_Data_n__4587_6469_stringifyProps($0.a1, $0.a1)+'}'));
|
|
4960
5079
|
}
|
|
4961
5080
|
}
|
|
4962
5081
|
|
|
4963
5082
|
function Language_JSON_Data_showString($0) {
|
|
4964
|
-
return ('\"'+(Prelude_Interfaces_concatMap(
|
|
5083
|
+
return ('\"'+(Prelude_Interfaces_concatMap(csegen_62(), csegen_77(), $a => Language_JSON_Data_showChar($a), Prelude_Types_fastUnpack($0))+'\"'));
|
|
4965
5084
|
}
|
|
4966
5085
|
|
|
4967
5086
|
function Language_JSON_Data_showChar($0) {
|
|
@@ -4997,7 +5116,7 @@ function Language_JSON_Data_showChar($0) {
|
|
|
4997
5116
|
}
|
|
4998
5117
|
|
|
4999
5118
|
function Language_JSON_Data_format($0, $1, $2) {
|
|
5000
|
-
return Data_String_indent($0,
|
|
5119
|
+
return Data_String_indent($0, Language_JSON_Data_n__4835_6640_formatValue($2, $1, $0, $0, $1, $2));
|
|
5001
5120
|
}
|
|
5002
5121
|
|
|
5003
5122
|
function Language_JSON_Data_b16ToHexString($0) {
|
|
@@ -5022,11 +5141,11 @@ function Language_JSON_Data_b16ToHexString($0) {
|
|
|
5022
5141
|
}
|
|
5023
5142
|
}
|
|
5024
5143
|
|
|
5025
|
-
const
|
|
5144
|
+
const Language_JSON_Parser_n__3581_2407_values = __lazy(function () {
|
|
5026
5145
|
return Text_Parser_sepBy(1, Language_JSON_Parser_punct({h: 0}), Language_JSON_Parser_json());
|
|
5027
5146
|
});
|
|
5028
5147
|
|
|
5029
|
-
const
|
|
5148
|
+
const Language_JSON_Parser_n__3578_2316_properties = __lazy(function () {
|
|
5030
5149
|
return Text_Parser_sepBy(1, Language_JSON_Parser_punct({h: 0}), {h: 8, a1: 1, a2: Language_JSON_Parser_rawString(), a3: () => key => ({h: 10, a1: 1, a2: Language_JSON_Parser_punct({h: 1}), a3: () => ({h: 8, a1: 0, a2: Language_JSON_Parser_json(), a3: () => value => ({h: 0, a1: {a1: key, a2: value}})})})});
|
|
5031
5150
|
});
|
|
5032
5151
|
|
|
@@ -5035,7 +5154,7 @@ const Language_JSON_Parser_string = __lazy(function () {
|
|
|
5035
5154
|
});
|
|
5036
5155
|
|
|
5037
5156
|
const Language_JSON_Parser_rawString = __lazy(function () {
|
|
5038
|
-
return {h: 8, a1: 0, a2: Text_Parser_match(
|
|
5157
|
+
return {h: 8, a1: 0, a2: Text_Parser_match(csegen_268(), csegen_271(), {h: 2}), a3: () => mstr => {
|
|
5039
5158
|
switch(mstr.h) {
|
|
5040
5159
|
case undefined: return {h: 0, a1: mstr.a1};
|
|
5041
5160
|
case 0: return {h: 4, a1: {h: 0}, a2: 0, a3: 'invalid string'};
|
|
@@ -5044,7 +5163,7 @@ const Language_JSON_Parser_rawString = __lazy(function () {
|
|
|
5044
5163
|
});
|
|
5045
5164
|
|
|
5046
5165
|
function Language_JSON_Parser_punct($0) {
|
|
5047
|
-
return Text_Parser_match(
|
|
5166
|
+
return Text_Parser_match(csegen_268(), csegen_271(), {h: 4, a1: $0});
|
|
5048
5167
|
}
|
|
5049
5168
|
|
|
5050
5169
|
function Language_JSON_Parser_parseJSON($0) {
|
|
@@ -5054,7 +5173,7 @@ function Language_JSON_Parser_parseJSON($0) {
|
|
|
5054
5173
|
case 0: return 1;
|
|
5055
5174
|
}
|
|
5056
5175
|
};
|
|
5057
|
-
const $6 =
|
|
5176
|
+
const $6 = Prelude_Types_List_filter($8, $0);
|
|
5058
5177
|
const $1 = Text_Parser_Core_parse(1, Language_JSON_Parser_json(), $6);
|
|
5059
5178
|
switch($1.h) {
|
|
5060
5179
|
case 1: {
|
|
@@ -5073,15 +5192,15 @@ function Language_JSON_Parser_parseJSON($0) {
|
|
|
5073
5192
|
}
|
|
5074
5193
|
|
|
5075
5194
|
const Language_JSON_Parser_object = __lazy(function () {
|
|
5076
|
-
return {h: 10, a1: 1, a2: Language_JSON_Parser_punct({h: 3, a1: 0}), a3: () => ({h: 11, a1: 0, a2: 1, a3: {h: 6}, a4: {h: 9, a1: 0, a2: 1, a3:
|
|
5195
|
+
return {h: 10, a1: 1, a2: Language_JSON_Parser_punct({h: 3, a1: 0}), a3: () => ({h: 11, a1: 0, a2: 1, a3: {h: 6}, a4: {h: 9, a1: 0, a2: 1, a3: Language_JSON_Parser_n__3578_2316_properties(), a4: props => ({h: 10, a1: 0, a2: Language_JSON_Parser_punct({h: 3, a1: 1}), a3: () => ({h: 0, a1: {h: 5, a1: props}})})}})};
|
|
5077
5196
|
});
|
|
5078
5197
|
|
|
5079
5198
|
const Language_JSON_Parser_number = __lazy(function () {
|
|
5080
|
-
return Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29(1, $3 => ({h: 2, a1: $3}), Text_Parser_match(
|
|
5199
|
+
return Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29(1, $3 => ({h: 2, a1: $3}), Text_Parser_match(csegen_268(), csegen_271(), {h: 1}));
|
|
5081
5200
|
});
|
|
5082
5201
|
|
|
5083
5202
|
const Language_JSON_Parser_null = __lazy(function () {
|
|
5084
|
-
return Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29(1, $3 => ({h: 0}), Text_Parser_match(
|
|
5203
|
+
return Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29(1, $3 => ({h: 0}), Text_Parser_match(csegen_268(), csegen_271(), {h: 3}));
|
|
5085
5204
|
});
|
|
5086
5205
|
|
|
5087
5206
|
const Language_JSON_Parser_json = __lazy(function () {
|
|
@@ -5089,11 +5208,11 @@ const Language_JSON_Parser_json = __lazy(function () {
|
|
|
5089
5208
|
});
|
|
5090
5209
|
|
|
5091
5210
|
const Language_JSON_Parser_boolean = __lazy(function () {
|
|
5092
|
-
return Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29(1, $3 => ({h: 1, a1: $3}), Text_Parser_match(
|
|
5211
|
+
return Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29(1, $3 => ({h: 1, a1: $3}), Text_Parser_match(csegen_268(), csegen_271(), {h: 0}));
|
|
5093
5212
|
});
|
|
5094
5213
|
|
|
5095
5214
|
const Language_JSON_Parser_array = __lazy(function () {
|
|
5096
|
-
return {h: 10, a1: 1, a2: Language_JSON_Parser_punct({h: 2, a1: 0}), a3: () => ({h: 11, a1: 0, a2: 1, a3: {h: 6}, a4: {h: 9, a1: 0, a2: 1, a3:
|
|
5215
|
+
return {h: 10, a1: 1, a2: Language_JSON_Parser_punct({h: 2, a1: 0}), a3: () => ({h: 11, a1: 0, a2: 1, a3: {h: 6}, a4: {h: 9, a1: 0, a2: 1, a3: Language_JSON_Parser_n__3581_2407_values(), a4: vals => ({h: 10, a1: 0, a2: Language_JSON_Parser_punct({h: 2, a1: 1}), a3: () => ({h: 0, a1: {h: 4, a1: vals}})})}})};
|
|
5097
5216
|
});
|
|
5098
5217
|
|
|
5099
5218
|
function Language_JSON_Tokens_tokValue_TokenKind_JSONTokenKind($0, $1) {
|
|
@@ -5265,7 +5384,7 @@ function Text_Lexer_opt($0) {
|
|
|
5265
5384
|
}
|
|
5266
5385
|
|
|
5267
5386
|
function Text_Lexer_oneOf($0) {
|
|
5268
|
-
return Text_Lexer_Core_pred(x => Prelude_Types_elem(
|
|
5387
|
+
return Text_Lexer_Core_pred(x => Prelude_Types_elem(csegen_77(), csegen_176(), x, Prelude_Types_fastUnpack($0)));
|
|
5269
5388
|
}
|
|
5270
5389
|
|
|
5271
5390
|
function Text_Lexer_non($0) {
|
|
@@ -5370,7 +5489,7 @@ function Text_Quantity_atLeast($0) {
|
|
|
5370
5489
|
return {a1: $0, a2: {h: 0}};
|
|
5371
5490
|
}
|
|
5372
5491
|
|
|
5373
|
-
function
|
|
5492
|
+
function Text_Lexer_Core_n__3659_2500_getCols($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
5374
5493
|
const $8 = Data_List_span($b => Prelude_EqOrd_x2fx3d_Eq_Char($b, '\n'), Prelude_Types_List_reverse($6));
|
|
5375
5494
|
switch($8.a2.h) {
|
|
5376
5495
|
case 0: return _add32s($7, Prelude_Cast_cast_Cast_Nat_Int(Prelude_Types_List_lengthTR($8.a1)));
|
|
@@ -5378,8 +5497,8 @@ function Text_Lexer_Core_n__3455_2496_getCols($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
|
5378
5497
|
}
|
|
5379
5498
|
}
|
|
5380
5499
|
|
|
5381
|
-
function
|
|
5382
|
-
return Prelude_Types_List_lengthTR(
|
|
5500
|
+
function Text_Lexer_Core_n__3659_2499_countNLs($0, $1, $2, $3, $4, $5, $6) {
|
|
5501
|
+
return Prelude_Types_List_lengthTR(Prelude_Types_List_filter($b => Prelude_EqOrd_x3dx3d_Eq_Char($b, '\n'), $6));
|
|
5383
5502
|
}
|
|
5384
5503
|
|
|
5385
5504
|
function Text_Lexer_Core_scan($0, $1, $2) {
|
|
@@ -5447,7 +5566,7 @@ function Text_Lexer_Core_x3cx7cx3e($0, $1) {
|
|
|
5447
5566
|
return {h: 7, a1: $0, a2: $1};
|
|
5448
5567
|
}
|
|
5449
5568
|
|
|
5450
|
-
function
|
|
5569
|
+
function Language_JSON_String_Tokens_n__3203_1166_hexVal($0, $1) {
|
|
5451
5570
|
switch(Prelude_EqOrd_x3ex3d_Ord_Char($1, 'A')) {
|
|
5452
5571
|
case 1: return _add32s(_sub32s(_truncInt32($1.codePointAt(0)), _truncInt32('A'.codePointAt(0))), 10);
|
|
5453
5572
|
case 0: return _sub32s(_truncInt32($1.codePointAt(0)), _truncInt32('0'.codePointAt(0)));
|
|
@@ -5510,7 +5629,7 @@ function Language_JSON_String_Tokens_x2fx3d_Eq_JSONStringTokenKind($0, $1) {
|
|
|
5510
5629
|
}
|
|
5511
5630
|
|
|
5512
5631
|
function Language_JSON_String_Tokens_unicodeEscapeValue($0) {
|
|
5513
|
-
return
|
|
5632
|
+
return Language_JSON_String_Tokens_n__3203_1167_fromHex($0, Data_List_drop(2n, Prelude_Types_fastUnpack($0)), 0);
|
|
5514
5633
|
}
|
|
5515
5634
|
|
|
5516
5635
|
function Language_JSON_String_Tokens_simpleEscapeValue($0) {
|
|
@@ -5542,11 +5661,11 @@ function Language_JSON_String_Tokens_charValue($0) {
|
|
|
5542
5661
|
}
|
|
5543
5662
|
|
|
5544
5663
|
const Language_JSON_String_Parser_stringChar = __lazy(function () {
|
|
5545
|
-
return {h: 12, a1: 1, a2: 1, a3: Text_Parser_match(
|
|
5664
|
+
return {h: 12, a1: 1, a2: 1, a3: Text_Parser_match(csegen_307(), csegen_310(), 1), a4: () => ({h: 12, a1: 1, a2: 1, a3: Text_Parser_match(csegen_307(), csegen_310(), 2), a4: () => Text_Parser_match(csegen_307(), csegen_310(), 3)})};
|
|
5546
5665
|
});
|
|
5547
5666
|
|
|
5548
5667
|
const Language_JSON_String_Parser_quotedString = __lazy(function () {
|
|
5549
|
-
const $0 = Text_Parser_match(
|
|
5668
|
+
const $0 = Text_Parser_match(csegen_307(), csegen_310(), 0);
|
|
5550
5669
|
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)}})};
|
|
5551
5670
|
});
|
|
5552
5671
|
|
|
@@ -5605,28 +5724,28 @@ function Text_Parser_between($0, $1, $2, $3) {
|
|
|
5605
5724
|
return {h: 9, a1: 1, a2: 1, a3: Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29(1, $a => $b => $a, {h: 9, a1: 1, a2: $0, a3: Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29(1, $13 => $14 => $14, $1), a4: f => Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29($0, f, $3)}), a4: f => Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29(1, f, $2)};
|
|
5606
5725
|
}
|
|
5607
5726
|
|
|
5608
|
-
function
|
|
5727
|
+
function Text_Parser_Core_case__doParse_5194($0, $1, $2, $3, $4, $5) {
|
|
5609
5728
|
switch($5.h) {
|
|
5610
5729
|
case 0: return {h: 0, a1: $5.a1, a2: $5.a2, a3: $5.a3};
|
|
5611
|
-
case 1: return {h: 1, a1: $5.a1, a2: $5.a2, a3: Prelude_Interfaces_x3cx24x3e(
|
|
5730
|
+
case 1: return {h: 1, a1: $5.a1, a2: $5.a2, a3: Prelude_Interfaces_x3cx24x3e(csegen_326(), $11 => $5.a3, $5.a3), a4: $5.a4};
|
|
5612
5731
|
}
|
|
5613
5732
|
}
|
|
5614
5733
|
|
|
5615
|
-
function
|
|
5734
|
+
function Text_Parser_Core_case__doParse_4881($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
5616
5735
|
switch($7.h) {
|
|
5617
5736
|
case 0: return {h: 0, a1: $7.a1, a2: $7.a2, a3: $7.a3};
|
|
5618
5737
|
case 1: return Text_Parser_Core_mergeWith($7.a3, Text_Parser_Core_doParse($0, $7.a1, $7.a2, $3()($7.a3.a1), $7.a4));
|
|
5619
5738
|
}
|
|
5620
5739
|
}
|
|
5621
5740
|
|
|
5622
|
-
function
|
|
5741
|
+
function Text_Parser_Core_case__doParse_4767($0, $1, $2, $3, $4, $5, $6, $7, $8) {
|
|
5623
5742
|
switch($8.h) {
|
|
5624
5743
|
case 0: return {h: 0, a1: $8.a1, a2: $8.a2, a3: $8.a3};
|
|
5625
5744
|
case 1: return Text_Parser_Core_mergeWith($8.a3, Text_Parser_Core_doParse($0, $8.a1, $8.a2, $4($8.a3.a1), $8.a4));
|
|
5626
5745
|
}
|
|
5627
5746
|
}
|
|
5628
5747
|
|
|
5629
|
-
function
|
|
5748
|
+
function Text_Parser_Core_case__casex20blockx20inx20casex20blockx20inx20doParse_4529($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a, $b) {
|
|
5630
5749
|
switch($b.h) {
|
|
5631
5750
|
case 0: {
|
|
5632
5751
|
let $d;
|
|
@@ -5649,7 +5768,7 @@ function Text_Parser_Core_case__casex20blockx20inx20casex20blockx20inx20doParse_
|
|
|
5649
5768
|
}
|
|
5650
5769
|
}
|
|
5651
5770
|
|
|
5652
|
-
function
|
|
5771
|
+
function Text_Parser_Core_case__doParse_4413($0, $1, $2, $3, $4, $5, $6, $7, $8) {
|
|
5653
5772
|
switch($8.h) {
|
|
5654
5773
|
case 0: {
|
|
5655
5774
|
let $a;
|
|
@@ -5665,21 +5784,21 @@ function Text_Parser_Core_case__doParse_4275($0, $1, $2, $3, $4, $5, $6, $7, $8)
|
|
|
5665
5784
|
}
|
|
5666
5785
|
switch($a) {
|
|
5667
5786
|
case 1: return {h: 0, a1: $7, a2: $8.a2, a3: $8.a3};
|
|
5668
|
-
case 0: return
|
|
5787
|
+
case 0: return Text_Parser_Core_case__casex20blockx20inx20casex20blockx20inx20doParse_4529($0, $2, $3, $4, $5, $6, $7, $8.a3, $8.a2, $8.a1, $1, Text_Parser_Core_doParse($0, $1, 0, $3(), $6));
|
|
5669
5788
|
}
|
|
5670
5789
|
}
|
|
5671
5790
|
case 1: return {h: 1, a1: $8.a1, a2: $7, a3: $8.a3, a4: $8.a4};
|
|
5672
5791
|
}
|
|
5673
5792
|
}
|
|
5674
5793
|
|
|
5675
|
-
function
|
|
5794
|
+
function Text_Parser_Core_case__doParse_4048($0, $1, $2, $3, $4, $5) {
|
|
5676
5795
|
switch($5.h) {
|
|
5677
5796
|
case 0: return {h: 0, a1: $5.a1, a2: 1, a3: $5.a3};
|
|
5678
5797
|
default: return $5;
|
|
5679
5798
|
}
|
|
5680
5799
|
}
|
|
5681
5800
|
|
|
5682
|
-
function
|
|
5801
|
+
function Text_Parser_Core_case__doParse_3951($0, $1, $2, $3, $4, $5) {
|
|
5683
5802
|
switch($5.h) {
|
|
5684
5803
|
case 0: return {h: 0, a1: $5.a1, a2: 0, a3: $5.a3};
|
|
5685
5804
|
default: return $5;
|
|
@@ -6026,18 +6145,18 @@ function Text_Parser_Core_mergeWith($0, $1) {
|
|
|
6026
6145
|
function Text_Parser_Core_doParse($0, $1, $2, $3, $4) {
|
|
6027
6146
|
switch($3.h) {
|
|
6028
6147
|
case 0: return {h: 1, a1: $1, a2: $2, a3: Text_Bounded_irrelevantBounds($3.a1), a4: $4};
|
|
6029
|
-
case 4: return {h: 0, a1: $2, a2: $3.a2, a3: {a1: {a1: $3.a3, a2: Prelude_Types_x3cx7cx3e_Alternative_Maybe($3.a1, () => Prelude_Interfaces_x3cx24x3e(
|
|
6030
|
-
case 5: return
|
|
6148
|
+
case 4: return {h: 0, a1: $2, a2: $3.a2, a3: {a1: {a1: $3.a3, a2: Prelude_Types_x3cx7cx3e_Alternative_Maybe($3.a1, () => Prelude_Interfaces_x3cx24x3e(csegen_18(), $19 => $19.a3, Data_List_headx27($4)))}, a2: {h: 0}}};
|
|
6149
|
+
case 5: return Text_Parser_Core_case__doParse_3951($0, $1, $3.a1, $4, $2, Text_Parser_Core_doParse($0, $1, $2, $3.a1, $4));
|
|
6031
6150
|
case 6: return {h: 1, a1: $1, a2: 1, a3: Text_Bounded_irrelevantBounds(undefined), a4: $4};
|
|
6032
|
-
case 7: return
|
|
6151
|
+
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));
|
|
6033
6152
|
case 1: {
|
|
6034
6153
|
switch($4.h) {
|
|
6035
|
-
case 0: return {h: 0, a1: $2, a2: 0, a3:
|
|
6154
|
+
case 0: return {h: 0, a1: $2, a2: 0, a3: csegen_328()};
|
|
6036
6155
|
case undefined: {
|
|
6037
6156
|
const $44 = $3.a2($4.a1.a1);
|
|
6038
6157
|
switch($44.h) {
|
|
6039
6158
|
case 0: return {h: 0, a1: $2, a2: 0, a3: {a1: {a1: $3.a1, a2: {a1: $4.a1.a3}}, a2: {h: 0}}};
|
|
6040
|
-
case undefined: return {h: 1, a1: $1, a2: $2, a3: Prelude_Interfaces_x3cx24x3e(
|
|
6159
|
+
case undefined: return {h: 1, a1: $1, a2: $2, a3: Prelude_Interfaces_x3cx24x3e(csegen_326(), $58 => $44.a1, $4.a1), a4: $4.a2};
|
|
6041
6160
|
}
|
|
6042
6161
|
}
|
|
6043
6162
|
}
|
|
@@ -6050,7 +6169,7 @@ function Text_Parser_Core_doParse($0, $1, $2, $3, $4) {
|
|
|
6050
6169
|
}
|
|
6051
6170
|
case 2: {
|
|
6052
6171
|
switch($4.h) {
|
|
6053
|
-
case 0: return {h: 0, a1: $2, a2: 0, a3:
|
|
6172
|
+
case 0: return {h: 0, a1: $2, a2: 0, a3: csegen_328()};
|
|
6054
6173
|
case undefined: {
|
|
6055
6174
|
switch($3.a2($4.a1.a1)) {
|
|
6056
6175
|
case 1: return {h: 1, a1: $1, a2: $2, a3: Text_Bounded_removeIrrelevance($4.a1), a4: {a1: $4.a1, a2: $4.a2}};
|
|
@@ -6059,9 +6178,9 @@ function Text_Parser_Core_doParse($0, $1, $2, $3, $4) {
|
|
|
6059
6178
|
}
|
|
6060
6179
|
}
|
|
6061
6180
|
}
|
|
6062
|
-
case 12: return
|
|
6063
|
-
case 9: return
|
|
6064
|
-
case 8: return
|
|
6181
|
+
case 12: return Text_Parser_Core_case__doParse_4413($0, $1, $3.a2, $3.a4, $3.a1, $3.a3, $4, $2, Text_Parser_Core_doParse($0, $1, 0, $3.a3, $4));
|
|
6182
|
+
case 9: return Text_Parser_Core_case__doParse_4767($0, $3.a1, $3.a2, $1, $3.a4, $3.a3, $4, $2, Text_Parser_Core_doParse($0, $1, $2, $3.a3, $4));
|
|
6183
|
+
case 8: return Text_Parser_Core_case__doParse_4881($0, $3.a1, $1, $3.a3, $3.a2, $4, $2, Text_Parser_Core_doParse($0, $1, $2, $3.a2, $4));
|
|
6065
6184
|
case 11: {
|
|
6066
6185
|
const $b4 = Text_Parser_Core_doParse($0, $1, $2, $3.a3, $4);
|
|
6067
6186
|
switch($b4.h) {
|
|
@@ -6076,10 +6195,10 @@ function Text_Parser_Core_doParse($0, $1, $2, $3, $4) {
|
|
|
6076
6195
|
case 1: return Text_Parser_Core_mergeWith($c7.a3, Text_Parser_Core_doParse($0, $c7.a1, $c7.a2, $3.a3(), $c7.a4));
|
|
6077
6196
|
}
|
|
6078
6197
|
}
|
|
6079
|
-
case 13: return
|
|
6198
|
+
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));
|
|
6080
6199
|
case 14: {
|
|
6081
6200
|
switch($4.h) {
|
|
6082
|
-
case 0: return {h: 0, a1: $2, a2: 0, a3:
|
|
6201
|
+
case 0: return {h: 0, a1: $2, a2: 0, a3: csegen_328()};
|
|
6083
6202
|
case undefined: return {h: 1, a1: $1, a2: $2, a3: Text_Bounded_irrelevantBounds($4.a1.a3), a4: {a1: $4.a1, a2: $4.a2}};
|
|
6084
6203
|
}
|
|
6085
6204
|
}
|
|
@@ -6169,23 +6288,23 @@ const Language_JSON_Lexer_jsonTokenMap = __lazy(function () {
|
|
|
6169
6288
|
return Text_Lexer_toTokenMap({a1: {a1: Text_Lexer_spaces(), a2: {h: 5}}, a2: {a1: {a1: Text_Lexer_is(','), a2: {h: 4, a1: {h: 0}}}, a2: {a1: {a1: Text_Lexer_is(':'), a2: {h: 4, a1: {h: 1}}}, a2: {a1: {a1: Text_Lexer_is('['), a2: {h: 4, a1: {h: 2, a1: 0}}}, a2: {a1: {a1: Text_Lexer_is(']'), a2: {h: 4, a1: {h: 2, a1: 1}}}, a2: {a1: {a1: Text_Lexer_is('{'), a2: {h: 4, a1: {h: 3, a1: 0}}}, a2: {a1: {a1: Text_Lexer_is('}'), a2: {h: 4, a1: {h: 3, a1: 1}}}, a2: {a1: {a1: Text_Lexer_exact('null'), a2: {h: 3}}, a2: {a1: {a1: Text_Lexer_Core_x3cx7cx3e(Text_Lexer_exact('true'), Text_Lexer_exact('false')), a2: {h: 0}}, a2: {a1: {a1: Language_JSON_Lexer_numberLit(), a2: {h: 1}}, a2: {a1: {a1: Language_JSON_String_permissiveStringLit(), a2: {h: 2}}, a2: {h: 0}}}}}}}}}}}});
|
|
6170
6289
|
});
|
|
6171
6290
|
|
|
6172
|
-
function
|
|
6291
|
+
function Decidable_Equality_n__4701_4105_primitiveNotEq($0, $1, $2, $3) {
|
|
6173
6292
|
return Builtin_believe_me(undefined);
|
|
6174
6293
|
}
|
|
6175
6294
|
|
|
6176
|
-
function
|
|
6295
|
+
function Decidable_Equality_n__4701_4104_primitiveEq($0, $1, $2) {
|
|
6177
6296
|
return Builtin_believe_me(undefined);
|
|
6178
6297
|
}
|
|
6179
6298
|
|
|
6180
6299
|
function Decidable_Equality_decEq_DecEq_FromEqx24a($0, $1, $2) {
|
|
6181
6300
|
switch($0.a1($1)($2)) {
|
|
6182
|
-
case 1: return {h: 0, a1:
|
|
6183
|
-
case 0: return {h: 1, a1: $f =>
|
|
6301
|
+
case 1: return {h: 0, a1: Decidable_Equality_n__4701_4104_primitiveEq($0, $1, $2)};
|
|
6302
|
+
case 0: return {h: 1, a1: $f => Decidable_Equality_n__4701_4105_primitiveNotEq($0, $1, $2, $f)};
|
|
6184
6303
|
}
|
|
6185
6304
|
}
|
|
6186
6305
|
|
|
6187
6306
|
function Decidable_Equality_decEq_DecEq_Char($0, $1) {
|
|
6188
|
-
return Decidable_Equality_decEq_DecEq_FromEqx24a(
|
|
6307
|
+
return Decidable_Equality_decEq_DecEq_FromEqx24a(csegen_176(), $0, $1);
|
|
6189
6308
|
}
|
|
6190
6309
|
|
|
6191
6310
|
function Data_Either_maybeToEither($0, $1) {
|
|
@@ -6195,126 +6314,247 @@ function Data_Either_maybeToEither($0, $1) {
|
|
|
6195
6314
|
}
|
|
6196
6315
|
}
|
|
6197
6316
|
|
|
6198
|
-
function
|
|
6317
|
+
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(csegen_380(), $2a))), {a1: $7, a2: $9.a1});
|
|
6319
|
+
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
|
+
}
|
|
6321
|
+
|
|
6322
|
+
function User_Me_n__6251_2415_ul($0, $1, $2, $3) {
|
|
6323
|
+
return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($3));
|
|
6324
|
+
}
|
|
6325
|
+
|
|
6326
|
+
function User_Me_n__6251_2421_teams($0, $1, $2) {
|
|
6327
|
+
return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: User_Me_n__6251_2415_ul($0, $1, $2, 'GitHub Teams:'), a2: Prelude_Types_map_Functor_List($e => User_Me_n__6251_2416_it($0, $1, $2, $e), $0)});
|
|
6328
|
+
}
|
|
6329
|
+
|
|
6330
|
+
function User_Me_n__6251_2420_login($0, $1, $2) {
|
|
6331
|
+
return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('GitHub Login:'), User_Me_n__6251_2417_green($0, $1, $2, $1.a1));
|
|
6332
|
+
}
|
|
6333
|
+
|
|
6334
|
+
function User_Reflect_n__5344_1492_ital($0, $1) {
|
|
6335
|
+
return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($1));
|
|
6336
|
+
}
|
|
6337
|
+
|
|
6338
|
+
function User_Me_n__6251_2416_it($0, $1, $2, $3) {
|
|
6339
|
+
return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($3));
|
|
6340
|
+
}
|
|
6341
|
+
|
|
6342
|
+
function User_Me_n__6391_2571_handleUnsetEmail($0, $1, $2, $3) {
|
|
6343
|
+
switch($3) {
|
|
6344
|
+
case '': return {h: 0};
|
|
6345
|
+
default: return {a1: $3};
|
|
6346
|
+
}
|
|
6347
|
+
}
|
|
6348
|
+
|
|
6349
|
+
function User_Me_n__6251_2417_green($0, $1, $2, $3) {
|
|
6350
|
+
return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($3));
|
|
6351
|
+
}
|
|
6352
|
+
|
|
6353
|
+
function User_Me_n__6251_2419_fullName($0, $1, $2) {
|
|
6354
|
+
return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('GitHub Name:'), User_Me_n__6251_2417_green($0, $1, $2, $1.a2));
|
|
6355
|
+
}
|
|
6356
|
+
|
|
6357
|
+
function User_Me_n__6251_2418_email($0, $1, $2) {
|
|
6358
|
+
let $7;
|
|
6359
|
+
switch($2.h) {
|
|
6360
|
+
case undefined: {
|
|
6361
|
+
$7 = User_Me_n__6251_2417_green($0, $1, $2, $2.a1);
|
|
6362
|
+
break;
|
|
6363
|
+
}
|
|
6364
|
+
case 0: {
|
|
6365
|
+
$7 = User_Me_n__6251_2416_it($0, $1, $2, 'Not set');
|
|
6366
|
+
break;
|
|
6367
|
+
}
|
|
6368
|
+
}
|
|
6369
|
+
return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Git Email:'), $7);
|
|
6370
|
+
}
|
|
6371
|
+
|
|
6372
|
+
const User_Reflect_rightTitle = __lazy(function () {
|
|
6373
|
+
return 'authored';
|
|
6374
|
+
});
|
|
6375
|
+
|
|
6376
|
+
const User_Reflect_reviewDetailsCount = __lazy(function () {
|
|
6377
|
+
return 25n;
|
|
6378
|
+
});
|
|
6379
|
+
|
|
6380
|
+
function User_replicatex27($0, $1, $2) {
|
|
6381
|
+
return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color($0), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_String_replicate($1, $2)));
|
|
6382
|
+
}
|
|
6383
|
+
|
|
6384
|
+
function User_Reflect_reflectOnSelf($0, $1, $2, $3) {
|
|
6385
|
+
const $c = prs => $d => $e => {
|
|
6386
|
+
const $19 = myLogin => $1a => $1b => {
|
|
6387
|
+
const $37 = reviews => {
|
|
6388
|
+
const $38 = Prelude_Types_map_Functor_Maybe(csegen_383(), Data_List_headx27(Data_List_sortBy($41 => $42 => Prelude_Basics_on(csegen_141(), csegen_383(), $41, $42), reviews)));
|
|
6389
|
+
const $4b = PullRequest_tuple(prs);
|
|
6390
|
+
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
|
+
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
|
+
};
|
|
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(), csegen_380(), $2b, $2c), PullRequest_combined(prs))))), $37, $1a, $1b);
|
|
6394
|
+
};
|
|
6395
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), csegen_139(), FFI_GitHub_getSelf($1)), $19, $d, $e);
|
|
6396
|
+
};
|
|
6397
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_listPartitionedPRs($0, $1, 4n, User_Reflect_prCount()), $c, $2, $3);
|
|
6398
|
+
}
|
|
6399
|
+
|
|
6400
|
+
function User_Me_printInfoOnSelf($0, $1, $2, $3, $4) {
|
|
6401
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $b => User_Me_n__6391_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
|
+
}
|
|
6403
|
+
|
|
6404
|
+
function User_Reflect_print($0, $1, $2, $3, $4, $5, $6, $7, $8) {
|
|
6405
|
+
return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Reflect_graph($0, $1, $2, $3, $4, $5), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Reflect_details($0, $1, $2, $3, $4, $5, $6, $7, $8), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}});
|
|
6406
|
+
}
|
|
6407
|
+
|
|
6408
|
+
function User_Me_print($0, $1, $2) {
|
|
6409
|
+
return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Me_n__6251_2418_email($2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Me_n__6251_2419_fullName($2, $1, $0), a2: {a1: User_Me_n__6251_2420_login($2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Me_n__6251_2421_teams($2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}}}}});
|
|
6410
|
+
}
|
|
6411
|
+
|
|
6412
|
+
const User_Reflect_prCount = __lazy(function () {
|
|
6413
|
+
return csegen_134();
|
|
6414
|
+
});
|
|
6415
|
+
|
|
6416
|
+
const User_Reflect_leftTitle = __lazy(function () {
|
|
6417
|
+
return 'requested';
|
|
6418
|
+
});
|
|
6419
|
+
|
|
6420
|
+
const User_Reflect_intro = __lazy(function () {
|
|
6421
|
+
return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Your current pull request summary (out of the past ', a2: {a1: Data_Fin_show_Show_x28Finx20x24nx29(User_Reflect_prCount()), a2: {a1: ' PRs):', a2: {h: 0}}}});
|
|
6422
|
+
});
|
|
6423
|
+
|
|
6424
|
+
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: User_Reflect_n__5344_1492_ital($0, User_Reflect_leftTitle()), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(' '), a2: {a1: User_Reflect_n__5344_1492_ital($0, User_Reflect_rightTitle()), a2: {h: 0}}}}));
|
|
6426
|
+
}
|
|
6427
|
+
|
|
6428
|
+
function User_Reflect_graph($0, $1, $2, $3, $4, $5) {
|
|
6429
|
+
const $6 = ($2+$3);
|
|
6430
|
+
const $9 = ($5+$4);
|
|
6431
|
+
const $c = Prelude_Types_foldr_Foldable_List(csegen_388(), Prelude_Types_String_length(User_Reflect_leftTitle()), {a1: ($6+$1), a2: {a1: $9, a2: {h: 0}}});
|
|
6432
|
+
const $1b = Prelude_Types_foldr_Foldable_List(csegen_388(), Prelude_Types_String_length(User_Reflect_rightTitle()), {a1: $6, a2: {a1: $9, a2: {h: 0}}});
|
|
6433
|
+
const $28 = (($c+$1b)+3n);
|
|
6434
|
+
const $2d = ((Prelude_Cast_cast_Cast_Nat_Double($0)/2.0)-(Prelude_Cast_cast_Cast_Nat_Double($28)/2.0));
|
|
6435
|
+
const $38 = (Prelude_Cast_cast_Cast_Double_Nat($2d)+Prelude_Types_prim__integerToNat(($c-Prelude_Types_String_length(User_Reflect_leftTitle()))));
|
|
6436
|
+
const $44 = (Prelude_Cast_cast_Cast_Double_Nat($2d)+Prelude_Types_prim__integerToNat(($c-($6+$1))));
|
|
6437
|
+
return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: User_Reflect_header($38), a2: {a1: User_Reflect_chart($0, $1, $2, $3, $4, $5, $44), a2: {h: 0}}});
|
|
6438
|
+
}
|
|
6439
|
+
|
|
6440
|
+
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, csegen_390()), 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_390()), 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
|
+
}
|
|
6443
|
+
|
|
6444
|
+
function User_Reflect_chart($0, $1, $2, $3, $4, $5, $6) {
|
|
6445
|
+
return Text_PrettyPrint_Prettyprinter_Doc_indent(Prelude_Cast_cast_Cast_Nat_Int($6), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(User_replicatex27(2, $1, '\u{b7}'), User_replicatex27(1, $3, '\u{25e6}')), User_replicatex27(3, $2, '<')), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('|'), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(User_replicatex27(3, $5, '>'), User_replicatex27(2, $4, '\u{b7}')))));
|
|
6446
|
+
}
|
|
6447
|
+
|
|
6448
|
+
function PullRequest_with__withx20blockx20inx20listPartitionedPRs_1206($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
6199
6449
|
switch($2.h) {
|
|
6200
6450
|
case 1: return $9 => PullRequest_partitionx27(Data_Pagination_metaPages($0, 1n, $4, 1n, $4), $7, $9);
|
|
6201
6451
|
case 0: return $14 => PullRequest_partitionx27(Data_Pagination_metaPagesx27($0, ($1+1n), $4, $2.a1), $7, $14);
|
|
6202
6452
|
}
|
|
6203
6453
|
}
|
|
6204
6454
|
|
|
6205
|
-
function
|
|
6455
|
+
function PullRequest_with__listPartitionedPRs_1144($0, $1, $2, $3, $4) {
|
|
6206
6456
|
switch($2.a1.h) {
|
|
6207
6457
|
case 1: return $7 => $8 => Data_Promise_pure_Applicative_Promise(PullRequest_empty(), $7, $8);
|
|
6208
6458
|
default: {
|
|
6209
6459
|
switch($2.a2.h) {
|
|
6210
|
-
case 1: return Prelude_Interfaces_x3cx24x3e(
|
|
6211
|
-
default: return $22 =>
|
|
6460
|
+
case 1: return Prelude_Interfaces_x3cx24x3e(csegen_103(), $13 => PullRequest_partition($13), FFI_GitHub_listPullRequests($3, $4.a2, $4.a3, {h: 0}, $0, 0n));
|
|
6461
|
+
default: return $22 => PullRequest_with__withx20blockx20inx20listPartitionedPRs_1206($0, $1, Data_Nat_isLTE(($1+1n), $0), $3, $2.a1.a1, $2.a2.a1, $4, $22);
|
|
6212
6462
|
}
|
|
6213
6463
|
}
|
|
6214
6464
|
}
|
|
6215
6465
|
}
|
|
6216
6466
|
|
|
6217
|
-
function
|
|
6467
|
+
function PullRequest_case__identifyOrCreatePRx2ccreatePR_2311($0, $1, $2, $3, $4, $5) {
|
|
6218
6468
|
switch($5.h) {
|
|
6219
6469
|
case undefined: return ($5.a1+$5.a2);
|
|
6220
6470
|
default: return $3.a4;
|
|
6221
6471
|
}
|
|
6222
6472
|
}
|
|
6223
6473
|
|
|
6224
|
-
function
|
|
6474
|
+
function PullRequest_n__6853_1428_userNotice($0, $1, $2, $3, $4, $5, $6) {
|
|
6225
6475
|
switch($6.h) {
|
|
6226
6476
|
case 0: {
|
|
6227
6477
|
switch($2.h) {
|
|
6228
6478
|
case 0: return 'no users';
|
|
6229
|
-
default: return Prelude_Interfaces_concat(
|
|
6479
|
+
default: return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: PullRequest_n__6853_1427_csv($0, $1, $2, $3, $4, $5, $2), a2: {h: 0}});
|
|
6230
6480
|
}
|
|
6231
6481
|
}
|
|
6232
|
-
case undefined: return Prelude_Interfaces_concat(
|
|
6482
|
+
case undefined: return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: PullRequest_n__6853_1427_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: $2}), a2: {h: 0}});
|
|
6233
6483
|
}
|
|
6234
6484
|
}
|
|
6235
6485
|
|
|
6236
|
-
function
|
|
6486
|
+
function PullRequest_n__6853_1429_teamNotice($0, $1, $2, $3, $4, $5, $6) {
|
|
6237
6487
|
switch($6.h) {
|
|
6238
6488
|
case 0: return '';
|
|
6239
6489
|
case undefined: {
|
|
6240
6490
|
switch($6.a2.h) {
|
|
6241
|
-
case 0: return Prelude_Interfaces_concat(
|
|
6242
|
-
default: return Prelude_Interfaces_concat(
|
|
6491
|
+
case 0: return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' and team ', a2: {a1: PullRequest_n__6853_1427_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: {h: 0}}), a2: {h: 0}}});
|
|
6492
|
+
default: return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' and teams ', a2: {a1: PullRequest_n__6853_1427_csv($0, $1, $2, $3, $4, $5, $6), a2: {h: 0}}});
|
|
6243
6493
|
}
|
|
6244
6494
|
}
|
|
6245
|
-
default: return Prelude_Interfaces_concat(
|
|
6495
|
+
default: return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' and teams ', a2: {a1: PullRequest_n__6853_1427_csv($0, $1, $2, $3, $4, $5, $6), a2: {h: 0}}});
|
|
6246
6496
|
}
|
|
6247
6497
|
}
|
|
6248
6498
|
|
|
6249
|
-
function
|
|
6499
|
+
function PullRequest_n__7433_1982_prepareDescriptionFile($0, $1, $2, $3, $4) {
|
|
6250
6500
|
return $4.a1.a2(undefined)(undefined)(System_File_Meta_exists($4, '.github/PULL_REQUEST_TEMPLATE.md'))($12 => Prelude_Interfaces_when($4.a1.a1, $12, () => $4.a1.a1.a1(undefined)(undefined)($23 => (undefined))(System_File_copyFile($4, '.github/PULL_REQUEST_TEMPLATE.md', 'pr_description.tmp.md'))));
|
|
6251
6501
|
}
|
|
6252
6502
|
|
|
6253
|
-
function
|
|
6254
|
-
return Prelude_Interfaces_concat(
|
|
6503
|
+
function PullRequest_n__6853_1430_prComment($0, $1, $2, $3, $4, $5, $6) {
|
|
6504
|
+
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}}}});
|
|
6255
6505
|
}
|
|
6256
6506
|
|
|
6257
|
-
function
|
|
6258
|
-
const $7 = $8 => {
|
|
6259
|
-
switch(Data_Config_rf__colors($5)) {
|
|
6260
|
-
case 1: return $8;
|
|
6261
|
-
case 0: return Text_PrettyPrint_Prettyprinter_Doc_unAnnotate($8);
|
|
6262
|
-
}
|
|
6263
|
-
};
|
|
6264
|
-
return Text_PrettyPrint_Prettyprinter_Render_Terminal_renderString(Text_PrettyPrint_Prettyprinter_Doc_layoutPretty(Text_PrettyPrint_Prettyprinter_Doc_defaultLayoutOptions(), $7($6)));
|
|
6265
|
-
}
|
|
6266
|
-
|
|
6267
|
-
function PullRequest_n__6956_2025_inlineDescription($0, $1, $2, $3, $4) {
|
|
6507
|
+
function PullRequest_n__7433_1981_inlineDescription($0, $1, $2, $3, $4) {
|
|
6268
6508
|
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)))));
|
|
6269
6509
|
}
|
|
6270
6510
|
|
|
6271
|
-
function
|
|
6272
|
-
return FFI_Concurrency_fork(
|
|
6511
|
+
function PullRequest_n__6746_1302_forkedReviews($0, $1, $2, $3, $4) {
|
|
6512
|
+
return FFI_Concurrency_fork(csegen_21(), ('reviews --json '+Prelude_Show_show_Show_Integer($4.a1)));
|
|
6273
6513
|
}
|
|
6274
6514
|
|
|
6275
|
-
function
|
|
6515
|
+
function PullRequest_n__7433_1983_editorDescription($0, $1, $2, $3, $4, $5) {
|
|
6276
6516
|
const $10 = () => {
|
|
6277
6517
|
const $27 = $28 => {
|
|
6278
6518
|
switch($28) {
|
|
6279
|
-
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, '.
|
|
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'))($48 => Prelude_Interfaces_when($4.a1.a1, $48, () => System_File_Node_removeFile($4, 'pr_description.tmp.md'))), () => $4.a1.a1.a2(undefined)(description)));
|
|
6280
6520
|
default: return $4.a1.a1.a2(undefined)({h: 0, a1: {h: 0, a1: $28}});
|
|
6281
6521
|
}
|
|
6282
6522
|
};
|
|
6283
|
-
return $4.a1.a2(undefined)(undefined)(System_Node_system($4, Prelude_Interfaces_concat(
|
|
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}}})))($27);
|
|
6284
6524
|
};
|
|
6285
|
-
return Prelude_Interfaces_x3ex3e($4.a1,
|
|
6525
|
+
return Prelude_Interfaces_x3ex3e($4.a1, PullRequest_n__7433_1982_prepareDescriptionFile($0, $1, $2, $3, $4), $10);
|
|
6286
6526
|
}
|
|
6287
6527
|
|
|
6288
|
-
function
|
|
6289
|
-
return
|
|
6528
|
+
function PullRequest_n__6853_1427_csv($0, $1, $2, $3, $4, $5, $6) {
|
|
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(csegen_402(), $6)));
|
|
6290
6530
|
}
|
|
6291
6531
|
|
|
6292
|
-
function
|
|
6293
|
-
return Prelude_Interfaces_x3ex3e(
|
|
6532
|
+
function PullRequest_n__7433_1984_createPR($0, $1, $2, $3) {
|
|
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.a4, a2: {a1: ')?', a2: {h: 0}}}})), () => $5d => $5e => {
|
|
6294
6534
|
const $6a = baseBranchInput => {
|
|
6295
|
-
const $6b =
|
|
6296
|
-
const $7e = Data_Maybe_fromMaybe(() => '', Prelude_Interfaces_x3cx24x3e(
|
|
6297
|
-
const $7d = () => Prelude_Interfaces_x3ex3e(
|
|
6535
|
+
const $6b = PullRequest_case__identifyOrCreatePRx2ccreatePR_2311($0, $1, $2, $3, baseBranchInput, Data_String_strM(baseBranchInput));
|
|
6536
|
+
const $7e = Data_Maybe_fromMaybe(() => '', Prelude_Interfaces_x3cx24x3e(csegen_18(), $86 => ($86+' - '), Util_parseJiraPrefix($2)));
|
|
6537
|
+
const $7d = () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStr(csegen_21(), $7e), () => $95 => $96 => {
|
|
6298
6538
|
const $a4 = title => $a5 => $a6 => {
|
|
6299
6539
|
const $a9 = Data_Config_rf__editor($3);
|
|
6300
6540
|
let $a8;
|
|
6301
6541
|
switch($a9.h) {
|
|
6302
6542
|
case 0: {
|
|
6303
|
-
$a8 =
|
|
6543
|
+
$a8 = PullRequest_n__7433_1981_inlineDescription($0, $1, $2, $3, csegen_21());
|
|
6304
6544
|
break;
|
|
6305
6545
|
}
|
|
6306
6546
|
case undefined: {
|
|
6307
|
-
$a8 = Prelude_Interfaces_x3cx24x3e(
|
|
6547
|
+
$a8 = Prelude_Interfaces_x3cx24x3e(csegen_103(), $b7 => Prelude_Types_either(() => $ba => '', () => $bc => $bc, $b7), PullRequest_n__7433_1983_editorDescription($0, $1, $2, $3, csegen_21(), $a9.a1));
|
|
6308
6548
|
break;
|
|
6309
6549
|
}
|
|
6310
6550
|
}
|
|
6311
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise($a8, description => Prelude_Interfaces_x3ex3e(
|
|
6551
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise($a8, 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, $6b, title, description))), $a5, $a6);
|
|
6312
6552
|
};
|
|
6313
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(
|
|
6553
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $9d => ($7e+Data_String_trim($9d)), csegen_404()), $a4, $95, $96);
|
|
6314
6554
|
});
|
|
6315
|
-
return Prelude_Interfaces_x3ex3e(
|
|
6555
|
+
return Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), 'What would you like the title to be?'), $7d);
|
|
6316
6556
|
};
|
|
6317
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(
|
|
6557
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $65 => Data_String_trim($65), csegen_404()), $6a, $5d, $5e);
|
|
6318
6558
|
})));
|
|
6319
6559
|
}
|
|
6320
6560
|
|
|
@@ -6344,7 +6584,7 @@ function PullRequest_reviewsForUser($0, $1, $2, $3) {
|
|
|
6344
6584
|
case 0: return 1;
|
|
6345
6585
|
}
|
|
6346
6586
|
};
|
|
6347
|
-
const $4 =
|
|
6587
|
+
const $4 = Prelude_Types_List_filter($6, $3);
|
|
6348
6588
|
return $10 => $11 => {
|
|
6349
6589
|
const $26 = reviewsJson => $27 => $28 => {
|
|
6350
6590
|
const $2a = $2b => $2c => {
|
|
@@ -6367,18 +6607,18 @@ function PullRequest_reviewsForUser($0, $1, $2, $3) {
|
|
|
6367
6607
|
};
|
|
6368
6608
|
const $32 = {a1: $33, a2: a => $3b => ({h: 1, a1: $3b}), a3: $3d};
|
|
6369
6609
|
const $30 = Prelude_Types_traverse_Traversable_List($32, $48 => Language_JSON_Accessors_array($4b => Data_Review_parseReview($4b), $48), reviewsJson);
|
|
6370
|
-
return Data_Promise_either(
|
|
6610
|
+
return Data_Promise_either(csegen_115(), $30, $2b, $2c);
|
|
6371
6611
|
};
|
|
6372
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise($2a, reviews => $53 => $54 => Data_Promise_pure_Applicative_Promise(
|
|
6612
|
+
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);
|
|
6373
6613
|
};
|
|
6374
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(
|
|
6614
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_15(), csegen_113(), Prelude_Types_traverse_Traversable_List(csegen_9(), $1e => PullRequest_n__6746_1302_forkedReviews($1, $3, $2, $0, $1e), $4)), $26, $10, $11);
|
|
6375
6615
|
};
|
|
6376
6616
|
}
|
|
6377
6617
|
|
|
6378
6618
|
function PullRequest_requestReviewers($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
6379
6619
|
const $14 = $15 => $16 => $17 => {
|
|
6380
6620
|
const $2e = teamMembers => {
|
|
6381
|
-
const $2f = Reviewer_chooseReviewers(
|
|
6621
|
+
const $2f = Reviewer_chooseReviewers(csegen_111(), $15.a2, $15.a1, teamMembers, {h: 0}, $2.a3);
|
|
6382
6622
|
return $39 => $3a => {
|
|
6383
6623
|
const $41 = chosenUser => {
|
|
6384
6624
|
const $42 = Prelude_Types_List_tailRecAppend(Prelude_Types_toList_Foldable_Maybe(chosenUser), $4);
|
|
@@ -6404,31 +6644,31 @@ function PullRequest_requestReviewers($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
|
6404
6644
|
break;
|
|
6405
6645
|
}
|
|
6406
6646
|
}
|
|
6407
|
-
const $4e = Prelude_Interfaces_when(
|
|
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.a6, () => $72 => $73 => {
|
|
6408
6648
|
switch(chosenUser.h) {
|
|
6409
|
-
case undefined: return FFI_GitHub_createComment($1, $0.a2, $0.a3, $2.a1,
|
|
6649
|
+
case undefined: return FFI_GitHub_createComment($1, $0.a2, $0.a3, $2.a1, PullRequest_n__6853_1430_prComment($1, $5, $4, $3, $2, $0, chosenUser.a1), $72, $73);
|
|
6410
6650
|
case 0: return Data_Promise_pure_Applicative_Promise(undefined, $72, $73);
|
|
6411
6651
|
}
|
|
6412
6652
|
})));
|
|
6413
6653
|
let $8c;
|
|
6414
6654
|
switch(Prelude_Types_null_Foldable_List($42)) {
|
|
6415
6655
|
case 1: {
|
|
6416
|
-
$8c = () => Prelude_IO_putStrLn(
|
|
6656
|
+
$8c = () => Prelude_IO_putStrLn(csegen_21(), Util_renderString($0, Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Could not pick a user from the given Team ')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('(perhaps the only option was the author of the pull request?).'), a2: {h: 0}}})));
|
|
6417
6657
|
break;
|
|
6418
6658
|
}
|
|
6419
6659
|
case 0: {
|
|
6420
|
-
$8c = () => Prelude_IO_putStrLn(
|
|
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: PullRequest_n__6853_1428_userNotice($1, $5, $4, $3, $2, $0, chosenUser), a2: {a1: PullRequest_n__6853_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}}})));
|
|
6421
6661
|
break;
|
|
6422
6662
|
}
|
|
6423
6663
|
}
|
|
6424
|
-
return Prelude_Interfaces_x3ex3e(
|
|
6664
|
+
return Prelude_Interfaces_x3ex3e(csegen_15(), $4e, $8c);
|
|
6425
6665
|
};
|
|
6426
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(Reviewer_randomReviewer(
|
|
6666
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(Reviewer_randomReviewer(csegen_21(), $2f), $41, $39, $3a);
|
|
6427
6667
|
};
|
|
6428
6668
|
};
|
|
6429
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(
|
|
6669
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $1f => Prelude_Types_join_Monad_List($1f), Prelude_Types_traverse_Traversable_List(csegen_9(), $27 => FFI_GitHub_listTeamMembers($1, $0.a2, $27), $3)), $2e, $16, $17);
|
|
6430
6670
|
};
|
|
6431
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise($a => $b => PullRequest_listReviewers($0, $1, 4n,
|
|
6671
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise($a => $b => PullRequest_listReviewers($0, $1, 4n, csegen_134(), $a, $b), $14, $6, $7);
|
|
6432
6672
|
}
|
|
6433
6673
|
|
|
6434
6674
|
function PullRequest_partitionx27($0, $1, $2) {
|
|
@@ -6452,12 +6692,12 @@ function PullRequest_partitionx27($0, $1, $2) {
|
|
|
6452
6692
|
}
|
|
6453
6693
|
};
|
|
6454
6694
|
const $4c = {a1: $4d, a2: a => $55 => ({h: 1, a1: $55}), a3: $57};
|
|
6455
|
-
const $4a = Prelude_Types_traverse_Traversable_List($4c,
|
|
6456
|
-
return Data_Promise_either(
|
|
6695
|
+
const $4a = Prelude_Types_traverse_Traversable_List($4c, csegen_434(), prJsons);
|
|
6696
|
+
return Data_Promise_either(csegen_115(), $4a, $45, $46);
|
|
6457
6697
|
};
|
|
6458
6698
|
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);
|
|
6459
6699
|
};
|
|
6460
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(
|
|
6700
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_15(), $9 => $a => $b => FFI_Concurrency_promiseAll({a1: acc => elem => func => init => input => Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29(func, init, input), a2: elem => acc => func => init => input => Data_Pagination_foldl_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29(func, init, input), a3: elem => $19 => Data_Pagination_null_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($19), a4: elem => acc => m => $1d => funcM => init => input => Data_Pagination_foldlM_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($1d, funcM, init, input), a5: elem => $24 => Data_Pagination_toList_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($24), a6: a => m => $28 => f => $29 => Data_Pagination_foldMap_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($28, f, $29)}, $9, $a, $b), Data_Pagination_traversex27(csegen_9(), $36 => $37 => $38 => $39 => PullRequest_forkedPRs($36, $37, $38, $39), $0)), $40, $1, $2);
|
|
6461
6701
|
}
|
|
6462
6702
|
|
|
6463
6703
|
function PullRequest_partition($0) {
|
|
@@ -6469,7 +6709,7 @@ function PullRequest_listReviewers($0, $1, $2, $3, $4, $5) {
|
|
|
6469
6709
|
}
|
|
6470
6710
|
|
|
6471
6711
|
function PullRequest_listPartitionedPRs($0, $1, $2, $3) {
|
|
6472
|
-
return
|
|
6712
|
+
return PullRequest_with__listPartitionedPRs_1144($3, $2, {a1: Data_Nat_isLT(0n, $3), a2: Data_Nat_isLT(0n, $2)}, $1, $0);
|
|
6473
6713
|
}
|
|
6474
6714
|
|
|
6475
6715
|
function PullRequest_identifyOrCreatePR($0, $1, $2, $3, $4, $5) {
|
|
@@ -6483,7 +6723,7 @@ function PullRequest_identifyOrCreatePR($0, $1, $2, $3, $4, $5) {
|
|
|
6483
6723
|
}
|
|
6484
6724
|
};
|
|
6485
6725
|
}
|
|
6486
|
-
case 0: return Prelude_Interfaces_x3cx24x3e(
|
|
6726
|
+
case 0: return Prelude_Interfaces_x3cx24x3e(csegen_103(), $23 => ({a1: 1, a2: $23}), PullRequest_n__7433_1984_createPR($1, $2, $3, $0));
|
|
6487
6727
|
default: return $2c => $2d => Data_Promise_reject('Multiple PRs for the current brach. We only handle 1 PR per branch currently.', $2c, $2d);
|
|
6488
6728
|
}
|
|
6489
6729
|
};
|
|
@@ -6491,7 +6731,7 @@ function PullRequest_identifyOrCreatePR($0, $1, $2, $3, $4, $5) {
|
|
|
6491
6731
|
}
|
|
6492
6732
|
|
|
6493
6733
|
function PullRequest_forkedPRs($0, $1, $2, $3) {
|
|
6494
|
-
return FFI_Concurrency_fork(
|
|
6734
|
+
return FFI_Concurrency_fork(csegen_21(), Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'pulls --json ', a2: {a1: Prelude_Show_show_Show_Nat($0), a2: {a1: ' ', a2: {a1: Prelude_Show_show_Show_Nat($1), a2: {h: 0}}}}}));
|
|
6495
6735
|
}
|
|
6496
6736
|
|
|
6497
6737
|
const PullRequest_empty = __lazy(function () {
|
|
@@ -6559,14 +6799,14 @@ function System_File_ReadWrite_readLinesOnto($0, $1, $2, $3, $4) {
|
|
|
6559
6799
|
}
|
|
6560
6800
|
};
|
|
6561
6801
|
const $26 = {a1: $27, a2: a => $2f => ({h: 1, a1: $2f}), a3: $31};
|
|
6562
|
-
const $25 = {a1: $26, a2:
|
|
6802
|
+
const $25 = {a1: $26, a2: csegen_244(), a3: csegen_245()};
|
|
6563
6803
|
const $40 = b => a => func => $41 => {
|
|
6564
6804
|
switch($41.h) {
|
|
6565
6805
|
case 0: return {h: 0, a1: $41.a1};
|
|
6566
6806
|
case 1: return {h: 1, a1: func($41.a1)};
|
|
6567
6807
|
}
|
|
6568
6808
|
};
|
|
6569
|
-
const $3f = {a1: $40, a2:
|
|
6809
|
+
const $3f = {a1: $40, a2: csegen_454(), a3: csegen_458()};
|
|
6570
6810
|
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));
|
|
6571
6811
|
}
|
|
6572
6812
|
default: {
|
|
@@ -6805,7 +7045,7 @@ const System_Info_os = __lazy(function () {
|
|
|
6805
7045
|
});
|
|
6806
7046
|
|
|
6807
7047
|
const System_Info_isWindows = __lazy(function () {
|
|
6808
|
-
return Prelude_Types_elem(
|
|
7048
|
+
return Prelude_Types_elem(csegen_77(), csegen_94(), System_Info_os(), {a1: 'windows', a2: {a1: 'mingw32', a2: {a1: 'cygwin32', a2: {h: 0}}}});
|
|
6809
7049
|
});
|
|
6810
7050
|
|
|
6811
7051
|
function System_File_Meta_isTTY($0, $1) {
|
|
@@ -6915,63 +7155,63 @@ function System_Node_system($0, $1) {
|
|
|
6915
7155
|
return $0.a2(undefined)($7 => System_Node_prim__system($1, $7));
|
|
6916
7156
|
}
|
|
6917
7157
|
|
|
6918
|
-
function
|
|
7158
|
+
function Reviewer_with__scoredReviewersx2czipReviewsx2ccalc_1758($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a, $b, $c, $d, $e) {
|
|
6919
7159
|
switch($c.h) {
|
|
6920
7160
|
case 0: return ($e+$d);
|
|
6921
7161
|
case 1: return Prelude_Types_prim__integerToNat(($e-$d));
|
|
6922
7162
|
}
|
|
6923
7163
|
}
|
|
6924
7164
|
|
|
6925
|
-
function
|
|
7165
|
+
function Reviewer_n__5330_2143_yellowDot($0, $1, $2, $3, $4) {
|
|
6926
7166
|
return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\u{b7}'));
|
|
6927
7167
|
}
|
|
6928
7168
|
|
|
6929
|
-
function
|
|
7169
|
+
function Reviewer_n__4753_1591_weightReviews($0, $1, $2, $3, $4, $5) {
|
|
6930
7170
|
const $6 = Data_List_groupAllWith($0, $a => $a, $5);
|
|
6931
7171
|
const $10 = xs => {
|
|
6932
7172
|
const $11 = (Prelude_Types_List_lengthTR(Data_List1_forget(xs))*$4);
|
|
6933
7173
|
return {a1: xs.a1, a2: $11, a3: $11};
|
|
6934
7174
|
};
|
|
6935
|
-
return Prelude_Interfaces_x3cx26x3e(
|
|
7175
|
+
return Prelude_Interfaces_x3cx26x3e(csegen_119(), $6, $10);
|
|
6936
7176
|
}
|
|
6937
7177
|
|
|
6938
|
-
function
|
|
7178
|
+
function Reviewer_n__4753_1592_sortx27($0, $1, $2, $3, $4) {
|
|
6939
7179
|
return Data_List_sortBy($7 => $8 => Prelude_Basics_on($b => $c => Prelude_EqOrd_compare_Ord_Integer($b, $c), $11 => $11.a3, $7, $8), $4);
|
|
6940
7180
|
}
|
|
6941
7181
|
|
|
6942
|
-
function
|
|
7182
|
+
function Reviewer_n__5330_2144_redDot($0, $1, $2, $3, $4) {
|
|
6943
7183
|
return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(1), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\u{25e6}'));
|
|
6944
7184
|
}
|
|
6945
7185
|
|
|
6946
|
-
function
|
|
6947
|
-
return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Weighted review workload.'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('4x the
|
|
7186
|
+
function Reviewer_n__5330_2145_header($0, $1, $2, $3, $4) {
|
|
7187
|
+
return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Weighted review workload.'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('4x the number of open review requests'), Text_PrettyPrint_Prettyprinter_Symbols_parens(Reviewer_n__5330_2143_yellowDot($0, $1, $2, $3, $4))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('1x the number of closed PRs with unanswered review requests'), Text_PrettyPrint_Prettyprinter_Symbols_parens(Reviewer_n__5330_2144_redDot($0, $1, $2, $3, $4))), a2: {a1: Text_PrettyPrint_Prettyprinter_Symbols_parens(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Reviewer_n__5330_2144_redDot($0, $1, $2, $3, $4), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('overlayed on'), Reviewer_n__5330_2143_yellowDot($0, $1, $2, $3, $4)))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}}}});
|
|
6948
7188
|
}
|
|
6949
7189
|
|
|
6950
|
-
function
|
|
7190
|
+
function Reviewer_n__5330_2147_graphOne($0, $1, $2, $3, $4, $5, $6) {
|
|
6951
7191
|
const $8 = Prelude_Types_prim__integerToNat(($5-$6.a2));
|
|
6952
7192
|
const $d = Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), $1.a1(undefined)($6.a1));
|
|
6953
7193
|
const $17 = Prelude_Types_prim__integerToNat(($6.a2-$6.a3));
|
|
6954
7194
|
const $1c = Prelude_Types_prim__integerToNat(($5-$6.a3));
|
|
6955
|
-
return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(
|
|
7195
|
+
return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Reviewer_n__5330_2146_bar($0, $1, $2, $3, $4, $8, $6.a3, Prelude_Types_min_Ord_Nat($1c, $17)), $d);
|
|
6956
7196
|
}
|
|
6957
7197
|
|
|
6958
|
-
function
|
|
6959
|
-
return Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Types_map_Functor_List($b =>
|
|
7198
|
+
function Reviewer_n__5330_2148_graph($0, $1, $2, $3, $4, $5, $6) {
|
|
7199
|
+
return Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Types_map_Functor_List($b => Reviewer_n__5330_2147_graphOne($0, $1, $2, $3, $4, $5, $b), $6));
|
|
6960
7200
|
}
|
|
6961
7201
|
|
|
6962
|
-
function
|
|
6963
|
-
return
|
|
7202
|
+
function Reviewer_n__4780_1748_calc($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a, $b, $c, $d) {
|
|
7203
|
+
return Reviewer_with__scoredReviewersx2czipReviewsx2ccalc_1758(undefined, $0, $1, $2, $3, $4, $5, $6, $8, $9, $a, $b, $a, $d, $c);
|
|
6964
7204
|
}
|
|
6965
7205
|
|
|
6966
|
-
function
|
|
7206
|
+
function Reviewer_n__5330_2146_bar($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
6967
7207
|
return Text_PrettyPrint_Prettyprinter_Doc_indent(Prelude_Cast_cast_Cast_Nat_Int($5), Text_PrettyPrint_Prettyprinter_Doc_hcat({a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(1), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_String_replicate($7, '\u{25e6}'))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_String_replicate($6, '\u{b7}'))), a2: {h: 0}}}));
|
|
6968
7208
|
}
|
|
6969
7209
|
|
|
6970
7210
|
function Reviewer_scoredReviewers($0, $1, $2, $3) {
|
|
6971
|
-
const $4 =
|
|
6972
|
-
const $c =
|
|
6973
|
-
const $14 =
|
|
6974
|
-
return
|
|
7211
|
+
const $4 = Reviewer_n__4753_1591_weightReviews($0, $3, $2, $1, 1n, $1);
|
|
7212
|
+
const $c = Reviewer_n__4753_1591_weightReviews($0, $3, $2, $1, 4n, $2);
|
|
7213
|
+
const $14 = Reviewer_n__4753_1596_zipReviews($0, $3, $2, $1, $c, $4, {h: 1, a1: $0, a2: $3, a3: $2, a4: $1}, 0);
|
|
7214
|
+
return Reviewer_n__4753_1592_sortx27($0, $3, $2, $1, Reviewer_n__4753_1596_zipReviews($0, $3, $2, $1, $14, Reviewer_n__4753_1591_weightReviews($0, $3, $2, $1, 0n, $3), {h: 0, a1: $0, a2: $3, a3: $2, a4: $1}, 1));
|
|
6975
7215
|
}
|
|
6976
7216
|
|
|
6977
7217
|
function Reviewer_reviewsGraph($0, $1, $2, $3, $4) {
|
|
@@ -6991,8 +7231,8 @@ function Reviewer_reviewsGraph($0, $1, $2, $3, $4) {
|
|
|
6991
7231
|
break;
|
|
6992
7232
|
}
|
|
6993
7233
|
}
|
|
6994
|
-
const $28 =
|
|
6995
|
-
const $1f = Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(
|
|
7234
|
+
const $28 = Reviewer_n__5330_2148_graph($0, $1, $4, $3, $2, $2f, $5);
|
|
7235
|
+
const $1f = Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Reviewer_n__5330_2145_header($0, $1, $4, $3, $2), $28);
|
|
6996
7236
|
return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29($1f, Text_PrettyPrint_Prettyprinter_Doc_line());
|
|
6997
7237
|
}
|
|
6998
7238
|
}
|
|
@@ -7016,7 +7256,7 @@ function Reviewer_chooseReviewers($0, $1, $2, $3, $4, $5) {
|
|
|
7016
7256
|
case 0: return {h: 0};
|
|
7017
7257
|
case undefined: {
|
|
7018
7258
|
const $1a = Data_List_takeWhile($1d => (($1d.a3===$12.a1.a3)?1:0), $12.a2);
|
|
7019
|
-
const $22 = Prelude_Interfaces_x3cx24x3e(
|
|
7259
|
+
const $22 = Prelude_Interfaces_x3cx24x3e(csegen_119(), $27 => Reviewer_loginScore($27), $1a);
|
|
7020
7260
|
return {a1: {a1: $12.a1.a1, a2: $12.a1.a3}, a2: $22};
|
|
7021
7261
|
}
|
|
7022
7262
|
}
|
|
@@ -7069,15 +7309,15 @@ function FFI_GitHub_pullRequestStateFilter($0) {
|
|
|
7069
7309
|
}
|
|
7070
7310
|
|
|
7071
7311
|
function FFI_GitHub_octokit($0) {
|
|
7072
|
-
return Prelude_Interfaces_x3cx24x3e(
|
|
7312
|
+
return Prelude_Interfaces_x3cx24x3e(csegen_85(), $5 => $5, $7 => FFI_GitHub_prim__octokit($0, $7));
|
|
7073
7313
|
}
|
|
7074
7314
|
|
|
7075
7315
|
function FFI_GitHub_listTeams($0, $1) {
|
|
7076
|
-
return Prelude_Interfaces_x3cx24x3e(
|
|
7316
|
+
return Prelude_Interfaces_x3cx24x3e(csegen_103(), $6 => Data_String_lines($6), $a => $b => FFI_promiseIO($e => $f => $10 => FFI_GitHub_prim__listTeams($0, $1, $e, $f, $10), $a, $b));
|
|
7077
7317
|
}
|
|
7078
7318
|
|
|
7079
7319
|
function FFI_GitHub_listTeamMembers($0, $1, $2) {
|
|
7080
|
-
return Prelude_Interfaces_x3cx24x3e(
|
|
7320
|
+
return Prelude_Interfaces_x3cx24x3e(csegen_103(), $7 => Data_String_lines($7), $b => $c => FFI_promiseIO($f => $10 => $11 => FFI_GitHub_prim__listTeamMembers($0, $1, $2, $f, $10, $11), $b, $c));
|
|
7081
7321
|
}
|
|
7082
7322
|
|
|
7083
7323
|
function FFI_GitHub_listPullReviewsJsonStr($0, $1, $2, $3, $4, $5) {
|
|
@@ -7092,23 +7332,27 @@ function FFI_GitHub_listPullRequestsJsonStr($0, $1, $2, $3, $4, $5) {
|
|
|
7092
7332
|
}
|
|
7093
7333
|
|
|
7094
7334
|
function FFI_GitHub_listPullRequests($0, $1, $2, $3, $4, $5) {
|
|
7095
|
-
return Prelude_Interfaces_x3dx3cx3c(
|
|
7335
|
+
return Prelude_Interfaces_x3dx3cx3c(csegen_15(), csegen_479(), FFI_GitHub_listPullRequestsJsonStr($0, $1, $2, $3, $4, $5));
|
|
7096
7336
|
}
|
|
7097
7337
|
|
|
7098
7338
|
function FFI_GitHub_listPRsForBranch($0, $1, $2, $3) {
|
|
7099
|
-
return Prelude_Interfaces_x3dx3cx3c(
|
|
7339
|
+
return Prelude_Interfaces_x3dx3cx3c(csegen_15(), csegen_479(), $a => $b => FFI_promiseIO($e => $f => $10 => FFI_GitHub_prim__listPRsForBranch($0, $1, $2, $3, $e, $f, $10), $a, $b));
|
|
7100
7340
|
}
|
|
7101
7341
|
|
|
7102
7342
|
function FFI_GitHub_listOrgMembers($0, $1) {
|
|
7103
|
-
return Prelude_Interfaces_x3cx24x3e(
|
|
7343
|
+
return Prelude_Interfaces_x3cx24x3e(csegen_103(), $6 => Data_String_lines($6), $a => $b => FFI_promiseIO($e => $f => $10 => FFI_GitHub_prim__listOrgMembers($0, $1, $e, $f, $10), $a, $b));
|
|
7344
|
+
}
|
|
7345
|
+
|
|
7346
|
+
function FFI_GitHub_listMyTeams($0) {
|
|
7347
|
+
return Prelude_Interfaces_x3cx24x3e(csegen_103(), $5 => Data_String_lines($5), $9 => $a => FFI_promiseIO($d => $e => $f => FFI_GitHub_prim__listMyTeams($0, $d, $e, $f), $9, $a));
|
|
7104
7348
|
}
|
|
7105
7349
|
|
|
7106
7350
|
function FFI_GitHub_getUser($0) {
|
|
7107
|
-
return Prelude_Interfaces_x3cx3dx3c(
|
|
7351
|
+
return Prelude_Interfaces_x3cx3dx3c(csegen_15(), csegen_480(), $7 => $8 => $9 => FFI_promiseIO($c => $d => $e => FFI_GitHub_prim__getUser($0, $7, $c, $d, $e), $8, $9));
|
|
7108
7352
|
}
|
|
7109
7353
|
|
|
7110
7354
|
function FFI_GitHub_getSelf($0) {
|
|
7111
|
-
return Prelude_Interfaces_x3dx3cx3c(
|
|
7355
|
+
return Prelude_Interfaces_x3dx3cx3c(csegen_15(), csegen_480(), $7 => $8 => FFI_promiseIO($b => $c => $d => FFI_GitHub_prim__getSelf($0, $b, $c, $d), $7, $8));
|
|
7112
7356
|
}
|
|
7113
7357
|
|
|
7114
7358
|
function FFI_GitHub_getRepoDefaultBranch($0, $1, $2, $3, $4) {
|
|
@@ -7116,7 +7360,7 @@ function FFI_GitHub_getRepoDefaultBranch($0, $1, $2, $3, $4) {
|
|
|
7116
7360
|
}
|
|
7117
7361
|
|
|
7118
7362
|
function FFI_GitHub_createPR($0, $1, $2, $3, $4, $5, $6) {
|
|
7119
|
-
return Prelude_Interfaces_x3dx3cx3c(
|
|
7363
|
+
return Prelude_Interfaces_x3dx3cx3c(csegen_15(), $b => $c => $d => Data_Promise_either(csegen_115(), Data_PullRequest_parsePullRequestString($b), $c, $d), $17 => $18 => FFI_promiseIO($1b => $1c => $1d => FFI_GitHub_prim__createPR($0, $1, $2, $3, $4, $5, $6, $1b, $1c, $1d), $17, $18));
|
|
7120
7364
|
}
|
|
7121
7365
|
|
|
7122
7366
|
function FFI_GitHub_createComment($0, $1, $2, $3, $4, $5, $6) {
|
|
@@ -7124,7 +7368,7 @@ function FFI_GitHub_createComment($0, $1, $2, $3, $4, $5, $6) {
|
|
|
7124
7368
|
}
|
|
7125
7369
|
|
|
7126
7370
|
function FFI_GitHub_addPullReviewers($0, $1, $2, $3, $4, $5) {
|
|
7127
|
-
return Prelude_Interfaces_x3cx24x3e(
|
|
7371
|
+
return Prelude_Interfaces_x3cx24x3e(csegen_103(), $a => Data_String_lines($a), $e => $f => FFI_promiseIO($12 => $13 => $14 => FFI_GitHub_prim__addPullReviewers($0, $1, $2, $3, Data_String_Extra_join(',', csegen_77(), $4), Data_String_Extra_join(',', csegen_77(), $5), $12, $13, $14), $e, $f));
|
|
7128
7372
|
}
|
|
7129
7373
|
|
|
7130
7374
|
function FFI_promiseIO($0, $1, $2) {
|
|
@@ -7157,7 +7401,7 @@ function Data_Promise_x3cx7cx3e_Alternative_Promise($0, $1, $2, $3) {
|
|
|
7157
7401
|
}
|
|
7158
7402
|
|
|
7159
7403
|
function Data_Promise_x3cx2ax3e_Applicative_Promise($0, $1, $2, $3) {
|
|
7160
|
-
return Data_Promise_bind($0, f => Prelude_Interfaces_x3cx24x3e(
|
|
7404
|
+
return Data_Promise_bind($0, f => Prelude_Interfaces_x3cx24x3e(csegen_3(), f, $1), $2, $3);
|
|
7161
7405
|
}
|
|
7162
7406
|
|
|
7163
7407
|
function Data_Promise_resolvex27($0, $1, $2) {
|
|
@@ -7202,8 +7446,8 @@ function Data_User_parseUserString($0) {
|
|
|
7202
7446
|
}
|
|
7203
7447
|
};
|
|
7204
7448
|
const $3 = {a1: $4, a2: a => $c => ({h: 1, a1: $c}), a3: $e};
|
|
7205
|
-
const $2 = {a1: $3, a2:
|
|
7206
|
-
return Prelude_Interfaces_x3ex3dx3e($2,
|
|
7449
|
+
const $2 = {a1: $3, a2: csegen_244(), a3: csegen_245()};
|
|
7450
|
+
return Prelude_Interfaces_x3ex3dx3e($2, csegen_246(), $1f => Data_User_parseUser($1f), $0);
|
|
7207
7451
|
}
|
|
7208
7452
|
|
|
7209
7453
|
function Data_User_parseUser($0) {
|
|
@@ -7250,7 +7494,7 @@ function Data_Review_parseReview($0) {
|
|
|
7250
7494
|
}
|
|
7251
7495
|
};
|
|
7252
7496
|
const $20 = {a1: $21, a2: a => $29 => ({h: 1, a1: $29}), a3: $2b};
|
|
7253
|
-
const $1f = {a1: $20, a2:
|
|
7497
|
+
const $1f = {a1: $20, a2: csegen_244(), a3: csegen_245()};
|
|
7254
7498
|
const $1d = Prelude_Interfaces_x3dx3cx3c($1f, $3a => Data_Review_parseState($3a), Language_JSON_Accessors_string($12.a2.a1));
|
|
7255
7499
|
const $40 = state => {
|
|
7256
7500
|
const $46 = b => a => func => $47 => {
|
|
@@ -7271,7 +7515,7 @@ function Data_Review_parseReview($0) {
|
|
|
7271
7515
|
}
|
|
7272
7516
|
};
|
|
7273
7517
|
const $45 = {a1: $46, a2: a => $4e => ({h: 1, a1: $4e}), a3: $50};
|
|
7274
|
-
const $44 = {a1: $45, a2:
|
|
7518
|
+
const $44 = {a1: $45, a2: csegen_244(), a3: csegen_245()};
|
|
7275
7519
|
const $42 = Prelude_Interfaces_x3dx3cx3c($44, $5f => Data_Review_parseDateTime($5f), Language_JSON_Accessors_string($12.a2.a2.a1));
|
|
7276
7520
|
return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($42, submittedAt => ({h: 1, a1: {a1: submittedAt, a2: author, a3: state}}));
|
|
7277
7521
|
};
|
|
@@ -7292,7 +7536,7 @@ function Data_Review_isAuthor($0, $1) {
|
|
|
7292
7536
|
return Prelude_EqOrd_x3dx3d_Eq_String($1.a2, $0);
|
|
7293
7537
|
}
|
|
7294
7538
|
|
|
7295
|
-
function
|
|
7539
|
+
function Data_Date_n__4075_9411_parseNat($0, $1, $2) {
|
|
7296
7540
|
switch($2) {
|
|
7297
7541
|
case '0': return {a1: 0n};
|
|
7298
7542
|
case '1': return {a1: 1n};
|
|
@@ -7308,14 +7552,14 @@ function Data_Date_n__3558_7504_parseNat($0, $1, $2) {
|
|
|
7308
7552
|
}
|
|
7309
7553
|
}
|
|
7310
7554
|
|
|
7311
|
-
function
|
|
7555
|
+
function Data_Date_n__3685_9059_pad($0, $1, $2, $3) {
|
|
7312
7556
|
switch(Prelude_Types_x3c_Ord_Nat($3, Prelude_Types_prim__integerToNat(10n))) {
|
|
7313
|
-
case 1: return Prelude_Interfaces_concat(
|
|
7557
|
+
case 1: return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: '0', a2: {a1: Prelude_Show_show_Show_Nat($3), a2: {h: 0}}});
|
|
7314
7558
|
case 0: return Prelude_Show_show_Show_Nat($3);
|
|
7315
7559
|
}
|
|
7316
7560
|
}
|
|
7317
7561
|
|
|
7318
|
-
function
|
|
7562
|
+
function Data_Date_n__4192_9528_guardSuccess($0) {
|
|
7319
7563
|
switch($0.h) {
|
|
7320
7564
|
case undefined: {
|
|
7321
7565
|
switch($0.a1.h) {
|
|
@@ -7323,7 +7567,7 @@ function Data_Date_n__3675_7621_guardSuccess($0) {
|
|
|
7323
7567
|
switch($0.a2.h) {
|
|
7324
7568
|
case undefined: {
|
|
7325
7569
|
switch($0.a2.a2.h) {
|
|
7326
|
-
case undefined: return Prelude_Interfaces_x3cx24x3e(
|
|
7570
|
+
case undefined: return Prelude_Interfaces_x3cx24x3e(csegen_18(), $9 => ({a1: $0.a2.a1, a2: $0.a2.a2.a1, a3: $9}), Data_Date_parsePositiveReversed($0.a2.a2.a2));
|
|
7327
7571
|
default: return {h: 0};
|
|
7328
7572
|
}
|
|
7329
7573
|
}
|
|
@@ -7337,7 +7581,7 @@ function Data_Date_n__3675_7621_guardSuccess($0) {
|
|
|
7337
7581
|
}
|
|
7338
7582
|
}
|
|
7339
7583
|
|
|
7340
|
-
function
|
|
7584
|
+
function Data_Date_n__4192_9529_go($0, $1) {
|
|
7341
7585
|
switch($0.a1.h) {
|
|
7342
7586
|
case 4: return {a1: {h: 4}, a2: undefined};
|
|
7343
7587
|
case 0: {
|
|
@@ -7395,7 +7639,7 @@ function Data_Date_n__3675_7622_go($0, $1) {
|
|
|
7395
7639
|
}
|
|
7396
7640
|
|
|
7397
7641
|
function Data_Date_show_Show_Date($0) {
|
|
7398
|
-
return Prelude_Interfaces_concat(
|
|
7642
|
+
return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: Prelude_Show_show_Show_Nat($0.a1), a2: {a1: '-', a2: {a1: Data_Date_n__3685_9059_pad($0.a3, $0.a2, $0.a1, $0.a2), a2: {a1: '-', a2: {a1: Data_Date_n__3685_9059_pad($0.a3, $0.a2, $0.a1, $0.a3), a2: {h: 0}}}}}});
|
|
7399
7643
|
}
|
|
7400
7644
|
|
|
7401
7645
|
function Data_Date_min_Ord_Date($0, $1) {
|
|
@@ -7454,7 +7698,7 @@ function Data_Date_x2fx3d_Eq_Date($0, $1) {
|
|
|
7454
7698
|
function Data_Date_parsePositiveReversed($0) {
|
|
7455
7699
|
switch($0.h) {
|
|
7456
7700
|
case 0: return {a1: 0n};
|
|
7457
|
-
case undefined: return Prelude_Types_x3ex3ex3d_Monad_Maybe(
|
|
7701
|
+
case undefined: return Prelude_Types_x3ex3ex3d_Monad_Maybe(Data_Date_n__4075_9411_parseNat($0.a1, $0.a2, $0.a1), n => Prelude_Types_x3ex3ex3d_Monad_Maybe(Data_Date_parsePositiveReversed($0.a2), $f => ({a1: (n+(Prelude_Types_prim__integerToNat(10n)*$f))})));
|
|
7458
7702
|
}
|
|
7459
7703
|
}
|
|
7460
7704
|
|
|
@@ -7465,7 +7709,7 @@ function Data_Date_parseDateTimeString($0) {
|
|
|
7465
7709
|
}
|
|
7466
7710
|
|
|
7467
7711
|
function Data_Date_parseDateString($0) {
|
|
7468
|
-
return
|
|
7712
|
+
return Data_Date_n__4192_9528_guardSuccess(Prelude_Types_foldl_Foldable_List($5 => $6 => Data_Date_n__4192_9529_go($5, $6), {a1: {h: 0}, a2: undefined}, Prelude_Types_fastUnpack($0)));
|
|
7469
7713
|
}
|
|
7470
7714
|
|
|
7471
7715
|
function Data_PullRequest_show_Show_PRState($0) {
|
|
@@ -7494,14 +7738,14 @@ function Data_PullRequest_x3dx3d_Eq_PRState($0, $1) {
|
|
|
7494
7738
|
}
|
|
7495
7739
|
|
|
7496
7740
|
function Data_PullRequest_rf__webURI($0, $1) {
|
|
7497
|
-
return Prelude_Interfaces_concat(
|
|
7741
|
+
return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'https://github.com/', a2: {a1: $0.a2, a2: {a1: '/', a2: {a1: $0.a3, a2: {a1: '/pull/', a2: {a1: Prelude_Show_show_Show_Integer($1.a1), a2: {h: 0}}}}}}});
|
|
7498
7742
|
}
|
|
7499
7743
|
|
|
7500
7744
|
function Data_PullRequest_parseState($0) {
|
|
7501
7745
|
switch($0) {
|
|
7502
7746
|
case 'open': return {h: 1, a1: 0};
|
|
7503
7747
|
case 'closed': return {h: 1, a1: 1};
|
|
7504
|
-
default: return {h: 0, a1: Prelude_Interfaces_concat(
|
|
7748
|
+
default: return {h: 0, a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Failed to parse a Pull Request State (open/closed). Found ', a2: {a1: $0, a2: {a1: '.', a2: {h: 0}}}})};
|
|
7505
7749
|
}
|
|
7506
7750
|
}
|
|
7507
7751
|
|
|
@@ -7524,8 +7768,8 @@ function Data_PullRequest_parsePullRequestsString($0) {
|
|
|
7524
7768
|
}
|
|
7525
7769
|
};
|
|
7526
7770
|
const $3 = {a1: $4, a2: a => $c => ({h: 1, a1: $c}), a3: $e};
|
|
7527
|
-
const $2 = {a1: $3, a2:
|
|
7528
|
-
return Prelude_Interfaces_x3ex3dx3e($2,
|
|
7771
|
+
const $2 = {a1: $3, a2: csegen_244(), a3: csegen_245()};
|
|
7772
|
+
return Prelude_Interfaces_x3ex3dx3e($2, csegen_246(), csegen_434(), $0);
|
|
7529
7773
|
}
|
|
7530
7774
|
|
|
7531
7775
|
function Data_PullRequest_parsePullRequestString($0) {
|
|
@@ -7547,65 +7791,65 @@ function Data_PullRequest_parsePullRequestString($0) {
|
|
|
7547
7791
|
}
|
|
7548
7792
|
};
|
|
7549
7793
|
const $3 = {a1: $4, a2: a => $c => ({h: 1, a1: $c}), a3: $e};
|
|
7550
|
-
const $2 = {a1: $3, a2:
|
|
7551
|
-
return Prelude_Interfaces_x3ex3dx3e($2,
|
|
7794
|
+
const $2 = {a1: $3, a2: csegen_244(), a3: csegen_245()};
|
|
7795
|
+
return Prelude_Interfaces_x3ex3dx3e($2, csegen_246(), $1f => Data_PullRequest_parsePR($1f), $0);
|
|
7552
7796
|
}
|
|
7553
7797
|
|
|
7554
7798
|
function Data_PullRequest_parsePR($0) {
|
|
7555
7799
|
const $5 = pr => {
|
|
7556
|
-
const $
|
|
7557
|
-
const $
|
|
7558
|
-
const $
|
|
7559
|
-
const $
|
|
7560
|
-
switch($
|
|
7561
|
-
case 0: return {h: 0, a1: $
|
|
7562
|
-
case 1: return {h: 1, a1: func($
|
|
7800
|
+
const $17 = $18 => {
|
|
7801
|
+
const $24 = number => {
|
|
7802
|
+
const $29 = author => {
|
|
7803
|
+
const $2f = b => a => func => $30 => {
|
|
7804
|
+
switch($30.h) {
|
|
7805
|
+
case 0: return {h: 0, a1: $30.a1};
|
|
7806
|
+
case 1: return {h: 1, a1: func($30.a1)};
|
|
7563
7807
|
}
|
|
7564
7808
|
};
|
|
7565
|
-
const $
|
|
7566
|
-
switch($
|
|
7567
|
-
case 0: return {h: 0, a1: $
|
|
7809
|
+
const $39 = b => a => $3a => $3b => {
|
|
7810
|
+
switch($3a.h) {
|
|
7811
|
+
case 0: return {h: 0, a1: $3a.a1};
|
|
7568
7812
|
case 1: {
|
|
7569
|
-
switch($
|
|
7570
|
-
case 1: return {h: 1, a1: $
|
|
7571
|
-
case 0: return {h: 0, a1: $
|
|
7813
|
+
switch($3b.h) {
|
|
7814
|
+
case 1: return {h: 1, a1: $3a.a1($3b.a1)};
|
|
7815
|
+
case 0: return {h: 0, a1: $3b.a1};
|
|
7572
7816
|
}
|
|
7573
7817
|
}
|
|
7574
7818
|
}
|
|
7575
7819
|
};
|
|
7576
|
-
const $
|
|
7577
|
-
const $
|
|
7578
|
-
const $
|
|
7579
|
-
const $
|
|
7580
|
-
const $
|
|
7581
|
-
switch($
|
|
7582
|
-
case 0: return {h: 0, a1: $
|
|
7583
|
-
case 1: return {h: 1, a1: func($
|
|
7820
|
+
const $2e = {a1: $2f, a2: a => $37 => ({h: 1, a1: $37}), a3: $39};
|
|
7821
|
+
const $2d = {a1: $2e, a2: csegen_244(), a3: csegen_245()};
|
|
7822
|
+
const $2b = Prelude_Interfaces_x3dx3cx3c($2d, $48 => Data_PullRequest_parseState($48), Language_JSON_Accessors_string($18.a2.a2.a1));
|
|
7823
|
+
const $4e = state => {
|
|
7824
|
+
const $54 = b => a => func => $55 => {
|
|
7825
|
+
switch($55.h) {
|
|
7826
|
+
case 0: return {h: 0, a1: $55.a1};
|
|
7827
|
+
case 1: return {h: 1, a1: func($55.a1)};
|
|
7584
7828
|
}
|
|
7585
7829
|
};
|
|
7586
|
-
const $
|
|
7587
|
-
switch($
|
|
7588
|
-
case 0: return {h: 0, a1: $
|
|
7830
|
+
const $5e = b => a => $5f => $60 => {
|
|
7831
|
+
switch($5f.h) {
|
|
7832
|
+
case 0: return {h: 0, a1: $5f.a1};
|
|
7589
7833
|
case 1: {
|
|
7590
|
-
switch($
|
|
7591
|
-
case 1: return {h: 1, a1: $
|
|
7592
|
-
case 0: return {h: 0, a1: $
|
|
7834
|
+
switch($60.h) {
|
|
7835
|
+
case 1: return {h: 1, a1: $5f.a1($60.a1)};
|
|
7836
|
+
case 0: return {h: 0, a1: $60.a1};
|
|
7593
7837
|
}
|
|
7594
7838
|
}
|
|
7595
7839
|
}
|
|
7596
7840
|
};
|
|
7597
|
-
const $
|
|
7598
|
-
const $
|
|
7599
|
-
const $
|
|
7600
|
-
return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($
|
|
7841
|
+
const $53 = {a1: $54, a2: a => $5c => ({h: 1, a1: $5c}), a3: $5e};
|
|
7842
|
+
const $52 = {a1: $53, a2: csegen_244(), a3: csegen_245()};
|
|
7843
|
+
const $50 = Prelude_Interfaces_x3dx3cx3c($52, $6d => Data_PullRequest_parseDateTime($6d), Language_JSON_Accessors_string($18.a2.a2.a2.a1));
|
|
7844
|
+
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}}))));
|
|
7601
7845
|
};
|
|
7602
|
-
return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($
|
|
7846
|
+
return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($2b, $4e);
|
|
7603
7847
|
};
|
|
7604
|
-
return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($
|
|
7848
|
+
return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($18.a2.a1), $29);
|
|
7605
7849
|
};
|
|
7606
|
-
return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_integer($
|
|
7850
|
+
return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_integer($18.a1), $24);
|
|
7607
7851
|
};
|
|
7608
|
-
return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_lookupAll({a1: 'pull_number', a2: {a1: 'author', a2: {a1: 'state', a2: {a1: 'created_at', a2: {a1: 'reviewers', a2: {h: 0}}}}}}, pr), $
|
|
7852
|
+
return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_lookupAll({a1: 'pull_number', a2: {a1: 'author', a2: {a1: 'state', a2: {a1: 'created_at', a2: {a1: 'reviewers', a2: {a1: 'head_ref', a2: {h: 0}}}}}}}, pr), $17);
|
|
7609
7853
|
};
|
|
7610
7854
|
return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_object($0), $5);
|
|
7611
7855
|
}
|
|
@@ -7615,14 +7859,14 @@ function Data_PullRequest_parseDateTime($0) {
|
|
|
7615
7859
|
}
|
|
7616
7860
|
|
|
7617
7861
|
function Data_PullRequest_isRequestedReviewer($0, $1) {
|
|
7618
|
-
return Prelude_Interfaces_any(
|
|
7862
|
+
return Prelude_Interfaces_any(csegen_77(), $6 => Prelude_EqOrd_x3dx3d_Eq_String($6, $0), $1.a5);
|
|
7619
7863
|
}
|
|
7620
7864
|
|
|
7621
7865
|
function Data_PullRequest_isAuthor($0, $1) {
|
|
7622
7866
|
return Prelude_EqOrd_x3dx3d_Eq_String($1.a3, $0);
|
|
7623
7867
|
}
|
|
7624
7868
|
|
|
7625
|
-
function
|
|
7869
|
+
function FFI_Git_case__remoteTrackingBranch_1746($0, $1, $2) {
|
|
7626
7870
|
switch($1) {
|
|
7627
7871
|
case '': {
|
|
7628
7872
|
switch($2.h) {
|
|
@@ -7634,12 +7878,16 @@ function FFI_Git_case__remoteTrackingBranch_1696($0, $1, $2) {
|
|
|
7634
7878
|
}
|
|
7635
7879
|
}
|
|
7636
7880
|
|
|
7881
|
+
function FFI_Git_userEmail($0, $1, $2) {
|
|
7882
|
+
return FFI_promiseIO($5 => $6 => $7 => FFI_Git_prim__userEmail($0, $5, $6, $7), $1, $2);
|
|
7883
|
+
}
|
|
7884
|
+
|
|
7637
7885
|
function FFI_Git_remoteURI($0, $1, $2, $3) {
|
|
7638
7886
|
return FFI_promiseIO($6 => $7 => $8 => FFI_Git_prim__remoteURI($0, $1, $6, $7, $8), $2, $3);
|
|
7639
7887
|
}
|
|
7640
7888
|
|
|
7641
7889
|
function FFI_Git_remoteTrackingBranch($0, $1, $2) {
|
|
7642
|
-
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(
|
|
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(FFI_Git_case__remoteTrackingBranch_1746($0, str, Data_String_strM(str)), $14, $15), $1, $2);
|
|
7643
7891
|
}
|
|
7644
7892
|
|
|
7645
7893
|
function FFI_Git_pushNewBranch($0, $1, $2, $3, $4) {
|
|
@@ -7654,7 +7902,11 @@ function FFI_Git_currentBranch($0, $1, $2) {
|
|
|
7654
7902
|
return FFI_promiseIO($5 => $6 => $7 => FFI_Git_prim__currentBranch($0, $5, $6, $7), $1, $2);
|
|
7655
7903
|
}
|
|
7656
7904
|
|
|
7657
|
-
function
|
|
7905
|
+
function FFI_Git_checkoutBranch($0, $1, $2, $3) {
|
|
7906
|
+
return Data_Promise_map_Functor_Promise($6 => (undefined), $8 => $9 => FFI_promiseIO($c => $d => $e => FFI_Git_prim__checkoutBranch($0, $1, $c, $d, $e), $8, $9), $2, $3);
|
|
7907
|
+
}
|
|
7908
|
+
|
|
7909
|
+
function FFI_Concurrency_n__3897_7062_both($0, $1, $2, $3, $4) {
|
|
7658
7910
|
return $0.a1.a2(undefined)(undefined)($0.a2(undefined)($13 => FFI_Concurrency_prim__singleton($3, $13)))(xx27 => $0.a1.a2(undefined)(undefined)($0.a1.a2(undefined)(undefined)($4)($2b => $0.a2(undefined)($31 => FFI_Concurrency_prim__both(xx27, $2b, $31))))(nested => $0.a2(undefined)($3c => FFI_Concurrency_prim__flatten(nested, $3c))));
|
|
7659
7911
|
}
|
|
7660
7912
|
|
|
@@ -7664,14 +7916,14 @@ function FFI_Concurrency_promiseAll($0, $1, $2, $3) {
|
|
|
7664
7916
|
const $3c = $3d => $3e => $3f => {
|
|
7665
7917
|
switch($3d.h) {
|
|
7666
7918
|
case 4: return Data_Promise_pure_Applicative_Promise($3d.a1, $3e, $3f);
|
|
7667
|
-
default: return Data_Promise_reject(Prelude_Interfaces_concat(
|
|
7919
|
+
default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Expected a JSON array from futures but got ', a2: {a1: Language_JSON_Data_show_Show_JSON($3d), a2: {a1: '.', a2: {h: 0}}}}), $3e, $3f);
|
|
7668
7920
|
}
|
|
7669
7921
|
};
|
|
7670
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise($25 => $26 => Data_Promise_either(
|
|
7922
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise($25 => $26 => Data_Promise_either(csegen_115(), Data_Either_maybeToEither(() => Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Failed to parse JSON from ', a2: {a1: str, a2: {h: 0}}}), Language_JSON_parse(str)), $25, $26), $3c, $21, $22);
|
|
7671
7923
|
};
|
|
7672
7924
|
return Data_Promise_x3ex3ex3d_Monad_Promise($10 => $11 => Data_Promise_promisify(ok => err => $14 => FFI_Concurrency_prim__awaitStringify(f, x => ok(x), y => err(y), $14), $10, $11), $20, $c, $d);
|
|
7673
7925
|
};
|
|
7674
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_Concurrency_all(
|
|
7926
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_Concurrency_all(csegen_21(), $0, $1), $b, $2, $3);
|
|
7675
7927
|
}
|
|
7676
7928
|
|
|
7677
7929
|
function FFI_Concurrency_fork($0, $1) {
|
|
@@ -7679,26 +7931,26 @@ function FFI_Concurrency_fork($0, $1) {
|
|
|
7679
7931
|
}
|
|
7680
7932
|
|
|
7681
7933
|
function FFI_Concurrency_all($0, $1, $2) {
|
|
7682
|
-
return $1.a1(undefined)(undefined)($c => $d =>
|
|
7934
|
+
return $1.a1(undefined)(undefined)($c => $d => FFI_Concurrency_n__3897_7062_both($0, $1, $2, $c, $d))($0.a2(undefined)($1a => FFI_Concurrency_prim__neutral($1a)))($2);
|
|
7683
7935
|
}
|
|
7684
7936
|
|
|
7685
|
-
function
|
|
7937
|
+
function Data_Pagination_with__metaPagesx27_5846($0, $1, $2, $3, $4, $5, $6) {
|
|
7686
7938
|
const $7 = $8 => Data_Pagination_divNatNZLemma($0, $1, $6);
|
|
7687
7939
|
return Data_Pagination_pagesHelper(0n, $0, $3, $7(undefined), $5);
|
|
7688
7940
|
}
|
|
7689
7941
|
|
|
7690
|
-
function
|
|
7942
|
+
function Data_Pagination_with__withx20blockx20inx20divNatNZLemma_5787($0, $1, $2, $3, $4, $5) {
|
|
7691
7943
|
return Prelude_Uninhabited_absurd($8 => $8, $3((Data_Nat_lteReflectsLTE(($0+1n), $1, $4)+1n)));
|
|
7692
7944
|
}
|
|
7693
7945
|
|
|
7694
|
-
function
|
|
7946
|
+
function Data_Pagination_with__divNatNZLemma_5769($0, $1, $2, $3, $4, $5) {
|
|
7695
7947
|
switch($2) {
|
|
7696
7948
|
case 0: return 1n;
|
|
7697
|
-
case 1: return
|
|
7949
|
+
case 1: return Data_Pagination_with__withx20blockx20inx20divNatNZLemma_5787($1, $0, $5, $c => Data_Nat_LTEImpliesNotGT($5, $c), $3, undefined);
|
|
7698
7950
|
}
|
|
7699
7951
|
}
|
|
7700
7952
|
|
|
7701
|
-
function
|
|
7953
|
+
function Data_Pagination_with__pagesHelper_5611($0, $1, $2, $3, $4, $5) {
|
|
7702
7954
|
switch($2.h) {
|
|
7703
7955
|
case 0: {
|
|
7704
7956
|
const $7 = Data_Pagination_lemma($0, $1, $2.a1);
|
|
@@ -7708,16 +7960,16 @@ function Data_Pagination_with__pagesHelper_4159($0, $1, $2, $3, $4, $5) {
|
|
|
7708
7960
|
}
|
|
7709
7961
|
}
|
|
7710
7962
|
|
|
7711
|
-
function
|
|
7712
|
-
return {h: 0, a1: $7, a2: $1, a3: $0, a4: $
|
|
7963
|
+
function Data_Pagination_with__nonTerminalPage_5590($0, $1, $2, $3, $4, $5, $6, $7) {
|
|
7964
|
+
return {h: 0, a1: $7, a2: $1, a3: $0, a4: $5, a5: $6, a6: undefined, a7: Data_Pagination_pagesHelper(($7+1n), $0, $1, $6, $5)};
|
|
7713
7965
|
}
|
|
7714
7966
|
|
|
7715
|
-
function
|
|
7967
|
+
function Data_Pagination_with__lemma_5493($0, $1, $2, $3, $4) {
|
|
7716
7968
|
return {a1: ($3.a1+1n), a2: {a1: undefined, a2: 1n}};
|
|
7717
7969
|
}
|
|
7718
7970
|
|
|
7719
7971
|
function Data_Pagination_toList_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($0) {
|
|
7720
|
-
return Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29(
|
|
7972
|
+
return Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29(csegen_192(), {h: 0}, $0);
|
|
7721
7973
|
}
|
|
7722
7974
|
|
|
7723
7975
|
function Data_Pagination_null_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($0) {
|
|
@@ -7732,7 +7984,7 @@ function Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24p
|
|
|
7732
7984
|
}
|
|
7733
7985
|
|
|
7734
7986
|
function Data_Pagination_foldl_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($0, $1, $2) {
|
|
7735
|
-
return Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($6 => $7 => Prelude_Basics_flip(
|
|
7987
|
+
return Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($6 => $7 => Prelude_Basics_flip(csegen_193(), $c => Prelude_Basics_flip($0, $6, $c), $7), $13 => $13, $2)($1);
|
|
7736
7988
|
}
|
|
7737
7989
|
|
|
7738
7990
|
function Data_Pagination_foldlM_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($0, $1, $2, $3) {
|
|
@@ -7751,15 +8003,15 @@ function Data_Pagination_traversex27($0, $1, $2) {
|
|
|
7751
8003
|
}
|
|
7752
8004
|
|
|
7753
8005
|
function Data_Pagination_pagesHelper($0, $1, $2, $3, $4) {
|
|
7754
|
-
return
|
|
8006
|
+
return Data_Pagination_with__pagesHelper_5611($2, $1, Data_Nat_isLT($2, $1), $3, $4, $0);
|
|
7755
8007
|
}
|
|
7756
8008
|
|
|
7757
8009
|
function Data_Pagination_nonTerminalPage($0, $1, $2, $3, $4, $5) {
|
|
7758
|
-
return
|
|
8010
|
+
return Data_Pagination_with__nonTerminalPage_5590($0, $3, $2, undefined, undefined, $5, $4, $1);
|
|
7759
8011
|
}
|
|
7760
8012
|
|
|
7761
8013
|
function Data_Pagination_metaPagesx27($0, $1, $2, $3) {
|
|
7762
|
-
return
|
|
8014
|
+
return Data_Pagination_with__metaPagesx27_5846($0, $1, undefined, Data_Nat_divNatNZ($0, $1), undefined, $2, $3);
|
|
7763
8015
|
}
|
|
7764
8016
|
|
|
7765
8017
|
function Data_Pagination_metaPages($0, $1, $2, $3, $4) {
|
|
@@ -7779,7 +8031,7 @@ function Data_Pagination_lemma($0, $1, $2) {
|
|
|
7779
8031
|
case 0n: _crashExp('Nat case not covered');
|
|
7780
8032
|
default: {
|
|
7781
8033
|
const $8 = ($2-1n);
|
|
7782
|
-
return
|
|
8034
|
+
return Data_Pagination_with__lemma_5493($0, $4, $8, Data_Pagination_lemmax27($0, $4, $8), $1);
|
|
7783
8035
|
}
|
|
7784
8036
|
}
|
|
7785
8037
|
}
|
|
@@ -7800,7 +8052,7 @@ function Data_Pagination_divNatNZLemma($0, $1, $2) {
|
|
|
7800
8052
|
case 0n: _crashExp('Nat case not covered');
|
|
7801
8053
|
default: {
|
|
7802
8054
|
const $f = ($1-1n);
|
|
7803
|
-
return
|
|
8055
|
+
return Data_Pagination_with__divNatNZLemma_5769($f, $b, Data_Nat_lte(($b+1n), $f), undefined, undefined, $2);
|
|
7804
8056
|
}
|
|
7805
8057
|
}
|
|
7806
8058
|
}
|
|
@@ -7824,7 +8076,7 @@ function System_getEnv($0, $1) {
|
|
|
7824
8076
|
function System_getArgs($0) {
|
|
7825
8077
|
const $12 = n => {
|
|
7826
8078
|
switch(Prelude_EqOrd_x3e_Ord_Int(n, Number(_truncBigInt32(0n)))) {
|
|
7827
|
-
case 1: return Prelude_Interfaces_for($0.a1.a1, {a1: b => a => func => $1e => Prelude_Types_map_Functor_List(func, $1e), a2:
|
|
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: csegen_513(), a2: $33 => $34 => Prelude_Num_div_Integral_Int($33, $34), a3: $39 => $3a => Prelude_Num_mod_Integral_Int($39, $3a)}, a2: {a1: csegen_260(), a2: {a1: csegen_513(), 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)));
|
|
7828
8080
|
case 0: return $0.a1.a1.a2(undefined)({h: 0});
|
|
7829
8081
|
}
|
|
7830
8082
|
};
|
|
@@ -7846,55 +8098,59 @@ function System_exitFailure($0) {
|
|
|
7846
8098
|
return System_exitWith($0, {a1: 1, a2: undefined});
|
|
7847
8099
|
}
|
|
7848
8100
|
|
|
7849
|
-
function
|
|
7850
|
-
return
|
|
8101
|
+
function Help_n__4274_1021_subcommand($0, $1) {
|
|
8102
|
+
return Help_n__4274_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);
|
|
7851
8103
|
}
|
|
7852
8104
|
|
|
7853
|
-
function
|
|
7854
|
-
return
|
|
8105
|
+
function Help_n__4274_1024_shell($0, $1) {
|
|
8106
|
+
return Help_n__4274_1019_maybeDecorate($0, $5 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($5)), $1);
|
|
7855
8107
|
}
|
|
7856
8108
|
|
|
7857
|
-
function
|
|
8109
|
+
function Help_n__4274_1020_option($0, $1) {
|
|
8110
|
+
return Help_n__4274_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
|
+
}
|
|
8112
|
+
|
|
8113
|
+
function Help_n__4274_1019_maybeDecorate($0, $1, $2) {
|
|
7858
8114
|
switch($0) {
|
|
7859
8115
|
case 1: return Text_PrettyPrint_Prettyprinter_Render_Terminal_renderString(Text_PrettyPrint_Prettyprinter_Doc_layoutPretty(Text_PrettyPrint_Prettyprinter_Doc_defaultLayoutOptions(), $1($2)));
|
|
7860
8116
|
case 0: return $2;
|
|
7861
8117
|
}
|
|
7862
8118
|
}
|
|
7863
8119
|
|
|
7864
|
-
function
|
|
7865
|
-
return
|
|
8120
|
+
function Help_n__4274_1023_heading($0, $1) {
|
|
8121
|
+
return Help_n__4274_1019_maybeDecorate($0, $5 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($5)), $1);
|
|
7866
8122
|
}
|
|
7867
8123
|
|
|
7868
|
-
function
|
|
7869
|
-
return
|
|
8124
|
+
function Help_n__4274_1022_argument($0, $1) {
|
|
8125
|
+
return Help_n__4274_1019_maybeDecorate($0, csegen_402(), $1);
|
|
7870
8126
|
}
|
|
7871
8127
|
|
|
7872
8128
|
function Help_help($0) {
|
|
7873
|
-
return Prelude_Interfaces_concat(
|
|
8129
|
+
return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'harmony ', a2: {a1: Help_n__4274_1021_subcommand($0, '<subcommand>'), a2: {a1: '\n\n', a2: {a1: Help_n__4274_1023_heading($0, 'Subcommands'), a2: {a1: ':\n ', a2: {a1: Help_n__4274_1021_subcommand($0, 'help'), a2: {a1: '\n - Print help\n ', a2: {a1: Help_n__4274_1021_subcommand($0, 'version'), a2: {a1: '\n - Print version\n ', a2: {a1: Help_n__4274_1021_subcommand($0, 'config'), a2: {a1: ' {', a2: {a1: Help_n__4274_1022_argument($0, '<property>'), a2: {a1: '} [', a2: {a1: Help_n__4274_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__4274_1022_argument($0, 'properties'), a2: {a1: ': ', a2: {a1: Data_String_Extra_join(', ', csegen_77(), Prelude_Interfaces_x3cx24x3e(csegen_119(), $4b => Help_n__4274_1020_option($0, $4b), Data_Config_settableProps())), a2: {a1: '.\n ', a2: {a1: Help_n__4274_1021_subcommand($0, 'sync'), a2: {a1: '\n - Synchronize local config with information from GitHub.\n ', a2: {a1: Help_n__4274_1021_subcommand($0, 'branch'), a2: {a1: '\n - Print the GitHub URI for the currently checked out branch.\n ', a2: {a1: Help_n__4274_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__4274_1021_subcommand($0, 'contribute'), a2: {a1: ' [', a2: {a1: Help_n__4274_1022_argument($0, '-c/--checkout'), a2: {a1: '] [', a2: {a1: Help_n__4274_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__4274_1021_subcommand($0, 'whoami'), a2: {a1: '\n - Print information about the configured and authenticated user.\n ', a2: {a1: Help_n__4274_1021_subcommand($0, 'reflect'), a2: {a1: '\n - Reflect on the current state of ones own PRs and review requests.\n ', a2: {a1: Help_n__4274_1021_subcommand($0, 'list'), a2: {a1: ' {', a2: {a1: Help_n__4274_1022_argument($0, '<team-slug>'), a2: {a1: '}\n - List the members of the given GitHub Team.\n ', a2: {a1: Help_n__4274_1021_subcommand($0, 'graph'), a2: {a1: ' {', a2: {a1: Help_n__4274_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__4274_1021_subcommand($0, 'assign'), a2: {a1: ' {', a2: {a1: Help_n__4274_1022_argument($0, '<team-slug>'), a2: {a1: ' | ', a2: {a1: Help_n__4274_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__4274_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__4274_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__4274_1024_shell($0, 'autoload -U +X compinit && compinit'), a2: {a1: '\n ', a2: {a1: Help_n__4274_1024_shell($0, 'autoload -U +X bashcompinit && bashcompinit'), a2: {a1: '\n ', a2: {h: 0}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}});
|
|
7874
8130
|
}
|
|
7875
8131
|
|
|
7876
|
-
function
|
|
8132
|
+
function Config_with__getConfig_5595($0, $1, $2, $3, $4) {
|
|
7877
8133
|
switch($1.h) {
|
|
7878
|
-
case 0: return Data_Promise_reject(Prelude_Interfaces_concat(
|
|
8134
|
+
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);
|
|
7879
8135
|
case undefined: return Data_Promise_pure_Applicative_Promise($1.a1($2), $3, $4);
|
|
7880
8136
|
}
|
|
7881
8137
|
}
|
|
7882
8138
|
|
|
7883
|
-
function
|
|
8139
|
+
function Config_with__withx20blockx20inx20setConfig_5494($0, $1, $2, $3, $4, $5) {
|
|
7884
8140
|
switch($3.h) {
|
|
7885
|
-
case 0: return $7 => Data_Promise_reject(Prelude_Interfaces_concat(
|
|
8141
|
+
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);
|
|
7886
8142
|
case undefined: return $1a => Config_writeConfig($3.a1, $5, $1a);
|
|
7887
8143
|
}
|
|
7888
8144
|
}
|
|
7889
8145
|
|
|
7890
|
-
function
|
|
8146
|
+
function Config_with__setConfig_5466($0, $1, $2, $3) {
|
|
7891
8147
|
switch($1.h) {
|
|
7892
|
-
case 0: return $5 => $6 => Data_Promise_reject(Prelude_Interfaces_concat(
|
|
7893
|
-
case undefined: return $15 =>
|
|
8148
|
+
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 => Config_with__withx20blockx20inx20setConfig_5494($1.a1, $3, $2, $1.a1($3)($2), $0, $15);
|
|
7894
8150
|
}
|
|
7895
8151
|
}
|
|
7896
8152
|
|
|
7897
|
-
function
|
|
8153
|
+
function Config_with__propSettersx2cparseBool_5272($0, $1) {
|
|
7898
8154
|
switch($1) {
|
|
7899
8155
|
case 'yes': return {a1: 1};
|
|
7900
8156
|
case 'true': return {a1: 1};
|
|
@@ -7904,14 +8160,14 @@ function Config_with__propSettersx2cparseBool_4221($0, $1) {
|
|
|
7904
8160
|
}
|
|
7905
8161
|
}
|
|
7906
8162
|
|
|
7907
|
-
function
|
|
8163
|
+
function Config_with__dropPrefixx27x2cdropx27_5088($0, $1, $2) {
|
|
7908
8164
|
switch($2.h) {
|
|
7909
8165
|
case 0: return {a1: $2.a1.a1};
|
|
7910
8166
|
case 1: return {h: 0};
|
|
7911
8167
|
}
|
|
7912
8168
|
}
|
|
7913
8169
|
|
|
7914
|
-
function
|
|
8170
|
+
function Config_case__parseGitHubURIx2cparseSuffix_5148($0, $1, $2) {
|
|
7915
8171
|
const $e = $f => {
|
|
7916
8172
|
switch($f.h) {
|
|
7917
8173
|
case undefined: {
|
|
@@ -7931,7 +8187,7 @@ function Config_case__parseGitHubURIx2cparseSuffix_4097($0, $1, $2) {
|
|
|
7931
8187
|
return Prelude_Types_x3ex3ex3d_Monad_Maybe({a1: Data_String_split($9 => Prelude_EqOrd_x3dx3d_Eq_Char($9, '/'), $2.a1)}, $e);
|
|
7932
8188
|
}
|
|
7933
8189
|
|
|
7934
|
-
function
|
|
8190
|
+
function Config_n__5884_5646_yesUnlessNo($0, $1, $2, $3, $4) {
|
|
7935
8191
|
switch($4) {
|
|
7936
8192
|
case 'n': return 0;
|
|
7937
8193
|
case 'N': return 0;
|
|
@@ -7939,35 +8195,35 @@ function Config_n__5368_4595_yesUnlessNo($0, $1, $2, $3, $4) {
|
|
|
7939
8195
|
}
|
|
7940
8196
|
}
|
|
7941
8197
|
|
|
7942
|
-
function
|
|
8198
|
+
function Config_n__5528_5264_update($0, $1, $2, $3, $4) {
|
|
7943
8199
|
return $0(undefined)(undefined)($c => Prelude_Basics_flip($2, $3, $c))($1($4));
|
|
7944
8200
|
}
|
|
7945
8201
|
|
|
7946
|
-
function
|
|
7947
|
-
return Prelude_Types_map_Functor_Maybe(
|
|
8202
|
+
function Config_n__5884_5648_repo($0, $1, $2, $3, $4) {
|
|
8203
|
+
return Prelude_Types_map_Functor_Maybe(csegen_528(), $4);
|
|
7948
8204
|
}
|
|
7949
8205
|
|
|
7950
|
-
function
|
|
7951
|
-
return
|
|
8206
|
+
function Config_n__5396_5127_parseSuffix($0, $1) {
|
|
8207
|
+
return Config_case__parseGitHubURIx2cparseSuffix_5148($0, $1, Data_String_break$($8 => Prelude_EqOrd_x3dx3d_Eq_Char($8, '.'), $1));
|
|
7952
8208
|
}
|
|
7953
8209
|
|
|
7954
|
-
function
|
|
7955
|
-
return Prelude_Interfaces_x3ex3dx3e(
|
|
8210
|
+
function Config_n__5396_5129_parseSSH($0, $1) {
|
|
8211
|
+
return Prelude_Interfaces_x3ex3dx3e(csegen_42(), $6 => Config_dropPrefixx27('git@github.com:', $6), $b => Config_n__5396_5127_parseSuffix($0, $b), $1);
|
|
7956
8212
|
}
|
|
7957
8213
|
|
|
7958
|
-
function
|
|
7959
|
-
return Prelude_Interfaces_x3ex3dx3e(
|
|
8214
|
+
function Config_n__5396_5128_parseHTTPS($0, $1) {
|
|
8215
|
+
return Prelude_Interfaces_x3ex3dx3e(csegen_42(), $6 => Config_dropPrefixx27('https://github/com/', $6), $b => Config_n__5396_5127_parseSuffix($0, $b), $1);
|
|
7960
8216
|
}
|
|
7961
8217
|
|
|
7962
|
-
function
|
|
7963
|
-
return
|
|
8218
|
+
function Config_n__5528_5263_parseBool($0) {
|
|
8219
|
+
return Config_with__propSettersx2cparseBool_5272($0, Data_String_toLower($0));
|
|
7964
8220
|
}
|
|
7965
8221
|
|
|
7966
|
-
function
|
|
7967
|
-
return Prelude_Types_map_Functor_Maybe(
|
|
8222
|
+
function Config_n__5884_5647_org($0, $1, $2, $3, $4) {
|
|
8223
|
+
return Prelude_Types_map_Functor_Maybe(csegen_532(), $4);
|
|
7968
8224
|
}
|
|
7969
8225
|
|
|
7970
|
-
function
|
|
8226
|
+
function Config_n__5884_5645_orIfEmpty($0, $1, $2, $3, $4, $5) {
|
|
7971
8227
|
switch($4.h) {
|
|
7972
8228
|
case 0: return $5;
|
|
7973
8229
|
case undefined: {
|
|
@@ -7979,20 +8235,20 @@ function Config_n__5368_4594_orIfEmpty($0, $1, $2, $3, $4, $5) {
|
|
|
7979
8235
|
}
|
|
7980
8236
|
}
|
|
7981
8237
|
|
|
7982
|
-
function
|
|
8238
|
+
function Config_n__5222_4962_oneDayAgo($0, $1, $2) {
|
|
7983
8239
|
return $2.a1.a2(undefined)(undefined)(System_time($2))(now => $2.a1.a1.a2(undefined)(Prelude_Cast_cast_Cast_Integer_Bits32((now-86400n))));
|
|
7984
8240
|
}
|
|
7985
8241
|
|
|
7986
|
-
function
|
|
7987
|
-
return Prelude_Interfaces_concat(
|
|
8242
|
+
function Config_n__5884_5649_enterForDefaultStr($0, $1, $2, $3, $4) {
|
|
8243
|
+
return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' (ENTER for default: ', a2: {a1: $4, a2: {a1: ')', a2: {h: 0}}}});
|
|
7988
8244
|
}
|
|
7989
8245
|
|
|
7990
|
-
function
|
|
7991
|
-
return
|
|
8246
|
+
function Config_n__5349_5080_dropx27($0, $1) {
|
|
8247
|
+
return Config_with__dropPrefixx27x2cdropx27_5088($0, $1, Data_List_PrefixSuffix_dropPrefix($8 => $9 => Decidable_Equality_decEq_DecEq_Char($8, $9), Prelude_Types_fastUnpack($0), $1));
|
|
7992
8248
|
}
|
|
7993
8249
|
|
|
7994
|
-
function
|
|
7995
|
-
return Data_Maybe_fromMaybe(() => '', Prelude_Types_map_Functor_Maybe($b =>
|
|
8250
|
+
function Config_n__5884_5650_defaultStr($0, $1, $2, $3, $4, $5) {
|
|
8251
|
+
return Data_Maybe_fromMaybe(() => '', Prelude_Types_map_Functor_Maybe($b => Config_n__5884_5649_enterForDefaultStr($0, $1, $2, $3, $4($b)), $5));
|
|
7996
8252
|
}
|
|
7997
8253
|
|
|
7998
8254
|
function Config_show_Show_ConfigError($0) {
|
|
@@ -8006,10 +8262,10 @@ function Config_writeConfig($0, $1, $2) {
|
|
|
8006
8262
|
const $12 = res => $13 => $14 => {
|
|
8007
8263
|
switch(res.h) {
|
|
8008
8264
|
case 1: return Data_Promise_pure_Applicative_Promise($0, $13, $14);
|
|
8009
|
-
case 0: return Data_Promise_reject(Prelude_Interfaces_concat(
|
|
8265
|
+
case 0: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Failed to write updated config file to ', a2: {a1: Data_Config_rf__filepath($0), a2: {a1: ': ', a2: {a1: System_File_Error_show_Show_FileError(res.a1), a2: {a1: '.', a2: {h: 0}}}}}}), $13, $14);
|
|
8010
8266
|
}
|
|
8011
8267
|
};
|
|
8012
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(System_File_ReadWrite_writeFile(
|
|
8268
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(System_File_ReadWrite_writeFile(csegen_21(), Data_Config_rf__filepath($0), Language_JSON_Data_format(0n, 2n, Data_Config_json($0))), $12, $1, $2);
|
|
8013
8269
|
}
|
|
8014
8270
|
|
|
8015
8271
|
function Config_syncIfOld($0, $1, $2, $3) {
|
|
@@ -8019,7 +8275,7 @@ function Config_syncIfOld($0, $1, $2, $3) {
|
|
|
8019
8275
|
case 0: return $1a => Data_Promise_pure_Applicative_Promise($1, $d, $1a);
|
|
8020
8276
|
}
|
|
8021
8277
|
};
|
|
8022
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(
|
|
8278
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(Config_n__5222_4962_oneDayAgo($0, $1, csegen_21()), $b, $2, $3);
|
|
8023
8279
|
}
|
|
8024
8280
|
|
|
8025
8281
|
function Config_syncConfig($0, $1, $2, $3, $4) {
|
|
@@ -8027,9 +8283,9 @@ function Config_syncConfig($0, $1, $2, $3, $4) {
|
|
|
8027
8283
|
const $14 = orgMembers => $15 => $16 => {
|
|
8028
8284
|
const $1a = updatedAt => {
|
|
8029
8285
|
const $1b = {a1: updatedAt, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: $0.a6, a7: teamSlugs, a8: orgMembers, a9: $0.a9};
|
|
8030
|
-
return Prelude_Interfaces_x3ex3e(
|
|
8286
|
+
return Prelude_Interfaces_x3ex3e(csegen_15(), $2a => $2b => Data_Promise_map_Functor_Promise($2e => (undefined), $30 => $31 => Config_writeConfig($1b, $30, $31), $2a, $2b), () => 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_539(), $0))), () => $50 => $51 => Data_Promise_pure_Applicative_Promise($1b, $50, $51)));
|
|
8031
8287
|
};
|
|
8032
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(
|
|
8288
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_535(), $1a, $15, $16);
|
|
8033
8289
|
};
|
|
8034
8290
|
return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listOrgMembers($1, $0.a2), $14, $c, $d);
|
|
8035
8291
|
};
|
|
@@ -8037,11 +8293,11 @@ function Config_syncConfig($0, $1, $2, $3, $4) {
|
|
|
8037
8293
|
}
|
|
8038
8294
|
|
|
8039
8295
|
function Config_setConfig($0, $1, $2) {
|
|
8040
|
-
return
|
|
8296
|
+
return Config_with__setConfig_5466($1, Data_List_lookup(csegen_94(), $1, Config_propSetters()), $2, $0);
|
|
8041
8297
|
}
|
|
8042
8298
|
|
|
8043
8299
|
const Config_propSetters = __lazy(function () {
|
|
8044
|
-
return {a1: {a1: 'assignTeams', a2: $3 => $4 =>
|
|
8300
|
+
return {a1: {a1: 'assignTeams', a2: $3 => $4 => Config_n__5528_5264_update(csegen_18(), $9 => Config_n__5528_5263_parseBool($9), b => $d => ({a1: $d.a1, a2: $d.a2, a3: $d.a3, a4: $d.a4, a5: b, a6: $d.a6, a7: $d.a7, a8: $d.a8, a9: $d.a9}), $3, $4)}, a2: {a1: {a1: 'commentOnAssign', a2: $1e => $1f => Config_n__5528_5264_update(csegen_18(), $24 => Config_n__5528_5263_parseBool($24), b => $28 => ({a1: $28.a1, a2: $28.a2, a3: $28.a3, a4: $28.a4, a5: $28.a5, a6: b, a7: $28.a7, a8: $28.a8, a9: $28.a9}), $1e, $1f)}, a2: {h: 0}}};
|
|
8045
8301
|
});
|
|
8046
8302
|
|
|
8047
8303
|
const Config_propGetters = __lazy(function () {
|
|
@@ -8049,7 +8305,7 @@ const Config_propGetters = __lazy(function () {
|
|
|
8049
8305
|
});
|
|
8050
8306
|
|
|
8051
8307
|
function Config_parseGitHubURI($0) {
|
|
8052
|
-
return Prelude_Types_x3cx7cx3e_Alternative_Maybe(
|
|
8308
|
+
return Prelude_Types_x3cx7cx3e_Alternative_Maybe(Config_n__5396_5128_parseHTTPS($0, $0), () => Config_n__5396_5129_parseSSH($0, $0));
|
|
8053
8309
|
}
|
|
8054
8310
|
|
|
8055
8311
|
function Config_loadOrCreateConfig($0, $1, $2, $3, $4, $5) {
|
|
@@ -8061,15 +8317,15 @@ function Config_loadOrCreateConfig($0, $1, $2, $3, $4, $5) {
|
|
|
8061
8317
|
case 0: {
|
|
8062
8318
|
switch($e.a1.a1.h) {
|
|
8063
8319
|
case 3: return Config_createConfig($0, $1, $2, $3);
|
|
8064
|
-
default: return $1d => $1e => Data_Promise_reject(Prelude_Interfaces_concat(
|
|
8320
|
+
default: return $1d => $1e => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Error loading ', a2: {a1: Data_Config_filename(), a2: {a1: ': ', a2: {a1: Config_show_Show_ConfigError($e.a1), a2: {a1: '.', a2: {h: 0}}}}}}), $1d, $1e);
|
|
8065
8321
|
}
|
|
8066
8322
|
}
|
|
8067
|
-
default: return $36 => $37 => Data_Promise_reject(Prelude_Interfaces_concat(
|
|
8323
|
+
default: return $36 => $37 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Error loading ', a2: {a1: Data_Config_filename(), a2: {a1: ': ', a2: {a1: Config_show_Show_ConfigError($e.a1), a2: {a1: '.', a2: {h: 0}}}}}}), $36, $37);
|
|
8068
8324
|
}
|
|
8069
8325
|
}
|
|
8070
8326
|
}
|
|
8071
8327
|
};
|
|
8072
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(Config_loadConfig(
|
|
8328
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(Config_loadConfig(csegen_21(), $2, $3), $d, $4, $5);
|
|
8073
8329
|
}
|
|
8074
8330
|
|
|
8075
8331
|
function Config_loadConfig($0, $1, $2) {
|
|
@@ -8092,14 +8348,14 @@ function Config_loadConfig($0, $1, $2) {
|
|
|
8092
8348
|
}
|
|
8093
8349
|
};
|
|
8094
8350
|
const $a = {a1: $b, a2: a => $13 => ({h: 1, a1: $13}), a3: $15};
|
|
8095
|
-
const $9 = {a1: $a, a2:
|
|
8351
|
+
const $9 = {a1: $a, a2: csegen_244(), a3: csegen_245()};
|
|
8096
8352
|
const $24 = b => a => func => $25 => {
|
|
8097
8353
|
switch($25.h) {
|
|
8098
8354
|
case 0: return {h: 0, a1: $25.a1};
|
|
8099
8355
|
case 1: return {h: 1, a1: func($25.a1)};
|
|
8100
8356
|
}
|
|
8101
8357
|
};
|
|
8102
|
-
const $23 = {a1: $24, a2:
|
|
8358
|
+
const $23 = {a1: $24, a2: csegen_454(), a3: csegen_458()};
|
|
8103
8359
|
return Prelude_Interfaces_Monad_x3ex3ex3d_Monad_Composex28x28x2ex20x24mx29x20x24tx29($0.a1, $9, $23, $4, $5);
|
|
8104
8360
|
};
|
|
8105
8361
|
const $39 = $3a => {
|
|
@@ -8141,18 +8397,18 @@ function Config_loadConfig($0, $1, $2) {
|
|
|
8141
8397
|
}
|
|
8142
8398
|
|
|
8143
8399
|
function Config_getConfig($0, $1, $2) {
|
|
8144
|
-
return $3 =>
|
|
8400
|
+
return $3 => Config_with__getConfig_5595($1, Data_List_lookup(csegen_94(), $1, Config_propGetters()), $0, $2, $3);
|
|
8145
8401
|
}
|
|
8146
8402
|
|
|
8147
8403
|
function Config_findConfig($0, $1, $2) {
|
|
8148
8404
|
switch($2.h) {
|
|
8149
8405
|
case 0: return $0.a1.a1.a2(undefined)({h: 0});
|
|
8150
8406
|
case undefined: {
|
|
8151
|
-
const $b = Prelude_Interfaces_concat(
|
|
8407
|
+
const $b = Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: $1, a2: {a1: '/', a2: {a1: Data_Config_filename(), a2: {h: 0}}}});
|
|
8152
8408
|
const $25 = $26 => {
|
|
8153
8409
|
switch($26) {
|
|
8154
8410
|
case 1: return $0.a1.a1.a2(undefined)({a1: $b});
|
|
8155
|
-
case 0: return Config_findConfig($0, Prelude_Interfaces_concat(
|
|
8411
|
+
case 0: return Config_findConfig($0, Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: $1, a2: {a1: '/..', a2: {h: 0}}}), $2.a1());
|
|
8156
8412
|
}
|
|
8157
8413
|
};
|
|
8158
8414
|
return $0.a1.a2(undefined)(undefined)(System_File_Meta_exists($0, $b))($25);
|
|
@@ -8161,54 +8417,54 @@ function Config_findConfig($0, $1, $2) {
|
|
|
8161
8417
|
}
|
|
8162
8418
|
|
|
8163
8419
|
function Config_dropPrefixx27($0, $1) {
|
|
8164
|
-
return Prelude_Types_map_Functor_Maybe($4 => Prelude_Types_fastPack($4),
|
|
8420
|
+
return Prelude_Types_map_Functor_Maybe($4 => Prelude_Types_fastPack($4), Config_n__5349_5080_dropx27($0, Prelude_Types_fastUnpack($1)));
|
|
8165
8421
|
}
|
|
8166
8422
|
|
|
8167
8423
|
function Config_createConfig($0, $1, $2, $3) {
|
|
8168
|
-
return Prelude_Interfaces_x3ex3e(
|
|
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}}}})), () => $1a => $1b => {
|
|
8169
8425
|
const $3a = defaultOrgAndRepo => {
|
|
8170
|
-
const $3b =
|
|
8171
|
-
return Prelude_Interfaces_x3ex3e(
|
|
8426
|
+
const $3b = Config_n__5884_5650_defaultStr($0, $1, $3, $2, csegen_532(), defaultOrgAndRepo);
|
|
8427
|
+
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: $3b, a2: {a1: '?', a2: {h: 0}}}})), () => $59 => $5a => {
|
|
8172
8428
|
const $73 = org => {
|
|
8173
|
-
const $74 =
|
|
8174
|
-
return Prelude_Interfaces_x3ex3e(
|
|
8429
|
+
const $74 = Config_n__5884_5650_defaultStr($0, $1, $3, $2, csegen_528(), defaultOrgAndRepo);
|
|
8430
|
+
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: $74, a2: {a1: '?', a2: {h: 0}}}})), () => $92 => $93 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $9a => Config_n__5884_5645_orIfEmpty($0, $1, $3, $2, Config_n__5884_5648_repo($0, $1, $3, $2, defaultOrgAndRepo), Data_String_trim($9a)), csegen_404()), repo => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStr(csegen_21(), 'Would you like harmony to comment when it assigns reviewers? [Y/n] '), () => $b6 => $b7 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $be => Config_n__5884_5646_yesUnlessNo($0, $1, $3, $2, Data_String_trim($be)), csegen_404()), 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] '), () => $d3 => $d4 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $db => Config_n__5884_5646_yesUnlessNo($0, $1, $3, $2, Data_String_trim($db)), csegen_404()), assignTeams => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), 'Creating config...'), () => $f0 => $f1 => {
|
|
8175
8431
|
const $fc = mainBranch => $fd => $fe => {
|
|
8176
8432
|
const $102 = updatedAt => {
|
|
8177
|
-
const $103 = {a1: Prelude_Interfaces_concat(
|
|
8433
|
+
const $103 = {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: './', a2: {a1: Data_Config_filename(), a2: {h: 0}}}), a2: $2, a3: $3};
|
|
8178
8434
|
return $112 => $113 => {
|
|
8179
8435
|
const $119 = teamSlugs => $11a => $11b => {
|
|
8180
8436
|
const $121 = orgMembers => {
|
|
8181
8437
|
const $122 = {a1: updatedAt, a2: org, a3: repo, a4: mainBranch, a5: assignTeams, a6: commentOnAssign, a7: teamSlugs, a8: orgMembers, a9: $103};
|
|
8182
|
-
return Prelude_Interfaces_x3ex3e(
|
|
8438
|
+
return Prelude_Interfaces_x3ex3e(csegen_15(), $130 => $131 => Data_Promise_map_Functor_Promise($134 => (undefined), $136 => $137 => Config_writeConfig($122, $136, $137), $130, $131), () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), 'Your new configuration is:'), () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_printLn(csegen_539(), $122), () => $151 => $152 => Data_Promise_pure_Applicative_Promise($122, $151, $152))));
|
|
8183
8439
|
};
|
|
8184
8440
|
return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listOrgMembers($1, org), $121, $11a, $11b);
|
|
8185
8441
|
};
|
|
8186
8442
|
return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listTeams($1, org), $119, $112, $113);
|
|
8187
8443
|
};
|
|
8188
8444
|
};
|
|
8189
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(
|
|
8445
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_535(), $102, $fd, $fe);
|
|
8190
8446
|
};
|
|
8191
8447
|
return Data_Promise_x3ex3ex3d_Monad_Promise($f4 => $f5 => FFI_GitHub_getRepoDefaultBranch($1, org, repo, $f4, $f5), $fc, $f0, $f1);
|
|
8192
8448
|
}), $d3, $d4)), $b6, $b7)), $92, $93));
|
|
8193
8449
|
};
|
|
8194
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(
|
|
8450
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $61 => Config_n__5884_5645_orIfEmpty($0, $1, $3, $2, Config_n__5884_5647_org($0, $1, $3, $2, defaultOrgAndRepo), Data_String_trim($61)), csegen_404()), $73, $59, $5a);
|
|
8195
8451
|
});
|
|
8196
8452
|
};
|
|
8197
|
-
return Data_Promise_x3ex3ex3d_Monad_Promise($1e => $1f => Data_Promise_x3cx7cx3e_Alternative_Promise(Prelude_Interfaces_x3cx24x3e(
|
|
8453
|
+
return Data_Promise_x3ex3ex3d_Monad_Promise($1e => $1f => Data_Promise_x3cx7cx3e_Alternative_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $26 => Config_parseGitHubURI($26), $2a => $2b => FFI_Git_remoteURI($0, 'origin', $2a, $2b)), () => $32 => $33 => Data_Promise_pure_Applicative_Promise({h: 0}, $32, $33), $1e, $1f), $3a, $1a, $1b);
|
|
8198
8454
|
});
|
|
8199
8455
|
}
|
|
8200
8456
|
|
|
8201
|
-
function
|
|
8457
|
+
function Data_List_PrefixSuffix_with__withx20blockx20inx20dropPrefix_3662($0, $1, $2, $3, $4, $5) {
|
|
8202
8458
|
switch($4.h) {
|
|
8203
8459
|
case 1: return {h: 1, a1: $8 => $4.a1({a1: $8.a1, a2: Builtin_snd(Data_List_PrefixSuffix_prefixSuffixConsInjective($8.a2))})};
|
|
8204
8460
|
case 0: return {h: 0, a1: {a1: $4.a1.a1, a2: {a1: {a1: $5, a2: $3}, a2: $4.a1.a1}}};
|
|
8205
8461
|
}
|
|
8206
8462
|
}
|
|
8207
8463
|
|
|
8208
|
-
function
|
|
8464
|
+
function Data_List_PrefixSuffix_with__dropPrefix_3625($0, $1, $2, $3, $4, $5, $6) {
|
|
8209
8465
|
switch($4.h) {
|
|
8210
8466
|
case 1: return {h: 1, a1: $9 => Data_List_PrefixSuffix_prefixDifferentVoid($4.a1, $9)};
|
|
8211
|
-
case 0: return
|
|
8467
|
+
case 0: return Data_List_PrefixSuffix_with__withx20blockx20inx20dropPrefix_3662(undefined, $1, $6, $5, Data_List_PrefixSuffix_dropPrefix($1, $5, $6), $2);
|
|
8212
8468
|
}
|
|
8213
8469
|
}
|
|
8214
8470
|
|
|
@@ -8230,21 +8486,21 @@ function Data_List_PrefixSuffix_dropPrefix($0, $1, $2) {
|
|
|
8230
8486
|
case undefined: {
|
|
8231
8487
|
switch($2.h) {
|
|
8232
8488
|
case 0: return {h: 1, a1: $b => Prelude_Uninhabited_absurd($f => Data_List_PrefixSuffix_uninhabited_Uninhabited_x28x28x28PrefixSuffixx20x28x28x3ax3ax20x24xx29x20x24xsx29x29x20x24suffixListx29x20Nilx29($f), $b.a2)};
|
|
8233
|
-
case undefined: return
|
|
8489
|
+
case undefined: return Data_List_PrefixSuffix_with__dropPrefix_3625(undefined, $0, $1.a1, $2.a1, $0($1.a1)($2.a1), $1.a2, $2.a2);
|
|
8234
8490
|
}
|
|
8235
8491
|
}
|
|
8236
8492
|
}
|
|
8237
8493
|
}
|
|
8238
8494
|
|
|
8239
|
-
function
|
|
8495
|
+
function BashCompletion_n__3745_1119_slugsOrLogins($0, $1, $2) {
|
|
8240
8496
|
switch(Data_String_isPrefixOf('+', $1)) {
|
|
8241
|
-
case 1: return Prelude_Interfaces_x3cx24x3e(
|
|
8497
|
+
case 1: return Prelude_Interfaces_x3cx24x3e(csegen_119(), $b => ('+'+$b), $2.a8);
|
|
8242
8498
|
case 0: return $2.a7;
|
|
8243
8499
|
}
|
|
8244
8500
|
}
|
|
8245
8501
|
|
|
8246
8502
|
const BashCompletion_script = __lazy(function () {
|
|
8247
|
-
return Prelude_Interfaces_concat(
|
|
8503
|
+
return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: '_harmony()\n{\n ED=$([ -z $2 ] && echo \"--\" || echo \"$2\")\n COMPREPLY=($(harmony --bash-completion \"$ED\" \"$3\"))\n}\n\ncomplete -F _harmony harmony', a2: {h: 0}});
|
|
8248
8504
|
});
|
|
8249
8505
|
|
|
8250
8506
|
function BashCompletion_opts($0, $1, $2) {
|
|
@@ -8254,7 +8510,7 @@ function BashCompletion_opts($0, $1, $2) {
|
|
|
8254
8510
|
case 'config': return Data_Config_settableProps();
|
|
8255
8511
|
default: {
|
|
8256
8512
|
switch($2) {
|
|
8257
|
-
case 'config': return
|
|
8513
|
+
case 'config': return Prelude_Types_List_filter($9 => Data_String_isPrefixOf($1, $9), Data_Config_settableProps());
|
|
8258
8514
|
default: {
|
|
8259
8515
|
switch($1) {
|
|
8260
8516
|
case '--': {
|
|
@@ -8262,11 +8518,11 @@ function BashCompletion_opts($0, $1, $2) {
|
|
|
8262
8518
|
case 'list': return $0.a7;
|
|
8263
8519
|
default: {
|
|
8264
8520
|
switch($2) {
|
|
8265
|
-
case 'list': return
|
|
8521
|
+
case 'list': return Prelude_Types_List_filter($15 => Data_String_isPrefixOf($1, $15), $0.a7);
|
|
8266
8522
|
default: {
|
|
8267
8523
|
switch($1) {
|
|
8268
8524
|
case '--': return $0.a7;
|
|
8269
|
-
default: return
|
|
8525
|
+
default: return Prelude_Types_List_filter($1f => Data_String_isPrefixOf($1, $1f), BashCompletion_n__3745_1119_slugsOrLogins($2, $1, $0));
|
|
8270
8526
|
}
|
|
8271
8527
|
}
|
|
8272
8528
|
}
|
|
@@ -8275,11 +8531,11 @@ function BashCompletion_opts($0, $1, $2) {
|
|
|
8275
8531
|
}
|
|
8276
8532
|
default: {
|
|
8277
8533
|
switch($2) {
|
|
8278
|
-
case 'list': return
|
|
8534
|
+
case 'list': return Prelude_Types_List_filter($2b => Data_String_isPrefixOf($1, $2b), $0.a7);
|
|
8279
8535
|
default: {
|
|
8280
8536
|
switch($1) {
|
|
8281
8537
|
case '--': return $0.a7;
|
|
8282
|
-
default: return
|
|
8538
|
+
default: return Prelude_Types_List_filter($35 => Data_String_isPrefixOf($1, $35), BashCompletion_n__3745_1119_slugsOrLogins($2, $1, $0));
|
|
8283
8539
|
}
|
|
8284
8540
|
}
|
|
8285
8541
|
}
|
|
@@ -8292,7 +8548,7 @@ function BashCompletion_opts($0, $1, $2) {
|
|
|
8292
8548
|
}
|
|
8293
8549
|
default: {
|
|
8294
8550
|
switch($2) {
|
|
8295
|
-
case 'config': return
|
|
8551
|
+
case 'config': return Prelude_Types_List_filter($41 => Data_String_isPrefixOf($1, $41), Data_Config_settableProps());
|
|
8296
8552
|
default: {
|
|
8297
8553
|
switch($1) {
|
|
8298
8554
|
case '--': {
|
|
@@ -8300,11 +8556,11 @@ function BashCompletion_opts($0, $1, $2) {
|
|
|
8300
8556
|
case 'list': return $0.a7;
|
|
8301
8557
|
default: {
|
|
8302
8558
|
switch($2) {
|
|
8303
|
-
case 'list': return
|
|
8559
|
+
case 'list': return Prelude_Types_List_filter($4d => Data_String_isPrefixOf($1, $4d), $0.a7);
|
|
8304
8560
|
default: {
|
|
8305
8561
|
switch($1) {
|
|
8306
8562
|
case '--': return $0.a7;
|
|
8307
|
-
default: return
|
|
8563
|
+
default: return Prelude_Types_List_filter($57 => Data_String_isPrefixOf($1, $57), BashCompletion_n__3745_1119_slugsOrLogins($2, $1, $0));
|
|
8308
8564
|
}
|
|
8309
8565
|
}
|
|
8310
8566
|
}
|
|
@@ -8313,11 +8569,11 @@ function BashCompletion_opts($0, $1, $2) {
|
|
|
8313
8569
|
}
|
|
8314
8570
|
default: {
|
|
8315
8571
|
switch($2) {
|
|
8316
|
-
case 'list': return
|
|
8572
|
+
case 'list': return Prelude_Types_List_filter($63 => Data_String_isPrefixOf($1, $63), $0.a7);
|
|
8317
8573
|
default: {
|
|
8318
8574
|
switch($1) {
|
|
8319
8575
|
case '--': return $0.a7;
|
|
8320
|
-
default: return
|
|
8576
|
+
default: return Prelude_Types_List_filter($6d => Data_String_isPrefixOf($1, $6d), BashCompletion_n__3745_1119_slugsOrLogins($2, $1, $0));
|
|
8321
8577
|
}
|
|
8322
8578
|
}
|
|
8323
8579
|
}
|
|
@@ -8336,45 +8592,135 @@ function BashCompletion_cmdOpts($0, $1) {
|
|
|
8336
8592
|
case 'harmony': return {a1: BashCompletion_allRootCmds()};
|
|
8337
8593
|
default: {
|
|
8338
8594
|
switch($1) {
|
|
8339
|
-
case 'harmony': return {a1:
|
|
8595
|
+
case 'harmony': return {a1: Prelude_Types_List_filter($a => Data_String_isPrefixOf($0, $a), BashCompletion_allRootCmds())};
|
|
8340
8596
|
case 'pr': return {a1: {h: 0}};
|
|
8341
|
-
case 'contribute': return {a1: {h: 0}};
|
|
8342
8597
|
case 'sync': return {a1: {h: 0}};
|
|
8343
8598
|
case 'help': return {a1: {h: 0}};
|
|
8344
8599
|
case '--help': return {a1: {h: 0}};
|
|
8345
8600
|
case 'reflect': return {a1: {h: 0}};
|
|
8346
8601
|
case 'version': return {a1: {h: 0}};
|
|
8347
|
-
default:
|
|
8602
|
+
default: {
|
|
8603
|
+
switch($0) {
|
|
8604
|
+
case '-': {
|
|
8605
|
+
switch($1) {
|
|
8606
|
+
case 'contribute': return csegen_564();
|
|
8607
|
+
default: {
|
|
8608
|
+
switch($1) {
|
|
8609
|
+
case 'contribute': {
|
|
8610
|
+
switch(Data_String_isPrefixOf($0, '--checkout')) {
|
|
8611
|
+
case 1: return {a1: {a1: '--checkout', a2: {h: 0}}};
|
|
8612
|
+
case 0: return {a1: {h: 0}};
|
|
8613
|
+
}
|
|
8614
|
+
}
|
|
8615
|
+
default: return {h: 0};
|
|
8616
|
+
}
|
|
8617
|
+
}
|
|
8618
|
+
}
|
|
8619
|
+
}
|
|
8620
|
+
case '--': {
|
|
8621
|
+
switch($1) {
|
|
8622
|
+
case 'contribute': return csegen_564();
|
|
8623
|
+
default: {
|
|
8624
|
+
switch($1) {
|
|
8625
|
+
case 'contribute': {
|
|
8626
|
+
switch(Data_String_isPrefixOf($0, '--checkout')) {
|
|
8627
|
+
case 1: return {a1: {a1: '--checkout', a2: {h: 0}}};
|
|
8628
|
+
case 0: return {a1: {h: 0}};
|
|
8629
|
+
}
|
|
8630
|
+
}
|
|
8631
|
+
default: return {h: 0};
|
|
8632
|
+
}
|
|
8633
|
+
}
|
|
8634
|
+
}
|
|
8635
|
+
}
|
|
8636
|
+
default: {
|
|
8637
|
+
switch($1) {
|
|
8638
|
+
case 'contribute': {
|
|
8639
|
+
switch(Data_String_isPrefixOf($0, '--checkout')) {
|
|
8640
|
+
case 1: return {a1: {a1: '--checkout', a2: {h: 0}}};
|
|
8641
|
+
case 0: return {a1: {h: 0}};
|
|
8642
|
+
}
|
|
8643
|
+
}
|
|
8644
|
+
default: return {h: 0};
|
|
8645
|
+
}
|
|
8646
|
+
}
|
|
8647
|
+
}
|
|
8648
|
+
}
|
|
8348
8649
|
}
|
|
8349
8650
|
}
|
|
8350
8651
|
}
|
|
8351
8652
|
}
|
|
8352
8653
|
default: {
|
|
8353
8654
|
switch($1) {
|
|
8354
|
-
case 'harmony': return {a1:
|
|
8655
|
+
case 'harmony': return {a1: Prelude_Types_List_filter($3a => Data_String_isPrefixOf($0, $3a), BashCompletion_allRootCmds())};
|
|
8355
8656
|
case 'pr': return {a1: {h: 0}};
|
|
8356
|
-
case 'contribute': return {a1: {h: 0}};
|
|
8357
8657
|
case 'sync': return {a1: {h: 0}};
|
|
8358
8658
|
case 'help': return {a1: {h: 0}};
|
|
8359
8659
|
case '--help': return {a1: {h: 0}};
|
|
8360
8660
|
case 'reflect': return {a1: {h: 0}};
|
|
8361
8661
|
case 'version': return {a1: {h: 0}};
|
|
8362
|
-
default:
|
|
8662
|
+
default: {
|
|
8663
|
+
switch($0) {
|
|
8664
|
+
case '-': {
|
|
8665
|
+
switch($1) {
|
|
8666
|
+
case 'contribute': return csegen_564();
|
|
8667
|
+
default: {
|
|
8668
|
+
switch($1) {
|
|
8669
|
+
case 'contribute': {
|
|
8670
|
+
switch(Data_String_isPrefixOf($0, '--checkout')) {
|
|
8671
|
+
case 1: return {a1: {a1: '--checkout', a2: {h: 0}}};
|
|
8672
|
+
case 0: return {a1: {h: 0}};
|
|
8673
|
+
}
|
|
8674
|
+
}
|
|
8675
|
+
default: return {h: 0};
|
|
8676
|
+
}
|
|
8677
|
+
}
|
|
8678
|
+
}
|
|
8679
|
+
}
|
|
8680
|
+
case '--': {
|
|
8681
|
+
switch($1) {
|
|
8682
|
+
case 'contribute': return csegen_564();
|
|
8683
|
+
default: {
|
|
8684
|
+
switch($1) {
|
|
8685
|
+
case 'contribute': {
|
|
8686
|
+
switch(Data_String_isPrefixOf($0, '--checkout')) {
|
|
8687
|
+
case 1: return {a1: {a1: '--checkout', a2: {h: 0}}};
|
|
8688
|
+
case 0: return {a1: {h: 0}};
|
|
8689
|
+
}
|
|
8690
|
+
}
|
|
8691
|
+
default: return {h: 0};
|
|
8692
|
+
}
|
|
8693
|
+
}
|
|
8694
|
+
}
|
|
8695
|
+
}
|
|
8696
|
+
default: {
|
|
8697
|
+
switch($1) {
|
|
8698
|
+
case 'contribute': {
|
|
8699
|
+
switch(Data_String_isPrefixOf($0, '--checkout')) {
|
|
8700
|
+
case 1: return {a1: {a1: '--checkout', a2: {h: 0}}};
|
|
8701
|
+
case 0: return {a1: {h: 0}};
|
|
8702
|
+
}
|
|
8703
|
+
}
|
|
8704
|
+
default: return {h: 0};
|
|
8705
|
+
}
|
|
8706
|
+
}
|
|
8707
|
+
}
|
|
8708
|
+
}
|
|
8363
8709
|
}
|
|
8364
8710
|
}
|
|
8365
8711
|
}
|
|
8366
8712
|
}
|
|
8367
8713
|
|
|
8368
8714
|
const BashCompletion_allRootCmds = __lazy(function () {
|
|
8369
|
-
return {a1: 'assign', a2: {a1: 'config', a2: {a1: 'contribute', a2: {a1: 'graph', a2: {a1: 'help', a2: {a1: 'list', a2: {a1: 'pr', a2: {a1: 'reflect', a2: {a1: 'sync', a2: {a1: 'version', a2: {h: 0}}}}}}}}}}};
|
|
8715
|
+
return {a1: 'assign', a2: {a1: 'branch', a2: {a1: 'config', a2: {a1: 'contribute', a2: {a1: 'graph', a2: {a1: 'help', a2: {a1: 'list', a2: {a1: 'pr', a2: {a1: 'reflect', a2: {a1: 'sync', a2: {a1: 'version', a2: {a1: 'whoami', a2: {h: 0}}}}}}}}}}}}};
|
|
8370
8716
|
});
|
|
8371
8717
|
|
|
8372
8718
|
function AppVersion_printVersion($0) {
|
|
8373
|
-
return Prelude_IO_putStrLn($0, Prelude_Interfaces_concat(
|
|
8719
|
+
return Prelude_IO_putStrLn($0, Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Harmony v', a2: {a1: AppVersion_appVersion(), a2: {h: 0}}}));
|
|
8374
8720
|
}
|
|
8375
8721
|
|
|
8376
8722
|
const AppVersion_appVersion = __lazy(function () {
|
|
8377
|
-
return '0.
|
|
8723
|
+
return '0.7.1';
|
|
8378
8724
|
});
|
|
8379
8725
|
|
|
8380
8726
|
|