@mattpolzin/harmony 5.4.0 → 5.4.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.
Files changed (2) hide show
  1. package/harmony +61 -30
  2. package/package.json +1 -1
package/harmony CHANGED
@@ -9500,7 +9500,7 @@ function AppVersion_printVersion($0) {
9500
9500
 
9501
9501
  /* AppVersion.appVersion : String */
9502
9502
  const AppVersion_appVersion = __lazy(function () {
9503
- return '5.4.0';
9503
+ return '5.4.1';
9504
9504
  });
9505
9505
 
9506
9506
  /* Commands.Help.subcommandHelp' : String -> Doc AnsiStyle */
@@ -11293,18 +11293,18 @@ function Commands_PullRequest_combined($0) {
11293
11293
  return Prelude_Types_List_tailRecAppend($0.a1, $0.a2);
11294
11294
  }
11295
11295
 
11296
- /* Util.Github.2647:824:startOver */
11297
- const Util_Github_n__2647_824_startOver = __lazy(function () {
11298
- return {a1: 1, a2: {h: 0}};
11296
+ /* Util.Github.2647:829:startOver */
11297
+ const Util_Github_n__2647_829_startOver = __lazy(function () {
11298
+ return {a1: {h: 1 /* 2647:825:StartOver */}, a2: {h: 0}};
11299
11299
  });
11300
11300
 
11301
- /* Util.Github.2647:823:guardSuccess */
11302
- function Util_Github_n__2647_823_guardSuccess($0) {
11301
+ /* Util.Github.2647:828:guardSuccess */
11302
+ function Util_Github_n__2647_828_guardSuccess($0) {
11303
11303
  switch($0.h) {
11304
11304
  case undefined: /* cons */ {
11305
- switch($0.a1) {
11306
- case 4: return {a1: $0.a2};
11307
- case 5: return {a1: $0.a2};
11305
+ switch($0.a1.h) {
11306
+ case 5: /* 2647:821:PostSlash */ return {a1: $0.a2};
11307
+ case 4: /* 2647:819:Number */ return {a1: $0.a2};
11308
11308
  default: return {h: 0};
11309
11309
  }
11310
11310
  }
@@ -11312,51 +11312,82 @@ function Util_Github_n__2647_823_guardSuccess($0) {
11312
11312
  }
11313
11313
  }
11314
11314
 
11315
- /* Util.Github.2647:822:go */
11316
- function Util_Github_n__2647_822_go($0, $1) {
11317
- switch($0.a1) {
11318
- case 0: {
11315
+ /* Util.Github.2647:827:goPrefix */
11316
+ function Util_Github_n__2647_827_goPrefix($0, $1) {
11317
+ switch($0.h) {
11318
+ case undefined: /* cons */ {
11319
+ switch($0.a1) {
11320
+ case 0: {
11321
+ switch($1) {
11322
+ case 'H': return {a1: {h: 3 /* 2647:823:Prefix */, a1: 1}, a2: $0.a2};
11323
+ default: return Util_Github_n__2647_829_startOver();
11324
+ }
11325
+ }
11326
+ case 1: return {a1: {h: 3 /* 2647:823:Prefix */, a1: 2}, a2: $0.a2};
11327
+ case 2: {
11328
+ switch(Prelude_Types_isDigit($1)) {
11329
+ case 1: return {a1: {h: 4 /* 2647:819:Number */}, a2: {a1: $1, a2: $0.a2}};
11330
+ case 0: return Util_Github_n__2647_829_startOver();
11331
+ }
11332
+ }
11333
+ default: return Util_Github_n__2647_829_startOver();
11334
+ }
11335
+ }
11336
+ default: return Util_Github_n__2647_829_startOver();
11337
+ }
11338
+ }
11339
+
11340
+ /* Util.Github.2647:826:go */
11341
+ function Util_Github_n__2647_826_go($0, $1) {
11342
+ switch($0.a1.h) {
11343
+ case 0: /* 2647:824:Start */ {
11319
11344
  switch($1) {
11320
- case '/': return {a1: 2, a2: $0.a2};
11345
+ case '/': return {a1: {h: 2 /* 2647:822:PreSlash */}, a2: $0.a2};
11346
+ case 'G': return {a1: {h: 3 /* 2647:823:Prefix */, a1: 0}, a2: $0.a2};
11321
11347
  default: {
11322
11348
  switch(Prelude_Types_isDigit($1)) {
11323
- case 1: return {a1: 3, a2: {a1: $1, a2: $0.a2}};
11324
- case 0: return Util_Github_n__2647_824_startOver();
11349
+ case 1: return {a1: {h: 4 /* 2647:819:Number */}, a2: {a1: $1, a2: $0.a2}};
11350
+ case 0: return Util_Github_n__2647_829_startOver();
11325
11351
  }
11326
11352
  }
11327
11353
  }
11328
11354
  }
11329
- case 2: {
11330
- switch(Prelude_Types_isDigit($1)) {
11331
- case 1: return {a1: 3, a2: {a1: $1, a2: $0.a2}};
11332
- case 0: return Util_Github_n__2647_824_startOver();
11355
+ case 3: /* 2647:823:Prefix */ return Util_Github_n__2647_827_goPrefix({a1: $0.a1.a1, a2: $0.a2}, $1);
11356
+ case 2: /* 2647:822:PreSlash */ {
11357
+ switch($1) {
11358
+ case 'G': return {a1: {h: 3 /* 2647:823:Prefix */, a1: 0}, a2: $0.a2};
11359
+ default: {
11360
+ switch(Prelude_Types_isDigit($1)) {
11361
+ case 1: return {a1: {h: 4 /* 2647:819:Number */}, a2: {a1: $1, a2: $0.a2}};
11362
+ case 0: return Util_Github_n__2647_829_startOver();
11363
+ }
11364
+ }
11333
11365
  }
11334
11366
  }
11335
- case 1: {
11367
+ case 1: /* 2647:825:StartOver */ {
11336
11368
  switch($1) {
11337
- case '/': return {a1: 2, a2: $0.a2};
11338
- default: return Util_Github_n__2647_824_startOver();
11369
+ case '/': return {a1: {h: 2 /* 2647:822:PreSlash */}, a2: $0.a2};
11370
+ default: return Util_Github_n__2647_829_startOver();
11339
11371
  }
11340
11372
  }
11341
- case 3: {
11373
+ case 4: /* 2647:819:Number */ {
11342
11374
  switch($1) {
11343
- case '/': return {a1: 4, a2: $0.a2};
11375
+ case '/': return {a1: {h: 5 /* 2647:821:PostSlash */}, a2: $0.a2};
11344
11376
  default: {
11345
11377
  switch(Prelude_Types_isDigit($1)) {
11346
- case 1: return {a1: 3, a2: {a1: $1, a2: $0.a2}};
11347
- case 0: return Util_Github_n__2647_824_startOver();
11378
+ case 1: return {a1: {h: 4 /* 2647:819:Number */}, a2: {a1: $1, a2: $0.a2}};
11379
+ case 0: return Util_Github_n__2647_829_startOver();
11348
11380
  }
11349
11381
  }
11350
11382
  }
11351
11383
  }
11352
- case 5: return {a1: 5, a2: $0.a2};
11353
- case 4: return {a1: 4, a2: $0.a2};
11384
+ case 5: /* 2647:821:PostSlash */ return {a1: {h: 5 /* 2647:821:PostSlash */}, a2: $0.a2};
11354
11385
  }
11355
11386
  }
11356
11387
 
11357
11388
  /* Util.Github.parseGithubIssueNumber : String -> Maybe String */
11358
11389
  function Util_Github_parseGithubIssueNumber($0) {
11359
- return Prelude_Types_map_Functor_Maybe(csegen_738(), Util_Github_n__2647_823_guardSuccess(Prelude_Types_foldl_Foldable_List($9 => $a => Util_Github_n__2647_822_go($9, $a), {a1: 0, a2: {h: 0}}, Prelude_Types_fastUnpack($0))));
11390
+ return Prelude_Types_map_Functor_Maybe(csegen_738(), Util_Github_n__2647_828_guardSuccess(Prelude_Types_foldl_Foldable_List($9 => $a => Util_Github_n__2647_826_go($9, $a), {a1: {h: 0 /* 2647:824:Start */}, a2: {h: 0}}, Prelude_Types_fastUnpack($0))));
11360
11391
  }
11361
11392
 
11362
11393
  /* Util.Jira.2647:823:startOver */
package/package.json CHANGED
@@ -1,6 +1,6 @@
1
1
  {
2
2
  "name": "@mattpolzin/harmony",
3
- "version": "5.4.0",
3
+ "version": "5.4.1",
4
4
  "engines": {
5
5
  "node": ">=18.0.0"
6
6
  },