yukigo-haskell-parser 0.1.0 → 0.1.2

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 (65) hide show
  1. package/.mocharc.json +3 -3
  2. package/CHANGELOG.md +6 -0
  3. package/README.md +10 -10
  4. package/dist/index.d.ts +13 -2
  5. package/dist/index.js +112 -32
  6. package/dist/index.js.map +1 -1
  7. package/dist/parser/grammar.js +220 -231
  8. package/dist/parser/grammar.js.map +1 -1
  9. package/dist/parser/lexer.d.ts +70 -15
  10. package/dist/parser/lexer.js +259 -50
  11. package/dist/parser/lexer.js.map +1 -1
  12. package/dist/prelude.d.ts +1 -1
  13. package/dist/prelude.js +280 -204
  14. package/dist/prelude.js.map +1 -1
  15. package/dist/typechecker/DeclarationCollector.d.ts +6 -1
  16. package/dist/typechecker/DeclarationCollector.js +39 -0
  17. package/dist/typechecker/DeclarationCollector.js.map +1 -1
  18. package/dist/typechecker/TypeBuilder.d.ts +1 -1
  19. package/dist/typechecker/TypeBuilder.js +6 -2
  20. package/dist/typechecker/TypeBuilder.js.map +1 -1
  21. package/dist/typechecker/checker.d.ts +15 -4
  22. package/dist/typechecker/checker.js +108 -25
  23. package/dist/typechecker/checker.js.map +1 -1
  24. package/dist/typechecker/core.d.ts +4 -0
  25. package/dist/typechecker/core.js +45 -19
  26. package/dist/typechecker/core.js.map +1 -1
  27. package/dist/typechecker/inference.d.ts +5 -1
  28. package/dist/typechecker/inference.js +95 -21
  29. package/dist/typechecker/inference.js.map +1 -1
  30. package/dist/utils/helpers.d.ts +1 -1
  31. package/dist/utils/helpers.js +1 -1
  32. package/dist/utils/helpers.js.map +1 -1
  33. package/dist/utils/types.d.ts +1 -1
  34. package/dist/utils/types.js +7 -0
  35. package/dist/utils/types.js.map +1 -1
  36. package/package.json +3 -3
  37. package/src/index.ts +192 -55
  38. package/src/parser/grammar.ne +519 -463
  39. package/src/parser/grammar.ts +230 -239
  40. package/src/parser/lexer.ts +353 -77
  41. package/src/prelude.ts +282 -206
  42. package/src/typechecker/DeclarationCollector.ts +157 -104
  43. package/src/typechecker/TypeBuilder.ts +150 -148
  44. package/src/typechecker/checker.ts +501 -395
  45. package/src/typechecker/core.ts +192 -162
  46. package/src/typechecker/inference.ts +1421 -1327
  47. package/src/utils/helpers.ts +29 -29
  48. package/src/utils/types.ts +63 -56
  49. package/tests/hspec.spec.ts +92 -0
  50. package/tests/lexer.spec.ts +175 -0
  51. package/tests/parser.spec.ts +829 -823
  52. package/tests/prelude.spec.ts +17 -22
  53. package/tests/typechecker.spec.ts +327 -310
  54. package/tsconfig.json +26 -17
  55. package/tsconfig.tsbuildinfo +1 -0
  56. package/dist/parser/layoutPreprocessor.d.ts +0 -1
  57. package/dist/parser/layoutPreprocessor.js +0 -22
  58. package/dist/parser/layoutPreprocessor.js.map +0 -1
  59. package/dist/parser/preprocessor.d.ts +0 -28
  60. package/dist/parser/preprocessor.js +0 -453
  61. package/dist/parser/preprocessor.js.map +0 -1
  62. package/src/parser/layoutPreprocessor.ts +0 -21
  63. package/src/parser/preprocessor.ne +0 -375
  64. package/src/parser/preprocessor.ts +0 -502
  65. package/tests/preprocessor.spec.ts +0 -69
@@ -1,6 +1,6 @@
1
- import { SimpleType, TypeVar as ASTTypeVar, } from "@yukigo/ast";
1
+ import { SimpleType, TypeVar as ASTTypeVar, } from "yukigo-ast";
2
2
  import { typeMappings } from "../utils/types.js";
3
- import { functionType } from "./checker.js";
3
+ import { functionType, stringType, charType } from "./checker.js";
4
4
  export class TypeBuilder {
5
5
  coreHM;
6
6
  constructor(coreHM) {
@@ -28,6 +28,10 @@ export class TypeBuilder {
28
28
  }
29
29
  // Uppercase = type constructor (e.g., Int, Bool, List)
30
30
  const primitive = typeMappings[n.value] || n.value;
31
+ if (primitive === "YuString")
32
+ return stringType;
33
+ if (primitive === "YuChar")
34
+ return charType;
31
35
  return {
32
36
  type: "TypeConstructor",
33
37
  name: primitive,
@@ -1 +1 @@
1
- {"version":3,"file":"TypeBuilder.js","sourceRoot":"","sources":["../../src/typechecker/TypeBuilder.ts"],"names":[],"mappings":"AAAA,OAAO,EACL,UAAU,EACV,OAAO,IAAI,UAAU,GAStB,MAAM,aAAa,CAAC;AACrB,OAAO,EAAE,YAAY,EAAE,MAAM,mBAAmB,CAAC;AAEjD,OAAO,EAAE,YAAY,EAAkC,MAAM,cAAc,CAAC;AAE5E,MAAM,OAAO,WAAW;IACF;IAApB,YAAoB,MAAc;QAAd,WAAM,GAAN,MAAM,CAAQ;IAAG,CAAC;IAEtC,KAAK,CACH,IAAgB,EAChB,aAAmC,IAAI,GAAG,EAAE;QAE5C,MAAM,cAAc,GAAG,IAAI,GAAG,EAAoB,CAAC;QAEnD,wCAAwC;QACxC,MAAM,OAAO,GAAG;YACd,eAAe,EAAE,CAAC,CAAa,EAAQ,EAAE;gBACvC,IAAI,QAAQ,CAAC,IAAI,CAAC,CAAC,CAAC,KAAK,CAAC,EAAE,CAAC;oBAC3B,4BAA4B;oBAC5B,IAAI,CAAC,UAAU,CAAC,GAAG,CAAC,CAAC,CAAC,KAAK,CAAC,EAAE,CAAC;wBAC7B,UAAU,CAAC,GAAG,CAAC,CAAC,CAAC,KAAK,EAAE;4BACtB,IAAI,EAAE,SAAS;4BACf,GAAG,IAAI,CAAC,MAAM,CAAC,QAAQ,EAAE;4BACzB,IAAI,EAAE,CAAC,CAAC,KAAK;yBACd,CAAC,CAAC;oBACL,CAAC;oBACD,uCAAuC;oBACvC,KAAK,MAAM,UAAU,IAAI,CAAC,CAAC,WAAW,EAAE,CAAC;wBACvC,IAAI,CAAC,iBAAiB,CAAC,UAAU,EAAE,UAAU,EAAE,cAAc,CAAC,CAAC;oBACjE,CAAC;oBACD,OAAO,UAAU,CAAC,GAAG,CAAC,CAAC,CAAC,KAAK,CAAE,CAAC;gBAClC,CAAC;gBAED,uDAAuD;gBACvD,MAAM,SAAS,GAAG,YAAY,CAAC,CAAC,CAAC,KAAK,CAAC,IAAI,CAAC,CAAC,KAAK,CAAC;gBACnD,OAAO;oBACL,IAAI,EAAE,iBAAiB;oBACvB,IAAI,EAAE,SAAS;oBACf,IAAI,EAAE,EAAE;iBACT,CAAC;YACJ,CAAC;YAED,YAAY,EAAE,CAAC,CAAa,EAAQ,EAAE;gBACpC,wCAAwC;gBACxC,IAAI,CAAC,UAAU,CAAC,GAAG,CAAC,CAAC,CAAC,KAAK,CAAC,EAAE,CAAC;oBAC7B,UAAU,CAAC,GAAG,CAAC,CAAC,CAAC,KAAK,EAAE;wBACtB,IAAI,EAAE,SAAS;wBACf,GAAG,IAAI,CAAC,MAAM,CAAC,QAAQ,EAAE;wBACzB,IAAI,EAAE,CAAC,CAAC,KAAK;qBACd,CAAC,CAAC;gBACL,CAAC;gBACD,KAAK,MAAM,UAAU,IAAI,CAAC,CAAC,WAAW,EAAE,CAAC;oBACvC,IAAI,CAAC,iBAAiB,CAAC,UAAU,EAAE,UAAU,EAAE,cAAc,CAAC,CAAC;gBACjE,CAAC;gBACD,OAAO,UAAU,CAAC,GAAG,CAAC,CAAC,CAAC,KAAK,CAAE,CAAC;YAClC,CAAC;YAED,aAAa,EAAE,CAAC,CAAW,EAAQ,EAAE;gBACnC,MAAM,WAAW,GAAG,CAAC,CAAC,MAAM,CAAC,MAAM,CAAC,OAAO,CAAC,CAAC;gBAC7C,OAAO;oBACL,IAAI,EAAE,iBAAiB;oBACvB,IAAI,EAAE,MAAM;oBACZ,IAAI,EAAE,CAAC,WAAW,CAAC;iBACpB,CAAC;YACJ,CAAC;YAED,cAAc,EAAE,CAAC,CAAY,EAAQ,EAAE;gBACrC,MAAM,YAAY,GAAG,CAAC,CAAC,MAAM,CAAC,GAAG,CAAC,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC,MAAM,CAAC,OAAO,CAAC,CAAC,CAAC;gBAC5D,OAAO;oBACL,IAAI,EAAE,iBAAiB;oBACvB,IAAI,EAAE,OAAO;oBACb,IAAI,EAAE,YAAY;iBACnB,CAAC;YACJ,CAAC;YAED,oBAAoB,EAAE,CAAC,CAAkB,EAAQ,EAAE;gBACjD,OAAO,IAAI,CAAC,MAAM,CAAC,QAAQ,EAAE,CAAC;YAChC,CAAC;YAED,sBAAsB,EAAE,CAAC,CAAoB,EAAQ,EAAE;gBACrD,yDAAyD;gBACzD,wBAAwB;gBACxB,MAAM,UAAU,GAAG,CAAC,CAAC,UAAU,CAAC,MAAM,CAAC,OAAO,CAAC,CAAC;gBAChD,MAAM,UAAU,GAAG,CAAC,CAAC,MAAM,CAAC,GAAG,CAAC,CAAC,KAAK,EAAE,EAAE,CAAC,KAAK,CAAC,MAAM,CAAC,OAAO,CAAC,CAAC,CAAC;gBAElE,mCAAmC;gBACnC,MAAM,QAAQ,GAAG,UAAU,CAAC,WAAW,CACrC,CAAC,GAAG,EAAE,KAAK,EAAE,EAAE,CAAC,YAAY,CAAC,KAAK,EAAE,GAAG,CAAC,EACxC,UAAU,CACX,CAAC;gBAEF,sBAAsB;gBACtB,KAAK,MAAM,UAAU,IAAI,CAAC,CAAC,WAAW,EAAE,CAAC;oBACvC,IAAI,CAAC,iBAAiB,CAAC,UAAU,EAAE,UAAU,EAAE,cAAc,CAAC,CAAC;gBACjE,CAAC;gBAED,OAAO,QAAQ,CAAC;YAClB,CAAC;YAED,oBAAoB,EAAE,CAAC,CAAkB,EAAQ,EAAE;gBACjD,sFAAsF;gBACtF,2BAA2B;gBAC3B,MAAM,IAAI,KAAK,CAAC,8CAA8C,CAAC,CAAC;YAClE,CAAC;YACD,KAAK,CAAC,IAAa;gBACjB,OAAO,IAAI,CAAC,MAAM,CAAC,OAAO,CAAC,CAAC;YAC9B,CAAC;SACF,CAAC;QAEF,MAAM,IAAI,GAAG,IAAI,CAAC,MAAM,CAAC,OAAO,CAAC,CAAC;QAClC,OAAO,EAAE,IAAI,EAAE,WAAW,EAAE,cAAc,EAAE,CAAC;IAC/C,CAAC;IAEO,iBAAiB,CACvB,UAAsB,EACtB,UAAwD,EACxD,cAAqC;QAErC,oEAAoE;QACpE,IAAI,UAAU,CAAC,UAAU,CAAC,MAAM,KAAK,CAAC;YAAE,OAAO;QAE/C,MAAM,UAAU,GAAG,UAAU,CAAC,UAAU,CAAC,CAAC,CAAC,CAAC;QAC5C,sCAAsC;QACtC,IACE,CAAC,UAAU,YAAY,UAAU,IAAI,UAAU,YAAY,UAAU,CAAC;YACtE,QAAQ,CAAC,IAAI,CAAC,UAAU,CAAC,KAAK,CAAC,EAC/B,CAAC;YACD,MAAM,EAAE,GAAG,UAAU,CAAC,GAAG,CAAC,UAAU,CAAC,KAAK,CAAC,CAAC;YAC5C,IAAI,EAAE,EAAE,CAAC;gBACP,IAAI,CAAC,cAAc,CAAC,GAAG,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC;oBAC/B,cAAc,CAAC,GAAG,CAAC,EAAE,CAAC,EAAE,EAAE,EAAE,CAAC,CAAC;gBAChC,CAAC;gBACD,cAAc,CAAC,GAAG,CAAC,EAAE,CAAC,EAAE,CAAE,CAAC,IAAI,CAAC,UAAU,CAAC,IAAI,CAAC,CAAC;YACnD,CAAC;QACH,CAAC;IACH,CAAC;CACF"}
1
+ {"version":3,"file":"TypeBuilder.js","sourceRoot":"","sources":["../../src/typechecker/TypeBuilder.ts"],"names":[],"mappings":"AAAA,OAAO,EACL,UAAU,EACV,OAAO,IAAI,UAAU,GAStB,MAAM,YAAY,CAAC;AACpB,OAAO,EAAE,YAAY,EAAE,MAAM,mBAAmB,CAAC;AAEjD,OAAO,EAAE,YAAY,EAAkC,UAAU,EAAE,QAAQ,EAAE,MAAM,cAAc,CAAC;AAElG,MAAM,OAAO,WAAW;IACF;IAApB,YAAoB,MAAc;QAAd,WAAM,GAAN,MAAM,CAAQ;IAAG,CAAC;IAEtC,KAAK,CACH,IAAgB,EAChB,aAAmC,IAAI,GAAG,EAAE;QAE5C,MAAM,cAAc,GAAG,IAAI,GAAG,EAAoB,CAAC;QAEnD,wCAAwC;QACxC,MAAM,OAAO,GAAG;YACd,eAAe,EAAE,CAAC,CAAa,EAAQ,EAAE;gBACvC,IAAI,QAAQ,CAAC,IAAI,CAAC,CAAC,CAAC,KAAK,CAAC,EAAE,CAAC;oBAC3B,4BAA4B;oBAC5B,IAAI,CAAC,UAAU,CAAC,GAAG,CAAC,CAAC,CAAC,KAAK,CAAC,EAAE,CAAC;wBAC7B,UAAU,CAAC,GAAG,CAAC,CAAC,CAAC,KAAK,EAAE;4BACtB,IAAI,EAAE,SAAS;4BACf,GAAG,IAAI,CAAC,MAAM,CAAC,QAAQ,EAAE;4BACzB,IAAI,EAAE,CAAC,CAAC,KAAK;yBACd,CAAC,CAAC;oBACL,CAAC;oBACD,uCAAuC;oBACvC,KAAK,MAAM,UAAU,IAAI,CAAC,CAAC,WAAW,EAAE,CAAC;wBACvC,IAAI,CAAC,iBAAiB,CAAC,UAAU,EAAE,UAAU,EAAE,cAAc,CAAC,CAAC;oBACjE,CAAC;oBACD,OAAO,UAAU,CAAC,GAAG,CAAC,CAAC,CAAC,KAAK,CAAE,CAAC;gBAClC,CAAC;gBAED,uDAAuD;gBACvD,MAAM,SAAS,GAAG,YAAY,CAAC,CAAC,CAAC,KAAK,CAAC,IAAI,CAAC,CAAC,KAAK,CAAC;gBACnD,IAAI,SAAS,KAAK,UAAU;oBAAE,OAAO,UAAU,CAAC;gBAChD,IAAI,SAAS,KAAK,QAAQ;oBAAE,OAAO,QAAQ,CAAC;gBAC5C,OAAO;oBACL,IAAI,EAAE,iBAAiB;oBACvB,IAAI,EAAE,SAAS;oBACf,IAAI,EAAE,EAAE;iBACT,CAAC;YACJ,CAAC;YAED,YAAY,EAAE,CAAC,CAAa,EAAQ,EAAE;gBACpC,wCAAwC;gBACxC,IAAI,CAAC,UAAU,CAAC,GAAG,CAAC,CAAC,CAAC,KAAK,CAAC,EAAE,CAAC;oBAC7B,UAAU,CAAC,GAAG,CAAC,CAAC,CAAC,KAAK,EAAE;wBACtB,IAAI,EAAE,SAAS;wBACf,GAAG,IAAI,CAAC,MAAM,CAAC,QAAQ,EAAE;wBACzB,IAAI,EAAE,CAAC,CAAC,KAAK;qBACd,CAAC,CAAC;gBACL,CAAC;gBACD,KAAK,MAAM,UAAU,IAAI,CAAC,CAAC,WAAW,EAAE,CAAC;oBACvC,IAAI,CAAC,iBAAiB,CAAC,UAAU,EAAE,UAAU,EAAE,cAAc,CAAC,CAAC;gBACjE,CAAC;gBACD,OAAO,UAAU,CAAC,GAAG,CAAC,CAAC,CAAC,KAAK,CAAE,CAAC;YAClC,CAAC;YAED,aAAa,EAAE,CAAC,CAAW,EAAQ,EAAE;gBACnC,MAAM,WAAW,GAAG,CAAC,CAAC,MAAM,CAAC,MAAM,CAAC,OAAO,CAAC,CAAC;gBAC7C,OAAO;oBACL,IAAI,EAAE,iBAAiB;oBACvB,IAAI,EAAE,MAAM;oBACZ,IAAI,EAAE,CAAC,WAAW,CAAC;iBACpB,CAAC;YACJ,CAAC;YAED,cAAc,EAAE,CAAC,CAAY,EAAQ,EAAE;gBACrC,MAAM,YAAY,GAAG,CAAC,CAAC,MAAM,CAAC,GAAG,CAAC,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC,MAAM,CAAC,OAAO,CAAC,CAAC,CAAC;gBAC5D,OAAO;oBACL,IAAI,EAAE,iBAAiB;oBACvB,IAAI,EAAE,OAAO;oBACb,IAAI,EAAE,YAAY;iBACnB,CAAC;YACJ,CAAC;YAED,oBAAoB,EAAE,CAAC,CAAkB,EAAQ,EAAE;gBACjD,OAAO,IAAI,CAAC,MAAM,CAAC,QAAQ,EAAE,CAAC;YAChC,CAAC;YAED,sBAAsB,EAAE,CAAC,CAAoB,EAAQ,EAAE;gBACrD,yDAAyD;gBACzD,wBAAwB;gBACxB,MAAM,UAAU,GAAG,CAAC,CAAC,UAAU,CAAC,MAAM,CAAC,OAAO,CAAC,CAAC;gBAChD,MAAM,UAAU,GAAG,CAAC,CAAC,MAAM,CAAC,GAAG,CAAC,CAAC,KAAK,EAAE,EAAE,CAAC,KAAK,CAAC,MAAM,CAAC,OAAO,CAAC,CAAC,CAAC;gBAElE,mCAAmC;gBACnC,MAAM,QAAQ,GAAG,UAAU,CAAC,WAAW,CACrC,CAAC,GAAG,EAAE,KAAK,EAAE,EAAE,CAAC,YAAY,CAAC,KAAK,EAAE,GAAG,CAAC,EACxC,UAAU,CACX,CAAC;gBAEF,sBAAsB;gBACtB,KAAK,MAAM,UAAU,IAAI,CAAC,CAAC,WAAW,EAAE,CAAC;oBACvC,IAAI,CAAC,iBAAiB,CAAC,UAAU,EAAE,UAAU,EAAE,cAAc,CAAC,CAAC;gBACjE,CAAC;gBAED,OAAO,QAAQ,CAAC;YAClB,CAAC;YAED,oBAAoB,EAAE,CAAC,CAAkB,EAAQ,EAAE;gBACjD,sFAAsF;gBACtF,2BAA2B;gBAC3B,MAAM,IAAI,KAAK,CAAC,8CAA8C,CAAC,CAAC;YAClE,CAAC;YACD,KAAK,CAAC,IAAa;gBACjB,OAAO,IAAI,CAAC,MAAM,CAAC,OAAO,CAAC,CAAC;YAC9B,CAAC;SACF,CAAC;QAEF,MAAM,IAAI,GAAG,IAAI,CAAC,MAAM,CAAC,OAAO,CAAC,CAAC;QAClC,OAAO,EAAE,IAAI,EAAE,WAAW,EAAE,cAAc,EAAE,CAAC;IAC/C,CAAC;IAEO,iBAAiB,CACvB,UAAsB,EACtB,UAAwD,EACxD,cAAqC;QAErC,oEAAoE;QACpE,IAAI,UAAU,CAAC,UAAU,CAAC,MAAM,KAAK,CAAC;YAAE,OAAO;QAE/C,MAAM,UAAU,GAAG,UAAU,CAAC,UAAU,CAAC,CAAC,CAAC,CAAC;QAC5C,sCAAsC;QACtC,IACE,CAAC,UAAU,YAAY,UAAU,IAAI,UAAU,YAAY,UAAU,CAAC;YACtE,QAAQ,CAAC,IAAI,CAAC,UAAU,CAAC,KAAK,CAAC,EAC/B,CAAC;YACD,MAAM,EAAE,GAAG,UAAU,CAAC,GAAG,CAAC,UAAU,CAAC,KAAK,CAAC,CAAC;YAC5C,IAAI,EAAE,EAAE,CAAC;gBACP,IAAI,CAAC,cAAc,CAAC,GAAG,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC;oBAC/B,cAAc,CAAC,GAAG,CAAC,EAAE,CAAC,EAAE,EAAE,EAAE,CAAC,CAAC;gBAChC,CAAC;gBACD,cAAc,CAAC,GAAG,CAAC,EAAE,CAAC,EAAE,CAAE,CAAC,IAAI,CAAC,UAAU,CAAC,IAAI,CAAC,CAAC;YACnD,CAAC;QACH,CAAC;IACH,CAAC;CACF"}
@@ -1,4 +1,4 @@
1
- import { AST, Function, UnguardedBody, GuardedBody, Visitor } from "@yukigo/ast";
1
+ import { AST, Function, Visitor, Sequence, TestGroup, Test, Assert, ASTNode } from "yukigo-ast";
2
2
  import { CoreHM } from "./core.js";
3
3
  export interface TypeVar {
4
4
  type: "TypeVar";
@@ -44,13 +44,18 @@ export type Result<T> = {
44
44
  };
45
45
  export declare const booleanType: TypeConstructor;
46
46
  export declare const numberType: TypeConstructor;
47
- export declare const stringType: TypeConstructor;
47
+ export declare const charType: TypeConstructor;
48
+ export declare const stringType: Type;
48
49
  export declare class FunctionRegistrarVisitor implements Visitor<void> {
49
50
  private env;
50
51
  private signatureMap;
51
52
  private coreHM;
52
53
  constructor(env: Environment, signatureMap: Map<string, TypeScheme>, coreHM: CoreHM);
54
+ visitSequence(node: Sequence): void;
53
55
  visitFunction(node: Function): void;
56
+ visitTestGroup(node: TestGroup): void;
57
+ visitTest(node: Test): void;
58
+ visitAssert(node: Assert): void;
54
59
  }
55
60
  export declare class FunctionCheckerVisitor implements Visitor<void> {
56
61
  private environments;
@@ -58,6 +63,9 @@ export declare class FunctionCheckerVisitor implements Visitor<void> {
58
63
  private coreHM;
59
64
  private errors;
60
65
  constructor(environments: Environment[], signatureMap: Map<string, TypeScheme>, coreHM: CoreHM, errors: string[]);
66
+ visitTestGroup(node: TestGroup): void;
67
+ visitTest(node: Test): void;
68
+ visitAssert(node: Assert): void;
61
69
  visitFunction(node: Function): void;
62
70
  }
63
71
  export declare class TypeChecker {
@@ -66,15 +74,18 @@ export declare class TypeChecker {
66
74
  private errors;
67
75
  constructor();
68
76
  check(ast: AST): string[];
77
+ inferExpression(expr: ASTNode): string;
78
+ getKnownSymbols(): string[];
69
79
  inferencePass(ast: AST): void;
70
80
  }
71
- export declare function showType(t: Type): string;
81
+ type SeenTypeNames = Map<number, string>;
82
+ export declare function showType(t: Type, seen?: SeenTypeNames): string;
72
83
  export declare function getReturnType(type: Type): Type;
73
84
  export declare function getArgumentTypes(type: Type): Type[];
74
85
  export declare function getArity(type: Type): number;
75
- export declare function isUnguardedBody(body: UnguardedBody | GuardedBody[]): body is UnguardedBody;
76
86
  export declare function isFunctionType(t: Type): t is FunctionType;
77
87
  export declare function isListType(t: Type): t is ListType;
78
88
  export declare function isTupleType(t: Type): t is TupleType;
79
89
  export declare function functionType(params: Type, returnType: Type): FunctionType;
80
90
  export declare function listType(elementsType: Type): ListType;
91
+ export {};
@@ -1,7 +1,8 @@
1
- import { Function, Return, } from "@yukigo/ast";
1
+ import { Function, Return, isUnguardedBody, Sequence, } from "yukigo-ast";
2
2
  import { InferenceEngine, PatternVisitor } from "./inference.js";
3
3
  import { CoreHM } from "./core.js";
4
4
  import { DeclarationCollectorVisitor } from "./DeclarationCollector.js";
5
+ import { typeClasses as staticTypeClasses } from "../utils/types.js";
5
6
  export const booleanType = {
6
7
  type: "TypeConstructor",
7
8
  name: "YuBoolean",
@@ -12,11 +13,12 @@ export const numberType = {
12
13
  name: "YuNumber",
13
14
  args: [],
14
15
  };
15
- export const stringType = {
16
+ export const charType = {
16
17
  type: "TypeConstructor",
17
- name: "YuString",
18
+ name: "YuChar",
18
19
  args: [],
19
20
  };
21
+ export const stringType = listType(charType);
20
22
  export class FunctionRegistrarVisitor {
21
23
  env;
22
24
  signatureMap;
@@ -26,6 +28,9 @@ export class FunctionRegistrarVisitor {
26
28
  this.signatureMap = signatureMap;
27
29
  this.coreHM = coreHM;
28
30
  }
31
+ visitSequence(node) {
32
+ node.statements.forEach((stmt) => stmt.accept(this));
33
+ }
29
34
  visitFunction(node) {
30
35
  const functionName = node.identifier.value;
31
36
  let funcScheme = this.signatureMap.get(functionName);
@@ -41,15 +46,27 @@ export class FunctionRegistrarVisitor {
41
46
  }
42
47
  for (const equation of node.equations) {
43
48
  if (isUnguardedBody(equation.body)) {
44
- const { statements } = equation.body.sequence;
49
+ const statements = equation.body.sequence.statements;
45
50
  statements
46
51
  .filter((stmt) => stmt instanceof Function)
47
52
  .forEach((func) => {
48
53
  this.env.set(func.identifier.value, funcScheme);
49
54
  });
50
55
  }
56
+ else {
57
+ for (const guard of equation.body) {
58
+ guard.body.accept(this);
59
+ }
60
+ }
51
61
  }
52
62
  }
63
+ visitTestGroup(node) {
64
+ node.group.accept(this);
65
+ }
66
+ visitTest(node) {
67
+ node.body.accept(this);
68
+ }
69
+ visitAssert(node) { }
53
70
  }
54
71
  export class FunctionCheckerVisitor {
55
72
  environments;
@@ -62,6 +79,16 @@ export class FunctionCheckerVisitor {
62
79
  this.coreHM = coreHM;
63
80
  this.errors = errors;
64
81
  }
82
+ visitTestGroup(node) {
83
+ node.group.accept(this);
84
+ }
85
+ visitTest(node) {
86
+ node.body.accept(this);
87
+ }
88
+ visitAssert(node) {
89
+ const inferenceEngine = new InferenceEngine(this.signatureMap, this.coreHM, this.environments);
90
+ node.body.accept(inferenceEngine);
91
+ }
65
92
  visitFunction(node) {
66
93
  const functionName = node.identifier.value;
67
94
  let funcScheme = this.signatureMap.get(functionName);
@@ -105,19 +132,28 @@ export class FunctionCheckerVisitor {
105
132
  }
106
133
  const expectedArity = getArity(this.coreHM.instantiate(funcScheme));
107
134
  for (const [index, equation] of node.equations.entries()) {
108
- if (equation.patterns.length !== expectedArity) {
109
- this.errors.push(`Type error in '${functionName}': Arity mismatch in equation number ${index}`);
135
+ if (equation.patterns.length > expectedArity) {
136
+ this.errors.push(`Type error in '${functionName}': Too many parameters in equation ${index}. Expected max ${expectedArity}, got ${equation.patterns.length}`);
110
137
  continue;
111
138
  }
112
139
  try {
113
140
  const funcType = this.coreHM.instantiate(funcScheme);
114
- const returnType = getReturnType(funcType);
141
+ // FIX 2: No buscamos el "ReturnType" final absoluto, sino el tipo restante
142
+ // Si funcType es A -> B -> C y consumimos 1 patrón, el cuerpo debe ser B -> C
143
+ let expectedBodyType = funcType;
144
+ // "Pelamos" el tipo función tantas veces como argumentos explícitos tengamos
145
+ for (let i = 0; i < equation.patterns.length; i++) {
146
+ if (isFunctionType(expectedBodyType)) {
147
+ expectedBodyType = expectedBodyType.args[1];
148
+ }
149
+ }
115
150
  const patternTypes = getArgumentTypes(funcType);
116
151
  this.environments.unshift(new Map());
117
152
  const inferenceEngine = new InferenceEngine(this.signatureMap, this.coreHM, this.environments);
118
- patternTypes.forEach((argType, i) => {
153
+ equation.patterns.forEach((pattern, i) => {
154
+ const argType = patternTypes[i]; // El tipo correspondiente a este patrón
119
155
  try {
120
- equation.patterns[i].accept(new PatternVisitor(this.coreHM, this.signatureMap, argType, this.environments, inferenceEngine));
156
+ pattern.accept(new PatternVisitor(this.coreHM, this.signatureMap, argType, this.environments, inferenceEngine));
121
157
  }
122
158
  catch (error) {
123
159
  this.errors.push(`Type error in '${functionName}': ${error.message}`);
@@ -133,7 +169,7 @@ export class FunctionCheckerVisitor {
133
169
  this.errors.push(`Type error in '${functionName}': ${returnResult.error}`);
134
170
  return;
135
171
  }
136
- const sub = this.coreHM.unify(returnResult.value, returnType);
172
+ const sub = this.coreHM.unify(returnResult.value, expectedBodyType);
137
173
  if (sub.success === false)
138
174
  throw Error(sub.error);
139
175
  }
@@ -147,10 +183,14 @@ export class FunctionCheckerVisitor {
147
183
  const conditionSub = this.coreHM.unify(condition.value, booleanType);
148
184
  if (conditionSub.success === false)
149
185
  throw Error(conditionSub.error);
150
- const bodyResult = guard.body.accept(inferenceEngine);
186
+ let body = guard.body;
187
+ if (guard.body instanceof Sequence) {
188
+ body = guard.body.statements.find((stmt) => stmt instanceof Return);
189
+ }
190
+ const bodyResult = body.accept(inferenceEngine);
151
191
  if (bodyResult.success === false)
152
192
  throw Error(bodyResult.error);
153
- const sub = this.coreHM.unify(bodyResult.value, returnType);
193
+ const sub = this.coreHM.unify(bodyResult.value, expectedBodyType);
154
194
  if (sub.success === false)
155
195
  throw Error(sub.error);
156
196
  }
@@ -169,11 +209,11 @@ export class TypeChecker {
169
209
  errors;
170
210
  constructor() {
171
211
  this.signatureMap = new Map();
172
- this.coreHM = new CoreHM();
173
212
  this.errors = [];
174
213
  }
175
214
  check(ast) {
176
215
  const typeAliasMap = new Map();
216
+ this.coreHM = new CoreHM(typeAliasMap, new Map(staticTypeClasses));
177
217
  const recordMap = new Map();
178
218
  // Phase 1: Collect declarations
179
219
  const collector = new DeclarationCollectorVisitor(this.errors, typeAliasMap, recordMap, this.signatureMap, this.coreHM);
@@ -191,6 +231,19 @@ export class TypeChecker {
191
231
  this.inferencePass(ast);
192
232
  return this.errors;
193
233
  }
234
+ inferExpression(expr) {
235
+ if (!this.coreHM || !this.signatureMap)
236
+ throw new Error("Environment not initialized.");
237
+ const globalEnv = new Map(this.signatureMap);
238
+ const inferenceEngine = new InferenceEngine(this.signatureMap, this.coreHM, [globalEnv]);
239
+ const result = expr.accept(inferenceEngine);
240
+ if (result.success === false)
241
+ throw new Error(result.error);
242
+ return showType(result.value);
243
+ }
244
+ getKnownSymbols() {
245
+ return Array.from(this.signatureMap.keys());
246
+ }
194
247
  inferencePass(ast) {
195
248
  // Step 1: Register all functions in env
196
249
  const globalEnv = new Map(this.signatureMap);
@@ -205,22 +258,55 @@ export class TypeChecker {
205
258
  }
206
259
  }
207
260
  }
208
- export function showType(t) {
261
+ const YuNameMap = {
262
+ YuNumber: "YuNumber",
263
+ YuString: "YuString",
264
+ YuBoolean: "YuBoolean",
265
+ YuChar: "YuChar",
266
+ };
267
+ const getVarName = (id, name, seen) => {
268
+ if (name)
269
+ return name;
270
+ if (seen.has(id))
271
+ return seen.get(id);
272
+ const index = seen.size;
273
+ const letter = String.fromCharCode(97 + (index % 26));
274
+ const suffix = index >= 26 ? Math.floor(index / 26).toString() : "";
275
+ const generatedName = `${letter}${suffix}`;
276
+ seen.set(id, generatedName);
277
+ return generatedName;
278
+ };
279
+ const collectTypeVars = (t) => t.type === "TypeVar" ? [t] : t.args.flatMap(collectTypeVars);
280
+ const formatBody = (t, seen) => {
209
281
  if (t.type === "TypeVar")
210
- return t.name ?? `t${t.id}`;
282
+ return getVarName(t.id, t.name, seen);
211
283
  if (isFunctionType(t)) {
212
- const a = showType(t.args[0]);
213
- const b = showType(t.args[1]);
214
- const aDisp = isFunctionType(t.args[0]) ? `(${a})` : a;
215
- return `${aDisp} -> ${b}`;
284
+ const left = formatBody(t.args[0], seen);
285
+ const right = formatBody(t.args[1], seen);
286
+ return isFunctionType(t.args[0])
287
+ ? `(${left}) -> ${right}`
288
+ : `${left} -> ${right}`;
216
289
  }
217
- if (isListType(t))
290
+ if (isListType(t)) {
291
+ if (t.args[0].type === "TypeConstructor" && t.args[0].name === "YuChar") {
292
+ return "YuString";
293
+ }
218
294
  return `[${showType(t.args[0])}]`;
295
+ }
219
296
  if (isTupleType(t))
220
297
  return `(${t.args.map(showType.bind(this)).join(", ")})`;
298
+ const name = YuNameMap[t.name] || t.name;
221
299
  return t.args.length
222
- ? `${t.name} ${t.args.map(showType.bind(this)).join(" ")}`
223
- : t.name;
300
+ ? `${name} ${t.args.map((a) => formatBody(a, seen)).join(" ")}`
301
+ : name;
302
+ };
303
+ export function showType(t, seen = new Map()) {
304
+ const bodyStr = formatBody(t, seen);
305
+ const constraints = Array.from(new Set(collectTypeVars(t).flatMap(({ constraints, id, name }) => constraints.map((c) => `${c} ${getVarName(id, name, seen)}`))));
306
+ if (constraints.length === 0)
307
+ return bodyStr;
308
+ const context = constraints.length === 1 ? constraints[0] : `(${constraints.join(", ")})`;
309
+ return `${context} => ${bodyStr}`;
224
310
  }
225
311
  export function getReturnType(type) {
226
312
  let t = type;
@@ -240,9 +326,6 @@ export function getArgumentTypes(type) {
240
326
  export function getArity(type) {
241
327
  return getArgumentTypes(type).length;
242
328
  }
243
- export function isUnguardedBody(body) {
244
- return !Array.isArray(body);
245
- }
246
329
  export function isFunctionType(t) {
247
330
  return t.type === "TypeConstructor" && t.name === "->" && t.args.length === 2;
248
331
  }
@@ -1 +1 @@
1
- {"version":3,"file":"checker.js","sourceRoot":"","sources":["../../src/typechecker/checker.ts"],"names":[],"mappings":"AAAA,OAAO,EAEL,QAAQ,EAIR,MAAM,GACP,MAAM,aAAa,CAAC;AAErB,OAAO,EAAE,eAAe,EAAE,cAAc,EAAE,MAAM,gBAAgB,CAAC;AACjE,OAAO,EAAE,MAAM,EAAE,MAAM,WAAW,CAAC;AAEnC,OAAO,EAAE,2BAA2B,EAAE,MAAM,2BAA2B,CAAC;AA+CxE,MAAM,CAAC,MAAM,WAAW,GAAoB;IAC1C,IAAI,EAAE,iBAAiB;IACvB,IAAI,EAAE,WAAW;IACjB,IAAI,EAAE,EAAE;CACT,CAAC;AACF,MAAM,CAAC,MAAM,UAAU,GAAoB;IACzC,IAAI,EAAE,iBAAiB;IACvB,IAAI,EAAE,UAAU;IAChB,IAAI,EAAE,EAAE;CACT,CAAC;AACF,MAAM,CAAC,MAAM,UAAU,GAAoB;IACzC,IAAI,EAAE,iBAAiB;IACvB,IAAI,EAAE,UAAU;IAChB,IAAI,EAAE,EAAE;CACT,CAAC;AAEF,MAAM,OAAO,wBAAwB;IAEzB;IACA;IACA;IAHV,YACU,GAAgB,EAChB,YAAqC,EACrC,MAAc;QAFd,QAAG,GAAH,GAAG,CAAa;QAChB,iBAAY,GAAZ,YAAY,CAAyB;QACrC,WAAM,GAAN,MAAM,CAAQ;IACrB,CAAC;IACJ,aAAa,CAAC,IAAc;QAC1B,MAAM,YAAY,GAAG,IAAI,CAAC,UAAU,CAAC,KAAK,CAAC;QAC3C,IAAI,UAAU,GAAG,IAAI,CAAC,YAAY,CAAC,GAAG,CAAC,YAAY,CAAC,CAAC;QACrD,IAAI,CAAC,UAAU,EAAE,CAAC;YAChB,MAAM,WAAW,GAAG,IAAI,CAAC,MAAM,CAAC,QAAQ,EAAE,CAAC;YAC3C,UAAU,GAAG;gBACX,IAAI,EAAE,YAAY;gBAClB,WAAW,EAAE,EAAE;gBACf,IAAI,EAAE,WAAW;gBACjB,WAAW,EAAE,IAAI,GAAG,EAAE;aACvB,CAAC;YACF,IAAI,CAAC,GAAG,CAAC,GAAG,CAAC,YAAY,EAAE,UAAU,CAAC,CAAC;QACzC,CAAC;QACD,KAAK,MAAM,QAAQ,IAAI,IAAI,CAAC,SAAS,EAAE,CAAC;YACtC,IAAI,eAAe,CAAC,QAAQ,CAAC,IAAI,CAAC,EAAE,CAAC;gBACnC,MAAM,EAAE,UAAU,EAAE,GAAG,QAAQ,CAAC,IAAI,CAAC,QAAQ,CAAC;gBAC9C,UAAU;qBACP,MAAM,CAAC,CAAC,IAAI,EAAE,EAAE,CAAC,IAAI,YAAY,QAAQ,CAAC;qBAC1C,OAAO,CAAC,CAAC,IAAI,EAAE,EAAE;oBAChB,IAAI,CAAC,GAAG,CAAC,GAAG,CAAC,IAAI,CAAC,UAAU,CAAC,KAAK,EAAE,UAAU,CAAC,CAAC;gBAClD,CAAC,CAAC,CAAC;YACP,CAAC;QACH,CAAC;IACH,CAAC;CACF;AACD,MAAM,OAAO,sBAAsB;IAEvB;IACA;IACA;IACA;IAJV,YACU,YAA2B,EAC3B,YAAqC,EACrC,MAAc,EACd,MAAgB;QAHhB,iBAAY,GAAZ,YAAY,CAAe;QAC3B,iBAAY,GAAZ,YAAY,CAAyB;QACrC,WAAM,GAAN,MAAM,CAAQ;QACd,WAAM,GAAN,MAAM,CAAU;IACvB,CAAC;IACJ,aAAa,CAAC,IAAc;QAC1B,MAAM,YAAY,GAAG,IAAI,CAAC,UAAU,CAAC,KAAK,CAAC;QAC3C,IAAI,UAAU,GAAG,IAAI,CAAC,YAAY,CAAC,GAAG,CAAC,YAAY,CAAC,CAAC;QACrD,oCAAoC;QACpC,IAAI,CAAC,UAAU,EAAE,CAAC;YAChB,MAAM,OAAO,GAAG,IAAI,CAAC,SAAS,CAAC,CAAC,CAAC,CAAC;YAClC,IAAI,CAAC,YAAY,CAAC,OAAO,CAAC,IAAI,GAAG,EAAE,CAAC,CAAC;YACrC,MAAM,eAAe,GAAG,IAAI,eAAe,CACzC,IAAI,CAAC,YAAY,EACjB,IAAI,CAAC,MAAM,EACX,IAAI,CAAC,YAAY,CAClB,CAAC;YACF,MAAM,UAAU,GAAG,OAAO,CAAC,QAAQ,CAAC,GAAG,CAAC,GAAG,EAAE,CAAC,IAAI,CAAC,MAAM,CAAC,QAAQ,EAAE,CAAC,CAAC;YAEtE,UAAU,CAAC,OAAO,CAAC,CAAC,IAAI,EAAE,CAAC,EAAE,EAAE;gBAC7B,IAAI,CAAC;oBACH,IAAI,cAAc,CAChB,IAAI,CAAC,MAAM,EACX,IAAI,CAAC,YAAY,EACjB,IAAI,EACJ,IAAI,CAAC,YAAY,EACjB,eAAe,CAChB,CAAC,KAAK,CAAC,OAAO,CAAC,QAAQ,CAAC,CAAC,CAAC,CAAC,CAAC;gBAC/B,CAAC;gBAAC,OAAO,KAAK,EAAE,CAAC;oBACf,IAAI,CAAC,MAAM,CAAC,IAAI,CAAC,kBAAkB,YAAY,MAAM,KAAK,CAAC,OAAO,EAAE,CAAC,CAAC;gBACxE,CAAC;YACH,CAAC,CAAC,CAAC;YAEH,IAAI,gBAAsB,CAAC;YAC3B,IAAI,eAAe,CAAC,OAAO,CAAC,IAAI,CAAC,EAAE,CAAC;gBAClC,MAAM,kBAAkB,GAAG,OAAO,CAAC,IAAI,CAAC,QAAQ,CAAC,UAAU,CAAC;gBAC5D,kBAAkB,CAAC,OAAO,CAAC,CAAC,IAAI,EAAE,EAAE,CAClC,IAAI,CAAC,MAAM,CACT,IAAI,sBAAsB,CACxB,IAAI,CAAC,YAAY,EACjB,IAAI,CAAC,YAAY,EACjB,IAAI,CAAC,MAAM,EACX,IAAI,CAAC,MAAM,CACZ,CACF,CACF,CAAC;gBACF,MAAM,YAAY,GAAG,kBAAkB;qBACpC,IAAI,CAAC,CAAC,IAAI,EAAE,EAAE,CAAC,IAAI,YAAY,MAAM,CAAC;qBACtC,MAAM,CAAC,eAAe,CAAC,CAAC;gBAC3B,IAAI,YAAY,CAAC,OAAO,KAAK,KAAK,EAAE,CAAC;oBACnC,IAAI,CAAC,MAAM,CAAC,IAAI,CACd,kBAAkB,YAAY,MAAM,YAAY,CAAC,KAAK,EAAE,CACzD,CAAC;oBACF,OAAO;gBACT,CAAC;gBACD,gBAAgB,GAAG,YAAY,CAAC,KAAK,CAAC;YACxC,CAAC;iBAAM,CAAC;gBACN,6CAA6C;gBAC7C,gBAAgB,GAAG,IAAI,CAAC,MAAM,CAAC,QAAQ,EAAE,CAAC,CAAC,cAAc;YAC3D,CAAC;YAED,MAAM,YAAY,GAAG,UAAU,CAAC,WAAW,CACzC,CAAC,GAAG,EAAE,KAAK,EAAE,EAAE,CAAC,YAAY,CAAC,KAAK,EAAE,GAAG,CAAC,EACxC,gBAAgB,CACjB,CAAC;YAEF,mEAAmE;YACnE,IAAI,CAAC,YAAY,CAAC,KAAK,EAAE,CAAC;YAC1B,UAAU,GAAG,IAAI,CAAC,MAAM,CAAC,UAAU,CAAC,IAAI,CAAC,YAAY,CAAC,CAAC,CAAC,EAAE,YAAY,CAAC,CAAC;YACxE,IAAI,CAAC,YAAY,CAAC,GAAG,CAAC,YAAY,EAAE,UAAU,CAAC,CAAC;YAChD,IAAI,CAAC,YAAY,CAAC,CAAC,CAAC,CAAC,GAAG,CAAC,YAAY,EAAE,UAAU,CAAC,CAAC;QACrD,CAAC;QAED,MAAM,aAAa,GAAG,QAAQ,CAAC,IAAI,CAAC,MAAM,CAAC,WAAW,CAAC,UAAU,CAAC,CAAC,CAAC;QACpE,KAAK,MAAM,CAAC,KAAK,EAAE,QAAQ,CAAC,IAAI,IAAI,CAAC,SAAS,CAAC,OAAO,EAAE,EAAE,CAAC;YACzD,IAAI,QAAQ,CAAC,QAAQ,CAAC,MAAM,KAAK,aAAa,EAAE,CAAC;gBAC/C,IAAI,CAAC,MAAM,CAAC,IAAI,CAAC,kBAAkB,YAAY,wCAAwC,KAAK,EAAE,CAAC,CAAC;gBAChG,SAAS;YACX,CAAC;YACD,IAAI,CAAC;gBACH,MAAM,QAAQ,GAAG,IAAI,CAAC,MAAM,CAAC,WAAW,CAAC,UAAU,CAAC,CAAC;gBAErD,MAAM,UAAU,GAAG,aAAa,CAAC,QAAQ,CAAC,CAAC;gBAC3C,MAAM,YAAY,GAAG,gBAAgB,CAAC,QAAQ,CAAC,CAAC;gBAEhD,IAAI,CAAC,YAAY,CAAC,OAAO,CAAC,IAAI,GAAG,EAAE,CAAC,CAAC;gBACrC,MAAM,eAAe,GAAG,IAAI,eAAe,CACzC,IAAI,CAAC,YAAY,EACjB,IAAI,CAAC,MAAM,EACX,IAAI,CAAC,YAAY,CAClB,CAAC;gBACF,YAAY,CAAC,OAAO,CAAC,CAAC,OAAO,EAAE,CAAC,EAAE,EAAE;oBAClC,IAAI,CAAC;wBACH,QAAQ,CAAC,QAAQ,CAAC,CAAC,CAAC,CAAC,MAAM,CACzB,IAAI,cAAc,CAChB,IAAI,CAAC,MAAM,EACX,IAAI,CAAC,YAAY,EACjB,OAAO,EACP,IAAI,CAAC,YAAY,EACjB,eAAe,CAChB,CACF,CAAC;oBACJ,CAAC;oBAAC,OAAO,KAAK,EAAE,CAAC;wBACf,IAAI,CAAC,MAAM,CAAC,IAAI,CACd,kBAAkB,YAAY,MAAM,KAAK,CAAC,OAAO,EAAE,CACpD,CAAC;oBACJ,CAAC;gBACH,CAAC,CAAC,CAAC;gBACH,IAAI,eAAe,CAAC,QAAQ,CAAC,IAAI,CAAC,EAAE,CAAC;oBACnC,MAAM,kBAAkB,GAAG,QAAQ,CAAC,IAAI,CAAC,QAAQ,CAAC,UAAU,CAAC;oBAC7D,kBAAkB,CAAC,OAAO,CAAC,CAAC,IAAI,EAAE,EAAE,CAClC,IAAI,CAAC,MAAM,CACT,IAAI,sBAAsB,CACxB,IAAI,CAAC,YAAY,EACjB,IAAI,CAAC,YAAY,EACjB,IAAI,CAAC,MAAM,EACX,IAAI,CAAC,MAAM,CACZ,CACF,CACF,CAAC;oBACF,MAAM,YAAY,GAAG,kBAAkB;yBACpC,IAAI,CAAC,CAAC,IAAI,EAAE,EAAE,CAAC,IAAI,YAAY,MAAM,CAAC;yBACtC,MAAM,CAAC,eAAe,CAAC,CAAC;oBAC3B,IAAI,YAAY,CAAC,OAAO,KAAK,KAAK,EAAE,CAAC;wBACnC,IAAI,CAAC,MAAM,CAAC,IAAI,CACd,kBAAkB,YAAY,MAAM,YAAY,CAAC,KAAK,EAAE,CACzD,CAAC;wBACF,OAAO;oBACT,CAAC;oBAED,MAAM,GAAG,GAAG,IAAI,CAAC,MAAM,CAAC,KAAK,CAAC,YAAY,CAAC,KAAK,EAAE,UAAU,CAAC,CAAC;oBAC9D,IAAI,GAAG,CAAC,OAAO,KAAK,KAAK;wBAAE,MAAM,KAAK,CAAC,GAAG,CAAC,KAAK,CAAC,CAAC;gBACpD,CAAC;qBAAM,CAAC;oBACN,2BAA2B;oBAC3B,KAAK,MAAM,KAAK,IAAI,QAAQ,CAAC,IAAI,EAAE,CAAC;wBAClC,qEAAqE;wBAErE,MAAM,SAAS,GAAG,KAAK,CAAC,SAAS,CAAC,MAAM,CAAC,eAAe,CAAC,CAAC;wBAC1D,IAAI,SAAS,CAAC,OAAO,KAAK,KAAK;4BAAE,MAAM,KAAK,CAAC,SAAS,CAAC,KAAK,CAAC,CAAC;wBAE9D,MAAM,YAAY,GAAG,IAAI,CAAC,MAAM,CAAC,KAAK,CACpC,SAAS,CAAC,KAAK,EACf,WAAW,CACZ,CAAC;wBACF,IAAI,YAAY,CAAC,OAAO,KAAK,KAAK;4BAAE,MAAM,KAAK,CAAC,YAAY,CAAC,KAAK,CAAC,CAAC;wBAEpE,MAAM,UAAU,GAAG,KAAK,CAAC,IAAI,CAAC,MAAM,CAAC,eAAe,CAAC,CAAC;wBACtD,IAAI,UAAU,CAAC,OAAO,KAAK,KAAK;4BAAE,MAAM,KAAK,CAAC,UAAU,CAAC,KAAK,CAAC,CAAC;wBAEhE,MAAM,GAAG,GAAG,IAAI,CAAC,MAAM,CAAC,KAAK,CAAC,UAAU,CAAC,KAAK,EAAE,UAAU,CAAC,CAAC;wBAC5D,IAAI,GAAG,CAAC,OAAO,KAAK,KAAK;4BAAE,MAAM,KAAK,CAAC,GAAG,CAAC,KAAK,CAAC,CAAC;oBACpD,CAAC;gBACH,CAAC;gBACD,IAAI,CAAC,YAAY,CAAC,KAAK,EAAE,CAAC;YAC5B,CAAC;YAAC,OAAO,KAAU,EAAE,CAAC;gBACpB,IAAI,CAAC,MAAM,CAAC,IAAI,CAAC,kBAAkB,YAAY,MAAM,KAAK,CAAC,OAAO,EAAE,CAAC,CAAC;YACxE,CAAC;QACH,CAAC;IACH,CAAC;CACF;AAED,MAAM,OAAO,WAAW;IACd,YAAY,CAA0B;IACtC,MAAM,CAAS;IACf,MAAM,CAAW;IAEzB;QACE,IAAI,CAAC,YAAY,GAAG,IAAI,GAAG,EAAsB,CAAC;QAClD,IAAI,CAAC,MAAM,GAAG,IAAI,MAAM,EAAE,CAAC;QAC3B,IAAI,CAAC,MAAM,GAAG,EAAE,CAAC;IACnB,CAAC;IACD,KAAK,CAAC,GAAQ;QACZ,MAAM,YAAY,GAAG,IAAI,GAAG,EAAgB,CAAC;QAC7C,MAAM,SAAS,GAAG,IAAI,GAAG,EAAgB,CAAC;QAE1C,gCAAgC;QAChC,MAAM,SAAS,GAAG,IAAI,2BAA2B,CAC/C,IAAI,CAAC,MAAM,EACX,YAAY,EACZ,SAAS,EACT,IAAI,CAAC,YAAY,EACjB,IAAI,CAAC,MAAM,CACZ,CAAC;QACF,KAAK,MAAM,IAAI,IAAI,GAAG,EAAE,CAAC;YACvB,IAAI,CAAC;gBACH,IAAI,CAAC,MAAM,CAAC,SAAS,CAAC,CAAC;YACzB,CAAC;YAAC,OAAO,KAAK,EAAE,CAAC;gBACf,IAAI,CAAC,MAAM,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC;YAC1B,CAAC;QACH,CAAC;QAED,IAAI,IAAI,CAAC,MAAM,CAAC,MAAM,GAAG,CAAC;YAAE,OAAO,IAAI,CAAC,MAAM,CAAC;QAE/C,qCAAqC;QACrC,IAAI,CAAC,aAAa,CAAC,GAAG,CAAC,CAAC;QAExB,OAAO,IAAI,CAAC,MAAM,CAAC;IACrB,CAAC;IACD,aAAa,CAAC,GAAQ;QACpB,wCAAwC;QACxC,MAAM,SAAS,GAAG,IAAI,GAAG,CAAqB,IAAI,CAAC,YAAY,CAAC,CAAC;QACjE,MAAM,QAAQ,GAAG,IAAI,wBAAwB,CAC3C,SAAS,EACT,IAAI,CAAC,YAAY,EACjB,IAAI,CAAC,MAAM,CACZ,CAAC;QACF,KAAK,MAAM,IAAI,IAAI,GAAG,EAAE,CAAC;YACvB,IAAI,CAAC,MAAM,CAAC,QAAQ,CAAC,CAAC;QACxB,CAAC;QACD,wCAAwC;QACxC,MAAM,QAAQ,GAAG,IAAI,sBAAsB,CACzC,CAAC,SAAS,CAAC,EACX,IAAI,CAAC,YAAY,EACjB,IAAI,CAAC,MAAM,EACX,IAAI,CAAC,MAAM,CACZ,CAAC;QACF,KAAK,MAAM,IAAI,IAAI,GAAG,EAAE,CAAC;YACvB,IAAI,CAAC,MAAM,CAAC,QAAQ,CAAC,CAAC;QACxB,CAAC;IACH,CAAC;CACF;AAED,MAAM,UAAU,QAAQ,CAAC,CAAO;IAC9B,IAAI,CAAC,CAAC,IAAI,KAAK,SAAS;QAAE,OAAO,CAAC,CAAC,IAAI,IAAI,IAAI,CAAC,CAAC,EAAE,EAAE,CAAC;IAEtD,IAAI,cAAc,CAAC,CAAC,CAAC,EAAE,CAAC;QACtB,MAAM,CAAC,GAAG,QAAQ,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,CAAC;QAC9B,MAAM,CAAC,GAAG,QAAQ,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,CAAC;QAC9B,MAAM,KAAK,GAAG,cAAc,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC;QACvD,OAAO,GAAG,KAAK,OAAO,CAAC,EAAE,CAAC;IAC5B,CAAC;IACD,IAAI,UAAU,CAAC,CAAC,CAAC;QAAE,OAAO,IAAI,QAAQ,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,GAAG,CAAC;IACrD,IAAI,WAAW,CAAC,CAAC,CAAC;QAAE,OAAO,IAAI,CAAC,CAAC,IAAI,CAAC,GAAG,CAAC,QAAQ,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,GAAG,CAAC;IAE7E,OAAO,CAAC,CAAC,IAAI,CAAC,MAAM;QAClB,CAAC,CAAC,GAAG,CAAC,CAAC,IAAI,IAAI,CAAC,CAAC,IAAI,CAAC,GAAG,CAAC,QAAQ,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC,CAAC,IAAI,CAAC,GAAG,CAAC,EAAE;QAC1D,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC;AACb,CAAC;AAED,MAAM,UAAU,aAAa,CAAC,IAAU;IACtC,IAAI,CAAC,GAAS,IAAI,CAAC;IACnB,OAAO,cAAc,CAAC,CAAC,CAAC;QAAE,CAAC,GAAG,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC;IACxC,OAAO,CAAC,CAAC;AACX,CAAC;AACD,MAAM,UAAU,gBAAgB,CAAC,IAAU;IACzC,MAAM,IAAI,GAAW,EAAE,CAAC;IACxB,IAAI,CAAC,GAAS,IAAI,CAAC;IACnB,OAAO,cAAc,CAAC,CAAC,CAAC,EAAE,CAAC;QACzB,IAAI,CAAC,IAAI,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,CAAC;QACrB,CAAC,GAAG,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC;IAChB,CAAC;IACD,OAAO,IAAI,CAAC;AACd,CAAC;AACD,MAAM,UAAU,QAAQ,CAAC,IAAU;IACjC,OAAO,gBAAgB,CAAC,IAAI,CAAC,CAAC,MAAM,CAAC;AACvC,CAAC;AAED,MAAM,UAAU,eAAe,CAC7B,IAAmC;IAEnC,OAAO,CAAC,KAAK,CAAC,OAAO,CAAC,IAAI,CAAC,CAAC;AAC9B,CAAC;AAED,MAAM,UAAU,cAAc,CAAC,CAAO;IACpC,OAAO,CAAC,CAAC,IAAI,KAAK,iBAAiB,IAAI,CAAC,CAAC,IAAI,KAAK,IAAI,IAAI,CAAC,CAAC,IAAI,CAAC,MAAM,KAAK,CAAC,CAAC;AAChF,CAAC;AACD,MAAM,UAAU,UAAU,CAAC,CAAO;IAChC,OAAO,CAAC,CAAC,IAAI,KAAK,MAAM,CAAC;AAC3B,CAAC;AACD,MAAM,UAAU,WAAW,CAAC,CAAO;IACjC,OAAO,CAAC,CAAC,IAAI,KAAK,OAAO,CAAC;AAC5B,CAAC;AAED,MAAM,UAAU,YAAY,CAAC,MAAY,EAAE,UAAgB;IACzD,OAAO;QACL,IAAI,EAAE,iBAAiB;QACvB,IAAI,EAAE,IAAI;QACV,IAAI,EAAE,CAAC,MAAM,EAAE,UAAU,CAAC;KAC3B,CAAC;AACJ,CAAC;AACD,MAAM,UAAU,QAAQ,CAAC,YAAkB;IACzC,OAAO;QACL,IAAI,EAAE,iBAAiB;QACvB,IAAI,EAAE,MAAM;QACZ,IAAI,EAAE,CAAC,YAAY,CAAC;KACrB,CAAC;AACJ,CAAC"}
1
+ {"version":3,"file":"checker.js","sourceRoot":"","sources":["../../src/typechecker/checker.ts"],"names":[],"mappings":"AAAA,OAAO,EAEL,QAAQ,EAER,MAAM,EACN,eAAe,EACf,QAAQ,GAKT,MAAM,YAAY,CAAC;AACpB,OAAO,EAAE,eAAe,EAAE,cAAc,EAAE,MAAM,gBAAgB,CAAC;AACjE,OAAO,EAAE,MAAM,EAAE,MAAM,WAAW,CAAC;AACnC,OAAO,EAAE,2BAA2B,EAAE,MAAM,2BAA2B,CAAC;AACxE,OAAO,EAAE,WAAW,IAAI,iBAAiB,EAAE,MAAM,mBAAmB,CAAC;AA+CrE,MAAM,CAAC,MAAM,WAAW,GAAoB;IAC1C,IAAI,EAAE,iBAAiB;IACvB,IAAI,EAAE,WAAW;IACjB,IAAI,EAAE,EAAE;CACT,CAAC;AACF,MAAM,CAAC,MAAM,UAAU,GAAoB;IACzC,IAAI,EAAE,iBAAiB;IACvB,IAAI,EAAE,UAAU;IAChB,IAAI,EAAE,EAAE;CACT,CAAC;AACF,MAAM,CAAC,MAAM,QAAQ,GAAoB;IACvC,IAAI,EAAE,iBAAiB;IACvB,IAAI,EAAE,QAAQ;IACd,IAAI,EAAE,EAAE;CACT,CAAC;AACF,MAAM,CAAC,MAAM,UAAU,GAAS,QAAQ,CAAC,QAAQ,CAAC,CAAC;AAEnD,MAAM,OAAO,wBAAwB;IAEzB;IACA;IACA;IAHV,YACU,GAAgB,EAChB,YAAqC,EACrC,MAAc;QAFd,QAAG,GAAH,GAAG,CAAa;QAChB,iBAAY,GAAZ,YAAY,CAAyB;QACrC,WAAM,GAAN,MAAM,CAAQ;IACrB,CAAC;IACJ,aAAa,CAAC,IAAc;QAC1B,IAAI,CAAC,UAAU,CAAC,OAAO,CAAC,CAAC,IAAI,EAAE,EAAE,CAAC,IAAI,CAAC,MAAM,CAAC,IAAI,CAAC,CAAC,CAAC;IACvD,CAAC;IACD,aAAa,CAAC,IAAc;QAC1B,MAAM,YAAY,GAAG,IAAI,CAAC,UAAU,CAAC,KAAK,CAAC;QAC3C,IAAI,UAAU,GAAG,IAAI,CAAC,YAAY,CAAC,GAAG,CAAC,YAAY,CAAC,CAAC;QACrD,IAAI,CAAC,UAAU,EAAE,CAAC;YAChB,MAAM,WAAW,GAAG,IAAI,CAAC,MAAM,CAAC,QAAQ,EAAE,CAAC;YAC3C,UAAU,GAAG;gBACX,IAAI,EAAE,YAAY;gBAClB,WAAW,EAAE,EAAE;gBACf,IAAI,EAAE,WAAW;gBACjB,WAAW,EAAE,IAAI,GAAG,EAAE;aACvB,CAAC;YACF,IAAI,CAAC,GAAG,CAAC,GAAG,CAAC,YAAY,EAAE,UAAU,CAAC,CAAC;QACzC,CAAC;QACD,KAAK,MAAM,QAAQ,IAAI,IAAI,CAAC,SAAS,EAAE,CAAC;YACtC,IAAI,eAAe,CAAC,QAAQ,CAAC,IAAI,CAAC,EAAE,CAAC;gBACnC,MAAM,UAAU,GAAG,QAAQ,CAAC,IAAI,CAAC,QAAQ,CAAC,UAAU,CAAC;gBACrD,UAAU;qBACP,MAAM,CAAC,CAAC,IAAI,EAAE,EAAE,CAAC,IAAI,YAAY,QAAQ,CAAC;qBAC1C,OAAO,CAAC,CAAC,IAAI,EAAE,EAAE;oBAChB,IAAI,CAAC,GAAG,CAAC,GAAG,CAAC,IAAI,CAAC,UAAU,CAAC,KAAK,EAAE,UAAU,CAAC,CAAC;gBAClD,CAAC,CAAC,CAAC;YACP,CAAC;iBAAM,CAAC;gBACN,KAAK,MAAM,KAAK,IAAI,QAAQ,CAAC,IAAI,EAAE,CAAC;oBAClC,KAAK,CAAC,IAAI,CAAC,MAAM,CAAC,IAAI,CAAC,CAAC;gBAC1B,CAAC;YACH,CAAC;QACH,CAAC;IACH,CAAC;IACD,cAAc,CAAC,IAAe;QAC5B,IAAI,CAAC,KAAK,CAAC,MAAM,CAAC,IAAI,CAAC,CAAC;IAC1B,CAAC;IACD,SAAS,CAAC,IAAU;QAClB,IAAI,CAAC,IAAI,CAAC,MAAM,CAAC,IAAI,CAAC,CAAC;IACzB,CAAC;IACD,WAAW,CAAC,IAAY,IAAS,CAAC;CACnC;AACD,MAAM,OAAO,sBAAsB;IAEvB;IACA;IACA;IACA;IAJV,YACU,YAA2B,EAC3B,YAAqC,EACrC,MAAc,EACd,MAAgB;QAHhB,iBAAY,GAAZ,YAAY,CAAe;QAC3B,iBAAY,GAAZ,YAAY,CAAyB;QACrC,WAAM,GAAN,MAAM,CAAQ;QACd,WAAM,GAAN,MAAM,CAAU;IACvB,CAAC;IACJ,cAAc,CAAC,IAAe;QAC5B,IAAI,CAAC,KAAK,CAAC,MAAM,CAAC,IAAI,CAAC,CAAC;IAC1B,CAAC;IACD,SAAS,CAAC,IAAU;QAClB,IAAI,CAAC,IAAI,CAAC,MAAM,CAAC,IAAI,CAAC,CAAC;IACzB,CAAC;IACD,WAAW,CAAC,IAAY;QACtB,MAAM,eAAe,GAAG,IAAI,eAAe,CACzC,IAAI,CAAC,YAAY,EACjB,IAAI,CAAC,MAAM,EACX,IAAI,CAAC,YAAY,CAClB,CAAC;QACF,IAAI,CAAC,IAAI,CAAC,MAAM,CAAC,eAAe,CAAC,CAAC;IACpC,CAAC;IACD,aAAa,CAAC,IAAc;QAC1B,MAAM,YAAY,GAAG,IAAI,CAAC,UAAU,CAAC,KAAK,CAAC;QAC3C,IAAI,UAAU,GAAG,IAAI,CAAC,YAAY,CAAC,GAAG,CAAC,YAAY,CAAC,CAAC;QACrD,oCAAoC;QACpC,IAAI,CAAC,UAAU,EAAE,CAAC;YAChB,MAAM,OAAO,GAAG,IAAI,CAAC,SAAS,CAAC,CAAC,CAAC,CAAC;YAClC,IAAI,CAAC,YAAY,CAAC,OAAO,CAAC,IAAI,GAAG,EAAE,CAAC,CAAC;YACrC,MAAM,eAAe,GAAG,IAAI,eAAe,CACzC,IAAI,CAAC,YAAY,EACjB,IAAI,CAAC,MAAM,EACX,IAAI,CAAC,YAAY,CAClB,CAAC;YACF,MAAM,UAAU,GAAG,OAAO,CAAC,QAAQ,CAAC,GAAG,CAAC,GAAG,EAAE,CAAC,IAAI,CAAC,MAAM,CAAC,QAAQ,EAAE,CAAC,CAAC;YAEtE,UAAU,CAAC,OAAO,CAAC,CAAC,IAAI,EAAE,CAAC,EAAE,EAAE;gBAC7B,IAAI,CAAC;oBACH,IAAI,cAAc,CAChB,IAAI,CAAC,MAAM,EACX,IAAI,CAAC,YAAY,EACjB,IAAI,EACJ,IAAI,CAAC,YAAY,EACjB,eAAe,CAChB,CAAC,KAAK,CAAC,OAAO,CAAC,QAAQ,CAAC,CAAC,CAAC,CAAC,CAAC;gBAC/B,CAAC;gBAAC,OAAO,KAAK,EAAE,CAAC;oBACf,IAAI,CAAC,MAAM,CAAC,IAAI,CAAC,kBAAkB,YAAY,MAAM,KAAK,CAAC,OAAO,EAAE,CAAC,CAAC;gBACxE,CAAC;YACH,CAAC,CAAC,CAAC;YAEH,IAAI,gBAAsB,CAAC;YAC3B,IAAI,eAAe,CAAC,OAAO,CAAC,IAAI,CAAC,EAAE,CAAC;gBAClC,MAAM,kBAAkB,GAAG,OAAO,CAAC,IAAI,CAAC,QAAQ,CAAC,UAAU,CAAC;gBAC5D,kBAAkB,CAAC,OAAO,CAAC,CAAC,IAAI,EAAE,EAAE,CAClC,IAAI,CAAC,MAAM,CACT,IAAI,sBAAsB,CACxB,IAAI,CAAC,YAAY,EACjB,IAAI,CAAC,YAAY,EACjB,IAAI,CAAC,MAAM,EACX,IAAI,CAAC,MAAM,CACZ,CACF,CACF,CAAC;gBACF,MAAM,YAAY,GAAG,kBAAkB;qBACpC,IAAI,CAAC,CAAC,IAAI,EAAE,EAAE,CAAC,IAAI,YAAY,MAAM,CAAC;qBACtC,MAAM,CAAC,eAAe,CAAC,CAAC;gBAC3B,IAAI,YAAY,CAAC,OAAO,KAAK,KAAK,EAAE,CAAC;oBACnC,IAAI,CAAC,MAAM,CAAC,IAAI,CACd,kBAAkB,YAAY,MAAM,YAAY,CAAC,KAAK,EAAE,CACzD,CAAC;oBACF,OAAO;gBACT,CAAC;gBACD,gBAAgB,GAAG,YAAY,CAAC,KAAK,CAAC;YACxC,CAAC;iBAAM,CAAC;gBACN,6CAA6C;gBAC7C,gBAAgB,GAAG,IAAI,CAAC,MAAM,CAAC,QAAQ,EAAE,CAAC,CAAC,cAAc;YAC3D,CAAC;YAED,MAAM,YAAY,GAAG,UAAU,CAAC,WAAW,CACzC,CAAC,GAAG,EAAE,KAAK,EAAE,EAAE,CAAC,YAAY,CAAC,KAAK,EAAE,GAAG,CAAC,EACxC,gBAAgB,CACjB,CAAC;YAEF,mEAAmE;YACnE,IAAI,CAAC,YAAY,CAAC,KAAK,EAAE,CAAC;YAC1B,UAAU,GAAG,IAAI,CAAC,MAAM,CAAC,UAAU,CAAC,IAAI,CAAC,YAAY,CAAC,CAAC,CAAC,EAAE,YAAY,CAAC,CAAC;YACxE,IAAI,CAAC,YAAY,CAAC,GAAG,CAAC,YAAY,EAAE,UAAU,CAAC,CAAC;YAChD,IAAI,CAAC,YAAY,CAAC,CAAC,CAAC,CAAC,GAAG,CAAC,YAAY,EAAE,UAAU,CAAC,CAAC;QACrD,CAAC;QAED,MAAM,aAAa,GAAG,QAAQ,CAAC,IAAI,CAAC,MAAM,CAAC,WAAW,CAAC,UAAU,CAAC,CAAC,CAAC;QACpE,KAAK,MAAM,CAAC,KAAK,EAAE,QAAQ,CAAC,IAAI,IAAI,CAAC,SAAS,CAAC,OAAO,EAAE,EAAE,CAAC;YACzD,IAAI,QAAQ,CAAC,QAAQ,CAAC,MAAM,GAAG,aAAa,EAAE,CAAC;gBAC7C,IAAI,CAAC,MAAM,CAAC,IAAI,CACd,kBAAkB,YAAY,sCAAsC,KAAK,kBAAkB,aAAa,SAAS,QAAQ,CAAC,QAAQ,CAAC,MAAM,EAAE,CAC5I,CAAC;gBACF,SAAS;YACX,CAAC;YACD,IAAI,CAAC;gBACH,MAAM,QAAQ,GAAG,IAAI,CAAC,MAAM,CAAC,WAAW,CAAC,UAAU,CAAC,CAAC;gBAErD,2EAA2E;gBAC3E,8EAA8E;gBAC9E,IAAI,gBAAgB,GAAG,QAAQ,CAAC;gBAEhC,6EAA6E;gBAC7E,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,QAAQ,CAAC,QAAQ,CAAC,MAAM,EAAE,CAAC,EAAE,EAAE,CAAC;oBAClD,IAAI,cAAc,CAAC,gBAAgB,CAAC,EAAE,CAAC;wBACrC,gBAAgB,GAAG,gBAAgB,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC;oBAC9C,CAAC;gBACH,CAAC;gBACD,MAAM,YAAY,GAAG,gBAAgB,CAAC,QAAQ,CAAC,CAAC;gBAEhD,IAAI,CAAC,YAAY,CAAC,OAAO,CAAC,IAAI,GAAG,EAAE,CAAC,CAAC;gBACrC,MAAM,eAAe,GAAG,IAAI,eAAe,CACzC,IAAI,CAAC,YAAY,EACjB,IAAI,CAAC,MAAM,EACX,IAAI,CAAC,YAAY,CAClB,CAAC;gBACF,QAAQ,CAAC,QAAQ,CAAC,OAAO,CAAC,CAAC,OAAO,EAAE,CAAC,EAAE,EAAE;oBACvC,MAAM,OAAO,GAAG,YAAY,CAAC,CAAC,CAAC,CAAC,CAAC,wCAAwC;oBACzE,IAAI,CAAC;wBACH,OAAO,CAAC,MAAM,CACZ,IAAI,cAAc,CAChB,IAAI,CAAC,MAAM,EACX,IAAI,CAAC,YAAY,EACjB,OAAO,EACP,IAAI,CAAC,YAAY,EACjB,eAAe,CAChB,CACF,CAAC;oBACJ,CAAC;oBAAC,OAAO,KAAK,EAAE,CAAC;wBACf,IAAI,CAAC,MAAM,CAAC,IAAI,CACd,kBAAkB,YAAY,MAAM,KAAK,CAAC,OAAO,EAAE,CACpD,CAAC;oBACJ,CAAC;gBACH,CAAC,CAAC,CAAC;gBACH,IAAI,eAAe,CAAC,QAAQ,CAAC,IAAI,CAAC,EAAE,CAAC;oBACnC,MAAM,kBAAkB,GAAG,QAAQ,CAAC,IAAI,CAAC,QAAQ,CAAC,UAAU,CAAC;oBAC7D,kBAAkB,CAAC,OAAO,CAAC,CAAC,IAAI,EAAE,EAAE,CAClC,IAAI,CAAC,MAAM,CACT,IAAI,sBAAsB,CACxB,IAAI,CAAC,YAAY,EACjB,IAAI,CAAC,YAAY,EACjB,IAAI,CAAC,MAAM,EACX,IAAI,CAAC,MAAM,CACZ,CACF,CACF,CAAC;oBACF,MAAM,YAAY,GAAG,kBAAkB;yBACpC,IAAI,CAAC,CAAC,IAAI,EAAE,EAAE,CAAC,IAAI,YAAY,MAAM,CAAC;yBACtC,MAAM,CAAC,eAAe,CAAC,CAAC;oBAC3B,IAAI,YAAY,CAAC,OAAO,KAAK,KAAK,EAAE,CAAC;wBACnC,IAAI,CAAC,MAAM,CAAC,IAAI,CACd,kBAAkB,YAAY,MAAM,YAAY,CAAC,KAAK,EAAE,CACzD,CAAC;wBACF,OAAO;oBACT,CAAC;oBAED,MAAM,GAAG,GAAG,IAAI,CAAC,MAAM,CAAC,KAAK,CAAC,YAAY,CAAC,KAAK,EAAE,gBAAgB,CAAC,CAAC;oBACpE,IAAI,GAAG,CAAC,OAAO,KAAK,KAAK;wBAAE,MAAM,KAAK,CAAC,GAAG,CAAC,KAAK,CAAC,CAAC;gBACpD,CAAC;qBAAM,CAAC;oBACN,2BAA2B;oBAC3B,KAAK,MAAM,KAAK,IAAI,QAAQ,CAAC,IAAI,EAAE,CAAC;wBAClC,qEAAqE;wBACrE,MAAM,SAAS,GAAG,KAAK,CAAC,SAAS,CAAC,MAAM,CAAC,eAAe,CAAC,CAAC;wBAC1D,IAAI,SAAS,CAAC,OAAO,KAAK,KAAK;4BAAE,MAAM,KAAK,CAAC,SAAS,CAAC,KAAK,CAAC,CAAC;wBAE9D,MAAM,YAAY,GAAG,IAAI,CAAC,MAAM,CAAC,KAAK,CACpC,SAAS,CAAC,KAAK,EACf,WAAW,CACZ,CAAC;wBACF,IAAI,YAAY,CAAC,OAAO,KAAK,KAAK;4BAAE,MAAM,KAAK,CAAC,YAAY,CAAC,KAAK,CAAC,CAAC;wBACpE,IAAI,IAAI,GAAG,KAAK,CAAC,IAAI,CAAC;wBACtB,IAAI,KAAK,CAAC,IAAI,YAAY,QAAQ,EAAE,CAAC;4BACnC,IAAI,GAAG,KAAK,CAAC,IAAI,CAAC,UAAU,CAAC,IAAI,CAC/B,CAAC,IAAI,EAAE,EAAE,CAAC,IAAI,YAAY,MAAM,CACjC,CAAC;wBACJ,CAAC;wBACD,MAAM,UAAU,GAAG,IAAI,CAAC,MAAM,CAAC,eAAe,CAAC,CAAC;wBAChD,IAAI,UAAU,CAAC,OAAO,KAAK,KAAK;4BAAE,MAAM,KAAK,CAAC,UAAU,CAAC,KAAK,CAAC,CAAC;wBAChE,MAAM,GAAG,GAAG,IAAI,CAAC,MAAM,CAAC,KAAK,CAAC,UAAU,CAAC,KAAK,EAAE,gBAAgB,CAAC,CAAC;wBAClE,IAAI,GAAG,CAAC,OAAO,KAAK,KAAK;4BAAE,MAAM,KAAK,CAAC,GAAG,CAAC,KAAK,CAAC,CAAC;oBACpD,CAAC;gBACH,CAAC;gBACD,IAAI,CAAC,YAAY,CAAC,KAAK,EAAE,CAAC;YAC5B,CAAC;YAAC,OAAO,KAAU,EAAE,CAAC;gBACpB,IAAI,CAAC,MAAM,CAAC,IAAI,CAAC,kBAAkB,YAAY,MAAM,KAAK,CAAC,OAAO,EAAE,CAAC,CAAC;YACxE,CAAC;QACH,CAAC;IACH,CAAC;CACF;AAED,MAAM,OAAO,WAAW;IACd,YAAY,CAA0B;IACtC,MAAM,CAAS;IACf,MAAM,CAAW;IAEzB;QACE,IAAI,CAAC,YAAY,GAAG,IAAI,GAAG,EAAsB,CAAC;QAClD,IAAI,CAAC,MAAM,GAAG,EAAE,CAAC;IACnB,CAAC;IACD,KAAK,CAAC,GAAQ;QACZ,MAAM,YAAY,GAAG,IAAI,GAAG,EAAgB,CAAC;QAC7C,IAAI,CAAC,MAAM,GAAG,IAAI,MAAM,CAAC,YAAY,EAAE,IAAI,GAAG,CAAC,iBAAiB,CAAC,CAAC,CAAC;QACnE,MAAM,SAAS,GAAG,IAAI,GAAG,EAAgB,CAAC;QAE1C,gCAAgC;QAChC,MAAM,SAAS,GAAG,IAAI,2BAA2B,CAC/C,IAAI,CAAC,MAAM,EACX,YAAY,EACZ,SAAS,EACT,IAAI,CAAC,YAAY,EACjB,IAAI,CAAC,MAAM,CACZ,CAAC;QACF,KAAK,MAAM,IAAI,IAAI,GAAG,EAAE,CAAC;YACvB,IAAI,CAAC;gBACH,IAAI,CAAC,MAAM,CAAC,SAAS,CAAC,CAAC;YACzB,CAAC;YAAC,OAAO,KAAK,EAAE,CAAC;gBACf,IAAI,CAAC,MAAM,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC;YAC1B,CAAC;QACH,CAAC;QAED,IAAI,IAAI,CAAC,MAAM,CAAC,MAAM,GAAG,CAAC;YAAE,OAAO,IAAI,CAAC,MAAM,CAAC;QAE/C,qCAAqC;QACrC,IAAI,CAAC,aAAa,CAAC,GAAG,CAAC,CAAC;QAExB,OAAO,IAAI,CAAC,MAAM,CAAC;IACrB,CAAC;IACM,eAAe,CAAC,IAAa;QAClC,IAAI,CAAC,IAAI,CAAC,MAAM,IAAI,CAAC,IAAI,CAAC,YAAY;YACpC,MAAM,IAAI,KAAK,CAAC,8BAA8B,CAAC,CAAC;QAElD,MAAM,SAAS,GAAG,IAAI,GAAG,CAAqB,IAAI,CAAC,YAAY,CAAC,CAAC;QACjE,MAAM,eAAe,GAAG,IAAI,eAAe,CACzC,IAAI,CAAC,YAAY,EACjB,IAAI,CAAC,MAAM,EACX,CAAC,SAAS,CAAC,CACZ,CAAC;QACF,MAAM,MAAM,GAAG,IAAI,CAAC,MAAM,CAAC,eAAe,CAAC,CAAC;QAC5C,IAAI,MAAM,CAAC,OAAO,KAAK,KAAK;YAAE,MAAM,IAAI,KAAK,CAAC,MAAM,CAAC,KAAK,CAAC,CAAC;QAE5D,OAAO,QAAQ,CAAC,MAAM,CAAC,KAAK,CAAC,CAAC;IAChC,CAAC;IACM,eAAe;QACpB,OAAO,KAAK,CAAC,IAAI,CAAC,IAAI,CAAC,YAAY,CAAC,IAAI,EAAE,CAAC,CAAC;IAC9C,CAAC;IACD,aAAa,CAAC,GAAQ;QACpB,wCAAwC;QACxC,MAAM,SAAS,GAAG,IAAI,GAAG,CAAqB,IAAI,CAAC,YAAY,CAAC,CAAC;QACjE,MAAM,QAAQ,GAAG,IAAI,wBAAwB,CAC3C,SAAS,EACT,IAAI,CAAC,YAAY,EACjB,IAAI,CAAC,MAAM,CACZ,CAAC;QACF,KAAK,MAAM,IAAI,IAAI,GAAG,EAAE,CAAC;YACvB,IAAI,CAAC,MAAM,CAAC,QAAQ,CAAC,CAAC;QACxB,CAAC;QACD,wCAAwC;QACxC,MAAM,QAAQ,GAAG,IAAI,sBAAsB,CACzC,CAAC,SAAS,CAAC,EACX,IAAI,CAAC,YAAY,EACjB,IAAI,CAAC,MAAM,EACX,IAAI,CAAC,MAAM,CACZ,CAAC;QACF,KAAK,MAAM,IAAI,IAAI,GAAG,EAAE,CAAC;YACvB,IAAI,CAAC,MAAM,CAAC,QAAQ,CAAC,CAAC;QACxB,CAAC;IACH,CAAC;CACF;AAGD,MAAM,SAAS,GAAG;IAChB,QAAQ,EAAE,UAAU;IACpB,QAAQ,EAAE,UAAU;IACpB,SAAS,EAAE,WAAW;IACtB,MAAM,EAAE,QAAQ;CACjB,CAAC;AACF,MAAM,UAAU,GAAG,CACjB,EAAU,EACV,IAAwB,EACxB,IAAmB,EACX,EAAE;IACV,IAAI,IAAI;QAAE,OAAO,IAAI,CAAC;IACtB,IAAI,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC;QAAE,OAAO,IAAI,CAAC,GAAG,CAAC,EAAE,CAAE,CAAC;IAEvC,MAAM,KAAK,GAAG,IAAI,CAAC,IAAI,CAAC;IACxB,MAAM,MAAM,GAAG,MAAM,CAAC,YAAY,CAAC,EAAE,GAAG,CAAC,KAAK,GAAG,EAAE,CAAC,CAAC,CAAC;IACtD,MAAM,MAAM,GAAG,KAAK,IAAI,EAAE,CAAC,CAAC,CAAC,IAAI,CAAC,KAAK,CAAC,KAAK,GAAG,EAAE,CAAC,CAAC,QAAQ,EAAE,CAAC,CAAC,CAAC,EAAE,CAAC;IACpE,MAAM,aAAa,GAAG,GAAG,MAAM,GAAG,MAAM,EAAE,CAAC;IAE3C,IAAI,CAAC,GAAG,CAAC,EAAE,EAAE,aAAa,CAAC,CAAC;IAC5B,OAAO,aAAa,CAAC;AACvB,CAAC,CAAC;AACF,MAAM,eAAe,GAAG,CAAC,CAAO,EAAa,EAAE,CAC7C,CAAC,CAAC,IAAI,KAAK,SAAS,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,OAAO,CAAC,eAAe,CAAC,CAAC;AAC/D,MAAM,UAAU,GAAG,CAAC,CAAO,EAAE,IAAmB,EAAU,EAAE;IAC1D,IAAI,CAAC,CAAC,IAAI,KAAK,SAAS;QAAE,OAAO,UAAU,CAAC,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,IAAI,EAAE,IAAI,CAAC,CAAC;IAEhE,IAAI,cAAc,CAAC,CAAC,CAAC,EAAE,CAAC;QACtB,MAAM,IAAI,GAAG,UAAU,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,EAAE,IAAI,CAAC,CAAC;QACzC,MAAM,KAAK,GAAG,UAAU,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,EAAE,IAAI,CAAC,CAAC;QAC1C,OAAO,cAAc,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC;YAC9B,CAAC,CAAC,IAAI,IAAI,QAAQ,KAAK,EAAE;YACzB,CAAC,CAAC,GAAG,IAAI,OAAO,KAAK,EAAE,CAAC;IAC5B,CAAC;IACD,IAAI,UAAU,CAAC,CAAC,CAAC,EAAE,CAAC;QAClB,IAAI,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,IAAI,KAAK,iBAAiB,IAAI,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,IAAI,KAAK,QAAQ,EAAE,CAAC;YACxE,OAAO,UAAU,CAAC;QACpB,CAAC;QACD,OAAO,IAAI,QAAQ,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,GAAG,CAAC;IACpC,CAAC;IACD,IAAI,WAAW,CAAC,CAAC,CAAC;QAAE,OAAO,IAAI,CAAC,CAAC,IAAI,CAAC,GAAG,CAAC,QAAQ,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,GAAG,CAAC;IAE7E,MAAM,IAAI,GAAG,SAAS,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC,IAAI,CAAC;IACzC,OAAO,CAAC,CAAC,IAAI,CAAC,MAAM;QAClB,CAAC,CAAC,GAAG,IAAI,IAAI,CAAC,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC,CAAC,EAAE,EAAE,CAAC,UAAU,CAAC,CAAC,EAAE,IAAI,CAAC,CAAC,CAAC,IAAI,CAAC,GAAG,CAAC,EAAE;QAC/D,CAAC,CAAC,IAAI,CAAC;AACX,CAAC,CAAC;AAEF,MAAM,UAAU,QAAQ,CAAC,CAAO,EAAE,OAAsB,IAAI,GAAG,EAAE;IAC/D,MAAM,OAAO,GAAG,UAAU,CAAC,CAAC,EAAE,IAAI,CAAC,CAAC;IACpC,MAAM,WAAW,GAAG,KAAK,CAAC,IAAI,CAC5B,IAAI,GAAG,CACL,eAAe,CAAC,CAAC,CAAC,CAAC,OAAO,CAAC,CAAC,EAAE,WAAW,EAAE,EAAE,EAAE,IAAI,EAAE,EAAE,EAAE,CACvD,WAAW,CAAC,GAAG,CAAC,CAAC,CAAC,EAAE,EAAE,CAAC,GAAG,CAAC,IAAI,UAAU,CAAC,EAAE,EAAE,IAAI,EAAE,IAAI,CAAC,EAAE,CAAC,CAC7D,CACF,CACF,CAAC;IACF,IAAI,WAAW,CAAC,MAAM,KAAK,CAAC;QAAE,OAAO,OAAO,CAAC;IAC7C,MAAM,OAAO,GACX,WAAW,CAAC,MAAM,KAAK,CAAC,CAAC,CAAC,CAAC,WAAW,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,IAAI,WAAW,CAAC,IAAI,CAAC,IAAI,CAAC,GAAG,CAAC;IAC5E,OAAO,GAAG,OAAO,OAAO,OAAO,EAAE,CAAC;AACpC,CAAC;AAED,MAAM,UAAU,aAAa,CAAC,IAAU;IACtC,IAAI,CAAC,GAAS,IAAI,CAAC;IACnB,OAAO,cAAc,CAAC,CAAC,CAAC;QAAE,CAAC,GAAG,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC;IACxC,OAAO,CAAC,CAAC;AACX,CAAC;AACD,MAAM,UAAU,gBAAgB,CAAC,IAAU;IACzC,MAAM,IAAI,GAAW,EAAE,CAAC;IACxB,IAAI,CAAC,GAAS,IAAI,CAAC;IACnB,OAAO,cAAc,CAAC,CAAC,CAAC,EAAE,CAAC;QACzB,IAAI,CAAC,IAAI,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,CAAC;QACrB,CAAC,GAAG,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC;IAChB,CAAC;IACD,OAAO,IAAI,CAAC;AACd,CAAC;AACD,MAAM,UAAU,QAAQ,CAAC,IAAU;IACjC,OAAO,gBAAgB,CAAC,IAAI,CAAC,CAAC,MAAM,CAAC;AACvC,CAAC;AAED,MAAM,UAAU,cAAc,CAAC,CAAO;IACpC,OAAO,CAAC,CAAC,IAAI,KAAK,iBAAiB,IAAI,CAAC,CAAC,IAAI,KAAK,IAAI,IAAI,CAAC,CAAC,IAAI,CAAC,MAAM,KAAK,CAAC,CAAC;AAChF,CAAC;AACD,MAAM,UAAU,UAAU,CAAC,CAAO;IAChC,OAAO,CAAC,CAAC,IAAI,KAAK,MAAM,CAAC;AAC3B,CAAC;AACD,MAAM,UAAU,WAAW,CAAC,CAAO;IACjC,OAAO,CAAC,CAAC,IAAI,KAAK,OAAO,CAAC;AAC5B,CAAC;AAED,MAAM,UAAU,YAAY,CAAC,MAAY,EAAE,UAAgB;IACzD,OAAO;QACL,IAAI,EAAE,iBAAiB;QACvB,IAAI,EAAE,IAAI;QACV,IAAI,EAAE,CAAC,MAAM,EAAE,UAAU,CAAC;KAC3B,CAAC;AACJ,CAAC;AACD,MAAM,UAAU,QAAQ,CAAC,YAAkB;IACzC,OAAO;QACL,IAAI,EAAE,iBAAiB;QACvB,IAAI,EAAE,MAAM;QACZ,IAAI,EAAE,CAAC,YAAY,CAAC;KACrB,CAAC;AACJ,CAAC"}
@@ -1,6 +1,10 @@
1
1
  import { Environment, Result, Substitution, Type, TypeConstructor, TypeScheme, TypeVar } from "./checker.js";
2
2
  export declare class CoreHM {
3
+ private aliases;
4
+ typeClasses: Map<string, string[]>;
3
5
  private nextVarId;
6
+ constructor(aliases?: Map<string, Type>, typeClasses?: Map<string, string[]>);
7
+ resolve(t: Type): Type;
4
8
  freshVar(constraints?: string[]): TypeVar;
5
9
  freeTypeVars(t: Type): Map<number, string[]>;
6
10
  generalize(env: Environment, t: Type): TypeScheme;
@@ -1,7 +1,17 @@
1
- import { typeClasses } from "../utils/types.js";
2
- import { showType, } from "./checker.js";
1
+ import { charType, showType, } from "./checker.js";
3
2
  export class CoreHM {
3
+ aliases;
4
+ typeClasses;
4
5
  nextVarId = 0;
6
+ constructor(aliases = new Map(), typeClasses = new Map()) {
7
+ this.aliases = aliases;
8
+ this.typeClasses = typeClasses;
9
+ }
10
+ resolve(t) {
11
+ if (t.type === "TypeConstructor" && this.aliases.has(t.name))
12
+ return this.resolve(this.aliases.get(t.name));
13
+ return t;
14
+ }
5
15
  freshVar(constraints = []) {
6
16
  return { type: "TypeVar", id: this.nextVarId++, constraints };
7
17
  }
@@ -71,21 +81,29 @@ export class CoreHM {
71
81
  return result;
72
82
  }
73
83
  unify(t1, t2) {
74
- if (t1.type === "TypeVar")
75
- return this.unifyVar(t1, t2);
76
- if (t2.type === "TypeVar")
77
- return this.unifyVar(t2, t1);
78
- if (t1.type === "TypeConstructor" && t2.type === "TypeConstructor") {
79
- if (t1.name !== t2.name || t1.args.length !== t2.args.length) {
84
+ const rt1 = this.resolve(t1);
85
+ const rt2 = this.resolve(t2);
86
+ if (rt1.type === "TypeVar")
87
+ return this.unifyVar(rt1, rt2);
88
+ if (rt2.type === "TypeVar")
89
+ return this.unifyVar(rt2, rt1);
90
+ if (rt1.type === "TypeConstructor" && rt2.type === "TypeConstructor") {
91
+ const isStringList = (a, b) => (a.name === "YuString" && b.name === "List") ||
92
+ (b.name === "YuString" && a.name === "List");
93
+ if (isStringList(rt1, rt2)) {
94
+ const listType = rt1.name === "List" ? rt1 : rt2;
95
+ return this.unify(listType.args[0], charType);
96
+ }
97
+ if (rt1.name !== rt2.name || rt1.args.length !== rt2.args.length) {
80
98
  return {
81
99
  success: false,
82
- error: `Cannot unify ${showType(t1)} with ${showType(t2)}`,
100
+ error: `Cannot unify ${showType(rt1)} with ${showType(rt2)}`,
83
101
  };
84
102
  }
85
103
  let sub = new Map();
86
- for (let i = 0; i < t1.args.length; i++) {
87
- const arg1 = this.applySubst(sub, t1.args[i]);
88
- const arg2 = this.applySubst(sub, t2.args[i]);
104
+ for (let i = 0; i < rt1.args.length; i++) {
105
+ const arg1 = this.applySubst(sub, rt1.args[i]);
106
+ const arg2 = this.applySubst(sub, rt2.args[i]);
89
107
  const argSubRes = this.unify(arg1, arg2);
90
108
  if (!argSubRes.success)
91
109
  return argSubRes;
@@ -119,15 +137,23 @@ export class CoreHM {
119
137
  return { success: true, value: new Map([[v.id, t]]) };
120
138
  }
121
139
  checkConstraint(constraintName, t) {
122
- if (t.type === "TypeVar") {
123
- if (!t.constraints.includes(constraintName)) {
124
- t.constraints.push(constraintName);
140
+ const rt = this.resolve(t);
141
+ if (rt.type === "TypeVar") {
142
+ if (!rt.constraints.includes(constraintName)) {
143
+ rt.constraints.push(constraintName);
125
144
  }
126
145
  }
127
- else if (t.type === "TypeConstructor") {
128
- const instances = typeClasses.get(constraintName);
129
- if (!instances || !instances.includes(t.name)) {
130
- throw new Error(`Type '${showType(t)}' is not an instance of '${constraintName}'`);
146
+ else if (rt.type === "TypeConstructor") {
147
+ let typeName = rt.name;
148
+ if (typeName === "List" &&
149
+ rt.args.length === 1 &&
150
+ rt.args[0].type === "TypeConstructor" &&
151
+ rt.args[0].name === "YuChar") {
152
+ typeName = "YuString";
153
+ }
154
+ const instances = this.typeClasses.get(constraintName);
155
+ if (!instances || !instances.includes(typeName)) {
156
+ throw new Error(`Type '${showType(rt)}' is not an instance of '${constraintName}'`);
131
157
  }
132
158
  }
133
159
  }
@@ -1 +1 @@
1
- {"version":3,"file":"core.js","sourceRoot":"","sources":["../../src/typechecker/core.ts"],"names":[],"mappings":"AAAA,OAAO,EAAE,WAAW,EAAE,MAAM,mBAAmB,CAAC;AAChD,OAAO,EAGL,QAAQ,GAMT,MAAM,cAAc,CAAC;AAEtB,MAAM,OAAO,MAAM;IACT,SAAS,GAAG,CAAC,CAAC;IAEf,QAAQ,CAAC,cAAwB,EAAE;QACxC,OAAO,EAAE,IAAI,EAAE,SAAS,EAAE,EAAE,EAAE,IAAI,CAAC,SAAS,EAAE,EAAE,WAAW,EAAE,CAAC;IAChE,CAAC;IAEM,YAAY,CAAC,CAAO;QACzB,MAAM,QAAQ,GAAG,IAAI,GAAG,EAAoB,CAAC;QAC7C,MAAM,OAAO,GAAG,CAAC,IAAU,EAAE,EAAE;YAC7B,IAAI,IAAI,CAAC,IAAI,KAAK,SAAS,EAAE,CAAC;gBAC5B,QAAQ,CAAC,GAAG,CAAC,IAAI,CAAC,EAAE,EAAE,IAAI,CAAC,WAAW,CAAC,CAAC;YAC1C,CAAC;iBAAM,IAAI,IAAI,CAAC,IAAI,KAAK,iBAAiB,EAAE,CAAC;gBAC3C,IAAI,CAAC,IAAI,CAAC,OAAO,CAAC,OAAO,CAAC,CAAC;YAC7B,CAAC;QACH,CAAC,CAAC;QACF,OAAO,CAAC,CAAC,CAAC,CAAC;QACX,OAAO,QAAQ,CAAC;IAClB,CAAC;IACM,UAAU,CAAC,GAAgB,EAAE,CAAO;QACzC,MAAM,WAAW,GAAG,IAAI,GAAG,EAAU,CAAC;QACtC,KAAK,MAAM,MAAM,IAAI,GAAG,CAAC,MAAM,EAAE,EAAE,CAAC;YAClC,MAAM,cAAc,GAAG,IAAI,CAAC,YAAY,CAAC,MAAM,CAAC,IAAI,CAAC,CAAC;YACtD,KAAK,MAAM,EAAE,IAAI,cAAc,CAAC,IAAI,EAAE,EAAE,CAAC;gBACvC,IAAI,CAAC,MAAM,CAAC,WAAW,CAAC,QAAQ,CAAC,EAAE,CAAC,EAAE,CAAC;oBACrC,WAAW,CAAC,GAAG,CAAC,EAAE,CAAC,CAAC;gBACtB,CAAC;YACH,CAAC;QACH,CAAC;QAED,MAAM,YAAY,GAAG,IAAI,CAAC,YAAY,CAAC,CAAC,CAAC,CAAC;QAE1C,MAAM,WAAW,GAAa,EAAE,CAAC;QACjC,MAAM,WAAW,GAAG,IAAI,GAAG,EAAoB,CAAC;QAEhD,KAAK,MAAM,CAAC,EAAE,EAAE,MAAM,CAAC,IAAI,YAAY,CAAC,OAAO,EAAE,EAAE,CAAC;YAClD,IAAI,CAAC,WAAW,CAAC,GAAG,CAAC,EAAE,CAAC,EAAE,CAAC;gBACzB,WAAW,CAAC,IAAI,CAAC,EAAE,CAAC,CAAC;gBACrB,IAAI,MAAM,CAAC,MAAM,GAAG,CAAC,EAAE,CAAC;oBACtB,WAAW,CAAC,GAAG,CAAC,EAAE,EAAE,MAAM,CAAC,CAAC;gBAC9B,CAAC;YACH,CAAC;QACH,CAAC;QAED,OAAO,EAAE,IAAI,EAAE,YAAY,EAAE,WAAW,EAAE,IAAI,EAAE,CAAC,EAAE,WAAW,EAAE,CAAC;IACnE,CAAC;IAEM,WAAW,CAAC,MAAkB;QACnC,MAAM,aAAa,GAAG,IAAI,GAAG,EAAgB,CAAC;QAC9C,MAAM,CAAC,WAAW,CAAC,OAAO,CAAC,CAAC,EAAE,EAAE,EAAE;YAChC,MAAM,WAAW,GAAG,MAAM,CAAC,WAAW,CAAC,GAAG,CAAC,EAAE,CAAC,IAAI,EAAE,CAAC;YACrD,aAAa,CAAC,GAAG,CAAC,EAAE,EAAE,IAAI,CAAC,QAAQ,CAAC,WAAW,CAAC,CAAC,CAAC;QACpD,CAAC,CAAC,CAAC;QACH,OAAO,IAAI,CAAC,UAAU,CAAC,aAAa,EAAE,MAAM,CAAC,IAAI,CAAC,CAAC;IACrD,CAAC;IAEM,UAAU,CAAC,KAAmB,EAAE,CAAO;QAC5C,IAAI,CAAC,CAAC,IAAI,KAAK,SAAS,EAAE,CAAC;YACzB,MAAM,WAAW,GAAG,KAAK,CAAC,GAAG,CAAC,CAAC,CAAC,EAAE,CAAC,CAAC;YACpC,OAAO,WAAW,CAAC,CAAC,CAAC,WAAW,CAAC,CAAC,CAAC,CAAC,CAAC;QACvC,CAAC;aAAM,IAAI,CAAC,CAAC,IAAI,KAAK,iBAAiB,EAAE,CAAC;YACxC,OAAO;gBACL,IAAI,EAAE,iBAAiB;gBACvB,IAAI,EAAE,CAAC,CAAC,IAAI;gBACZ,IAAI,EAAE,CAAC,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC,GAAG,EAAE,EAAE,CAAC,IAAI,CAAC,UAAU,CAAC,KAAK,EAAE,GAAG,CAAC,CAAC;aACvD,CAAC;QACJ,CAAC;QAED,MAAM,IAAI,KAAK,CAAC,qCAAqC,CAAC,CAAC;IACzD,CAAC;IAEM,YAAY,CAAC,EAAgB,EAAE,EAAgB;QACpD,MAAM,MAAM,GAAG,IAAI,GAAG,CAAC,EAAE,CAAC,CAAC;QAC3B,KAAK,MAAM,CAAC,EAAE,EAAE,IAAI,CAAC,IAAI,EAAE,EAAE,CAAC;YAC5B,MAAM,CAAC,GAAG,CAAC,EAAE,EAAE,IAAI,CAAC,UAAU,CAAC,EAAE,EAAE,IAAI,CAAC,CAAC,CAAC;QAC5C,CAAC;QACD,OAAO,MAAM,CAAC;IAChB,CAAC;IAEM,KAAK,CAAC,EAAQ,EAAE,EAAQ;QAC7B,IAAI,EAAE,CAAC,IAAI,KAAK,SAAS;YAAE,OAAO,IAAI,CAAC,QAAQ,CAAC,EAAE,EAAE,EAAE,CAAC,CAAC;QACxD,IAAI,EAAE,CAAC,IAAI,KAAK,SAAS;YAAE,OAAO,IAAI,CAAC,QAAQ,CAAC,EAAE,EAAE,EAAE,CAAC,CAAC;QACxD,IAAI,EAAE,CAAC,IAAI,KAAK,iBAAiB,IAAI,EAAE,CAAC,IAAI,KAAK,iBAAiB,EAAE,CAAC;YACnE,IAAI,EAAE,CAAC,IAAI,KAAK,EAAE,CAAC,IAAI,IAAI,EAAE,CAAC,IAAI,CAAC,MAAM,KAAK,EAAE,CAAC,IAAI,CAAC,MAAM,EAAE,CAAC;gBAC7D,OAAO;oBACL,OAAO,EAAE,KAAK;oBACd,KAAK,EAAE,gBAAgB,QAAQ,CAAC,EAAE,CAAC,SAAS,QAAQ,CAAC,EAAE,CAAC,EAAE;iBAC3D,CAAC;YACJ,CAAC;YACD,IAAI,GAAG,GAAiB,IAAI,GAAG,EAAE,CAAC;YAClC,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,EAAE,CAAC,IAAI,CAAC,MAAM,EAAE,CAAC,EAAE,EAAE,CAAC;gBACxC,MAAM,IAAI,GAAG,IAAI,CAAC,UAAU,CAAC,GAAG,EAAE,EAAE,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,CAAC;gBAC9C,MAAM,IAAI,GAAG,IAAI,CAAC,UAAU,CAAC,GAAG,EAAE,EAAE,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,CAAC;gBAC9C,MAAM,SAAS,GAAG,IAAI,CAAC,KAAK,CAAC,IAAI,EAAE,IAAI,CAAC,CAAC;gBACzC,IAAI,CAAC,SAAS,CAAC,OAAO;oBAAE,OAAO,SAAS,CAAC;gBACzC,GAAG,GAAG,IAAI,CAAC,YAAY,CAAC,GAAG,EAAE,SAAS,CAAC,KAAK,CAAC,CAAC;YAChD,CAAC;YACD,OAAO,EAAE,OAAO,EAAE,IAAI,EAAE,KAAK,EAAE,GAAG,EAAE,CAAC;QACvC,CAAC;QACD,OAAO,EAAE,OAAO,EAAE,KAAK,EAAE,KAAK,EAAE,wBAAwB,EAAE,CAAC;IAC7D,CAAC;IAEM,QAAQ,CAAC,CAAU,EAAE,CAAO;QACjC,IAAI,CAAC,CAAC,IAAI,KAAK,SAAS,IAAI,CAAC,CAAC,EAAE,KAAK,CAAC,CAAC,EAAE,EAAE,CAAC;YAC1C,OAAO,EAAE,OAAO,EAAE,IAAI,EAAE,KAAK,EAAE,IAAI,GAAG,EAAE,EAAE,CAAC;QAC7C,CAAC;QACD,IAAI,IAAI,CAAC,MAAM,CAAC,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,EAAE,CAAC;YACzB,OAAO,EAAE,OAAO,EAAE,KAAK,EAAE,KAAK,EAAE,qBAAqB,EAAE,CAAC;QAC1D,CAAC;QAED,KAAK,MAAM,UAAU,IAAI,CAAC,CAAC,WAAW,EAAE,CAAC;YACvC,IAAI,CAAC,eAAe,CAAC,UAAU,EAAE,CAAC,CAAC,CAAC;QACtC,CAAC;QACD,IAAI,CAAC,CAAC,IAAI,KAAK,SAAS,EAAE,CAAC;YACzB,KAAK,MAAM,UAAU,IAAI,CAAC,CAAC,WAAW,EAAE,CAAC;gBACvC,IAAI,CAAC,eAAe,CAAC,UAAU,EAAE,CAAC,CAAC,CAAC;YACtC,CAAC;YACD,oBAAoB;YACpB,MAAM,iBAAiB,GAAG;gBACxB,GAAG,IAAI,GAAG,CAAC,CAAC,GAAG,CAAC,CAAC,WAAW,EAAE,GAAG,CAAC,CAAC,WAAW,CAAC,CAAC;aACjD,CAAC;YACF,CAAC,CAAC,WAAW,GAAG,iBAAiB,CAAC;YAClC,CAAC,CAAC,WAAW,GAAG,iBAAiB,CAAC;QACpC,CAAC;QAED,OAAO,EAAE,OAAO,EAAE,IAAI,EAAE,KAAK,EAAE,IAAI,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC,CAAC,EAAE,CAAC;IACxD,CAAC;IAEM,eAAe,CAAC,cAAsB,EAAE,CAAO;QACpD,IAAI,CAAC,CAAC,IAAI,KAAK,SAAS,EAAE,CAAC;YACzB,IAAI,CAAC,CAAC,CAAC,WAAW,CAAC,QAAQ,CAAC,cAAc,CAAC,EAAE,CAAC;gBAC5C,CAAC,CAAC,WAAW,CAAC,IAAI,CAAC,cAAc,CAAC,CAAC;YACrC,CAAC;QACH,CAAC;aAAM,IAAI,CAAC,CAAC,IAAI,KAAK,iBAAiB,EAAE,CAAC;YACxC,MAAM,SAAS,GAAG,WAAW,CAAC,GAAG,CAAC,cAAc,CAAC,CAAC;YAClD,IAAI,CAAC,SAAS,IAAI,CAAC,SAAS,CAAC,QAAQ,CAAC,CAAC,CAAC,IAAI,CAAC,EAAE,CAAC;gBAC9C,MAAM,IAAI,KAAK,CACb,SAAS,QAAQ,CAAC,CAAC,CAAC,4BAA4B,cAAc,GAAG,CAClE,CAAC;YACJ,CAAC;QACH,CAAC;IACH,CAAC;IAEM,MAAM,CAAC,KAAa,EAAE,CAAO;QAClC,IAAI,CAAC,CAAC,IAAI,KAAK,SAAS;YAAE,OAAO,CAAC,CAAC,EAAE,KAAK,KAAK,CAAC;QAChD,IAAI,CAAC,CAAC,IAAI,KAAK,iBAAiB;YAC9B,OAAO,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC,CAAC,EAAE,EAAE,CAAC,IAAI,CAAC,MAAM,CAAC,KAAK,EAAE,CAAC,CAAC,CAAC,CAAC;QACnD,OAAO,KAAK,CAAC;IACf,CAAC;CACF"}
1
+ {"version":3,"file":"core.js","sourceRoot":"","sources":["../../src/typechecker/core.ts"],"names":[],"mappings":"AAAA,OAAO,EACL,QAAQ,EAGR,QAAQ,GAMT,MAAM,cAAc,CAAC;AAEtB,MAAM,OAAO,MAAM;IAGP;IACD;IAHD,SAAS,GAAG,CAAC,CAAC;IACtB,YACU,UAA6B,IAAI,GAAG,EAAE,EACvC,cAAqC,IAAI,GAAG,EAAE;QAD7C,YAAO,GAAP,OAAO,CAA+B;QACvC,gBAAW,GAAX,WAAW,CAAmC;IACpD,CAAC;IACG,OAAO,CAAC,CAAO;QACpB,IAAI,CAAC,CAAC,IAAI,KAAK,iBAAiB,IAAI,IAAI,CAAC,OAAO,CAAC,GAAG,CAAC,CAAC,CAAC,IAAI,CAAC;YAC1D,OAAO,IAAI,CAAC,OAAO,CAAC,IAAI,CAAC,OAAO,CAAC,GAAG,CAAC,CAAC,CAAC,IAAI,CAAE,CAAC,CAAC;QACjD,OAAO,CAAC,CAAC;IACX,CAAC;IACM,QAAQ,CAAC,cAAwB,EAAE;QACxC,OAAO,EAAE,IAAI,EAAE,SAAS,EAAE,EAAE,EAAE,IAAI,CAAC,SAAS,EAAE,EAAE,WAAW,EAAE,CAAC;IAChE,CAAC;IAEM,YAAY,CAAC,CAAO;QACzB,MAAM,QAAQ,GAAG,IAAI,GAAG,EAAoB,CAAC;QAC7C,MAAM,OAAO,GAAG,CAAC,IAAU,EAAE,EAAE;YAC7B,IAAI,IAAI,CAAC,IAAI,KAAK,SAAS,EAAE,CAAC;gBAC5B,QAAQ,CAAC,GAAG,CAAC,IAAI,CAAC,EAAE,EAAE,IAAI,CAAC,WAAW,CAAC,CAAC;YAC1C,CAAC;iBAAM,IAAI,IAAI,CAAC,IAAI,KAAK,iBAAiB,EAAE,CAAC;gBAC3C,IAAI,CAAC,IAAI,CAAC,OAAO,CAAC,OAAO,CAAC,CAAC;YAC7B,CAAC;QACH,CAAC,CAAC;QACF,OAAO,CAAC,CAAC,CAAC,CAAC;QACX,OAAO,QAAQ,CAAC;IAClB,CAAC;IACM,UAAU,CAAC,GAAgB,EAAE,CAAO;QACzC,MAAM,WAAW,GAAG,IAAI,GAAG,EAAU,CAAC;QACtC,KAAK,MAAM,MAAM,IAAI,GAAG,CAAC,MAAM,EAAE,EAAE,CAAC;YAClC,MAAM,cAAc,GAAG,IAAI,CAAC,YAAY,CAAC,MAAM,CAAC,IAAI,CAAC,CAAC;YACtD,KAAK,MAAM,EAAE,IAAI,cAAc,CAAC,IAAI,EAAE,EAAE,CAAC;gBACvC,IAAI,CAAC,MAAM,CAAC,WAAW,CAAC,QAAQ,CAAC,EAAE,CAAC,EAAE,CAAC;oBACrC,WAAW,CAAC,GAAG,CAAC,EAAE,CAAC,CAAC;gBACtB,CAAC;YACH,CAAC;QACH,CAAC;QAED,MAAM,YAAY,GAAG,IAAI,CAAC,YAAY,CAAC,CAAC,CAAC,CAAC;QAE1C,MAAM,WAAW,GAAa,EAAE,CAAC;QACjC,MAAM,WAAW,GAAG,IAAI,GAAG,EAAoB,CAAC;QAEhD,KAAK,MAAM,CAAC,EAAE,EAAE,MAAM,CAAC,IAAI,YAAY,CAAC,OAAO,EAAE,EAAE,CAAC;YAClD,IAAI,CAAC,WAAW,CAAC,GAAG,CAAC,EAAE,CAAC,EAAE,CAAC;gBACzB,WAAW,CAAC,IAAI,CAAC,EAAE,CAAC,CAAC;gBACrB,IAAI,MAAM,CAAC,MAAM,GAAG,CAAC,EAAE,CAAC;oBACtB,WAAW,CAAC,GAAG,CAAC,EAAE,EAAE,MAAM,CAAC,CAAC;gBAC9B,CAAC;YACH,CAAC;QACH,CAAC;QAED,OAAO,EAAE,IAAI,EAAE,YAAY,EAAE,WAAW,EAAE,IAAI,EAAE,CAAC,EAAE,WAAW,EAAE,CAAC;IACnE,CAAC;IAEM,WAAW,CAAC,MAAkB;QACnC,MAAM,aAAa,GAAG,IAAI,GAAG,EAAgB,CAAC;QAC9C,MAAM,CAAC,WAAW,CAAC,OAAO,CAAC,CAAC,EAAE,EAAE,EAAE;YAChC,MAAM,WAAW,GAAG,MAAM,CAAC,WAAW,CAAC,GAAG,CAAC,EAAE,CAAC,IAAI,EAAE,CAAC;YACrD,aAAa,CAAC,GAAG,CAAC,EAAE,EAAE,IAAI,CAAC,QAAQ,CAAC,WAAW,CAAC,CAAC,CAAC;QACpD,CAAC,CAAC,CAAC;QACH,OAAO,IAAI,CAAC,UAAU,CAAC,aAAa,EAAE,MAAM,CAAC,IAAI,CAAC,CAAC;IACrD,CAAC;IAEM,UAAU,CAAC,KAAmB,EAAE,CAAO;QAC5C,IAAI,CAAC,CAAC,IAAI,KAAK,SAAS,EAAE,CAAC;YACzB,MAAM,WAAW,GAAG,KAAK,CAAC,GAAG,CAAC,CAAC,CAAC,EAAE,CAAC,CAAC;YACpC,OAAO,WAAW,CAAC,CAAC,CAAC,WAAW,CAAC,CAAC,CAAC,CAAC,CAAC;QACvC,CAAC;aAAM,IAAI,CAAC,CAAC,IAAI,KAAK,iBAAiB,EAAE,CAAC;YACxC,OAAO;gBACL,IAAI,EAAE,iBAAiB;gBACvB,IAAI,EAAE,CAAC,CAAC,IAAI;gBACZ,IAAI,EAAE,CAAC,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC,GAAG,EAAE,EAAE,CAAC,IAAI,CAAC,UAAU,CAAC,KAAK,EAAE,GAAG,CAAC,CAAC;aACvD,CAAC;QACJ,CAAC;QAED,MAAM,IAAI,KAAK,CAAC,qCAAqC,CAAC,CAAC;IACzD,CAAC;IAEM,YAAY,CAAC,EAAgB,EAAE,EAAgB;QACpD,MAAM,MAAM,GAAG,IAAI,GAAG,CAAC,EAAE,CAAC,CAAC;QAC3B,KAAK,MAAM,CAAC,EAAE,EAAE,IAAI,CAAC,IAAI,EAAE,EAAE,CAAC;YAC5B,MAAM,CAAC,GAAG,CAAC,EAAE,EAAE,IAAI,CAAC,UAAU,CAAC,EAAE,EAAE,IAAI,CAAC,CAAC,CAAC;QAC5C,CAAC;QACD,OAAO,MAAM,CAAC;IAChB,CAAC;IAEM,KAAK,CAAC,EAAQ,EAAE,EAAQ;QAC7B,MAAM,GAAG,GAAG,IAAI,CAAC,OAAO,CAAC,EAAE,CAAC,CAAC;QAC7B,MAAM,GAAG,GAAG,IAAI,CAAC,OAAO,CAAC,EAAE,CAAC,CAAC;QAC7B,IAAI,GAAG,CAAC,IAAI,KAAK,SAAS;YAAE,OAAO,IAAI,CAAC,QAAQ,CAAC,GAAG,EAAE,GAAG,CAAC,CAAC;QAC3D,IAAI,GAAG,CAAC,IAAI,KAAK,SAAS;YAAE,OAAO,IAAI,CAAC,QAAQ,CAAC,GAAG,EAAE,GAAG,CAAC,CAAC;QAC3D,IAAI,GAAG,CAAC,IAAI,KAAK,iBAAiB,IAAI,GAAG,CAAC,IAAI,KAAK,iBAAiB,EAAE,CAAC;YACrE,MAAM,YAAY,GAAG,CAAC,CAAkB,EAAE,CAAkB,EAAE,EAAE,CAC9D,CAAC,CAAC,CAAC,IAAI,KAAK,UAAU,IAAI,CAAC,CAAC,IAAI,KAAK,MAAM,CAAC;gBAC5C,CAAC,CAAC,CAAC,IAAI,KAAK,UAAU,IAAI,CAAC,CAAC,IAAI,KAAK,MAAM,CAAC,CAAC;YAE/C,IAAI,YAAY,CAAC,GAAG,EAAE,GAAG,CAAC,EAAE,CAAC;gBAC3B,MAAM,QAAQ,GAAG,GAAG,CAAC,IAAI,KAAK,MAAM,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,GAAG,CAAC;gBACjD,OAAO,IAAI,CAAC,KAAK,CAAC,QAAQ,CAAC,IAAI,CAAC,CAAC,CAAC,EAAE,QAAQ,CAAC,CAAC;YAChD,CAAC;YAED,IAAI,GAAG,CAAC,IAAI,KAAK,GAAG,CAAC,IAAI,IAAI,GAAG,CAAC,IAAI,CAAC,MAAM,KAAK,GAAG,CAAC,IAAI,CAAC,MAAM,EAAE,CAAC;gBACjE,OAAO;oBACL,OAAO,EAAE,KAAK;oBACd,KAAK,EAAE,gBAAgB,QAAQ,CAAC,GAAG,CAAC,SAAS,QAAQ,CAAC,GAAG,CAAC,EAAE;iBAC7D,CAAC;YACJ,CAAC;YACD,IAAI,GAAG,GAAiB,IAAI,GAAG,EAAE,CAAC;YAClC,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,GAAG,CAAC,IAAI,CAAC,MAAM,EAAE,CAAC,EAAE,EAAE,CAAC;gBACzC,MAAM,IAAI,GAAG,IAAI,CAAC,UAAU,CAAC,GAAG,EAAE,GAAG,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,CAAC;gBAC/C,MAAM,IAAI,GAAG,IAAI,CAAC,UAAU,CAAC,GAAG,EAAE,GAAG,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,CAAC;gBAC/C,MAAM,SAAS,GAAG,IAAI,CAAC,KAAK,CAAC,IAAI,EAAE,IAAI,CAAC,CAAC;gBACzC,IAAI,CAAC,SAAS,CAAC,OAAO;oBAAE,OAAO,SAAS,CAAC;gBACzC,GAAG,GAAG,IAAI,CAAC,YAAY,CAAC,GAAG,EAAE,SAAS,CAAC,KAAK,CAAC,CAAC;YAChD,CAAC;YACD,OAAO,EAAE,OAAO,EAAE,IAAI,EAAE,KAAK,EAAE,GAAG,EAAE,CAAC;QACvC,CAAC;QACD,OAAO,EAAE,OAAO,EAAE,KAAK,EAAE,KAAK,EAAE,wBAAwB,EAAE,CAAC;IAC7D,CAAC;IAEM,QAAQ,CAAC,CAAU,EAAE,CAAO;QACjC,IAAI,CAAC,CAAC,IAAI,KAAK,SAAS,IAAI,CAAC,CAAC,EAAE,KAAK,CAAC,CAAC,EAAE,EAAE,CAAC;YAC1C,OAAO,EAAE,OAAO,EAAE,IAAI,EAAE,KAAK,EAAE,IAAI,GAAG,EAAE,EAAE,CAAC;QAC7C,CAAC;QACD,IAAI,IAAI,CAAC,MAAM,CAAC,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,EAAE,CAAC;YACzB,OAAO,EAAE,OAAO,EAAE,KAAK,EAAE,KAAK,EAAE,qBAAqB,EAAE,CAAC;QAC1D,CAAC;QAED,KAAK,MAAM,UAAU,IAAI,CAAC,CAAC,WAAW,EAAE,CAAC;YACvC,IAAI,CAAC,eAAe,CAAC,UAAU,EAAE,CAAC,CAAC,CAAC;QACtC,CAAC;QACD,IAAI,CAAC,CAAC,IAAI,KAAK,SAAS,EAAE,CAAC;YACzB,KAAK,MAAM,UAAU,IAAI,CAAC,CAAC,WAAW,EAAE,CAAC;gBACvC,IAAI,CAAC,eAAe,CAAC,UAAU,EAAE,CAAC,CAAC,CAAC;YACtC,CAAC;YACD,oBAAoB;YACpB,MAAM,iBAAiB,GAAG;gBACxB,GAAG,IAAI,GAAG,CAAC,CAAC,GAAG,CAAC,CAAC,WAAW,EAAE,GAAG,CAAC,CAAC,WAAW,CAAC,CAAC;aACjD,CAAC;YACF,CAAC,CAAC,WAAW,GAAG,iBAAiB,CAAC;YAClC,CAAC,CAAC,WAAW,GAAG,iBAAiB,CAAC;QACpC,CAAC;QAED,OAAO,EAAE,OAAO,EAAE,IAAI,EAAE,KAAK,EAAE,IAAI,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC,CAAC,EAAE,CAAC;IACxD,CAAC;IAEM,eAAe,CAAC,cAAsB,EAAE,CAAO;QACpD,MAAM,EAAE,GAAG,IAAI,CAAC,OAAO,CAAC,CAAC,CAAC,CAAC;QAC3B,IAAI,EAAE,CAAC,IAAI,KAAK,SAAS,EAAE,CAAC;YAC1B,IAAI,CAAC,EAAE,CAAC,WAAW,CAAC,QAAQ,CAAC,cAAc,CAAC,EAAE,CAAC;gBAC7C,EAAE,CAAC,WAAW,CAAC,IAAI,CAAC,cAAc,CAAC,CAAC;YACtC,CAAC;QACH,CAAC;aAAM,IAAI,EAAE,CAAC,IAAI,KAAK,iBAAiB,EAAE,CAAC;YACzC,IAAI,QAAQ,GAAG,EAAE,CAAC,IAAI,CAAC;YACvB,IACE,QAAQ,KAAK,MAAM;gBACnB,EAAE,CAAC,IAAI,CAAC,MAAM,KAAK,CAAC;gBACpB,EAAE,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,IAAI,KAAK,iBAAiB;gBACrC,EAAE,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,IAAI,KAAK,QAAQ,EAC5B,CAAC;gBACD,QAAQ,GAAG,UAAU,CAAC;YACxB,CAAC;YAED,MAAM,SAAS,GAAG,IAAI,CAAC,WAAW,CAAC,GAAG,CAAC,cAAc,CAAC,CAAC;YACvD,IAAI,CAAC,SAAS,IAAI,CAAC,SAAS,CAAC,QAAQ,CAAC,QAAQ,CAAC,EAAE,CAAC;gBAChD,MAAM,IAAI,KAAK,CACb,SAAS,QAAQ,CAAC,EAAE,CAAC,4BAA4B,cAAc,GAAG,CACnE,CAAC;YACJ,CAAC;QACH,CAAC;IACH,CAAC;IAEM,MAAM,CAAC,KAAa,EAAE,CAAO;QAClC,IAAI,CAAC,CAAC,IAAI,KAAK,SAAS;YAAE,OAAO,CAAC,CAAC,EAAE,KAAK,KAAK,CAAC;QAChD,IAAI,CAAC,CAAC,IAAI,KAAK,iBAAiB;YAC9B,OAAO,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC,CAAC,EAAE,EAAE,CAAC,IAAI,CAAC,MAAM,CAAC,KAAK,EAAE,CAAC,CAAC,CAAC,CAAC;QACnD,OAAO,KAAK,CAAC;IACf,CAAC;CACF"}
@@ -1,4 +1,4 @@
1
- import { Application, ApplicationPattern, ArithmeticBinaryOperation, ArithmeticUnaryOperation, AsPattern, AssignOperation, ASTNode, BitwiseBinaryOperation, BitwiseUnaryOperation, BooleanPrimitive, CharPrimitive, ComparisonOperation, CompositionExpression, ConsExpression, ConsPattern, ConstructorPattern, DataExpression, FieldExpression, For, FunctorPattern, Generator, If, Lambda, LetInExpression, ListBinaryOperation, ListComprehension, ListPattern, ListPrimitive, ListUnaryOperation, LiteralPattern, LogicalBinaryOperation, LogicalUnaryOperation, NilPrimitive, NumberPrimitive, Otherwise, Pattern, Print, Raise, RangeExpression, Return, StringOperation, StringPrimitive, Switch, SymbolPrimitive, TupleExpression, TuplePattern, TypeCast, UnifyOperation, UnionPattern, VariablePattern, Visitor, WildcardPattern, Yield } from "@yukigo/ast";
1
+ import { Application, ApplicationPattern, ArithmeticBinaryOperation, ArithmeticUnaryOperation, AsPattern, AssignOperation, ASTNode, BitwiseBinaryOperation, BitwiseUnaryOperation, BooleanPrimitive, CharPrimitive, ComparisonOperation, CompositionExpression, ConsExpression, ConsPattern, ConstructorPattern, DataExpression, FieldExpression, For, FunctorPattern, Generator, If, Lambda, LetInExpression, ListBinaryOperation, ListComprehension, ListPattern, ListPrimitive, ListUnaryOperation, LiteralPattern, LogicalBinaryOperation, LogicalUnaryOperation, NilPrimitive, NumberPrimitive, Otherwise, Pattern, Print, Raise, RangeExpression, Return, StringOperation, StringPrimitive, Switch, SymbolPrimitive, TupleExpression, TuplePattern, TypeCast, TypePattern, UnifyOperation, UnionPattern, VariablePattern, Visitor, WildcardPattern, Yield, Truth, Equality, Failure } from "yukigo-ast";
2
2
  import { Environment, Result, Type, TypeScheme } from "./checker.js";
3
3
  import { CoreHM } from "./core.js";
4
4
  export declare class PatternVisitor implements Visitor<void> {
@@ -19,6 +19,7 @@ export declare class PatternVisitor implements Visitor<void> {
19
19
  visitUnionPattern(node: UnionPattern): Result<Type>;
20
20
  visitConstructorPattern(node: ConstructorPattern): void;
21
21
  visitConsPattern(node: ConsPattern): void;
22
+ visitTypePattern(node: TypePattern): void;
22
23
  visit(node: Pattern): void;
23
24
  }
24
25
  export declare class InferenceEngine implements Visitor<Result<Type>> {
@@ -65,5 +66,8 @@ export declare class InferenceEngine implements Visitor<Result<Type>> {
65
66
  visitFor(node: For): Result<Type>;
66
67
  visitSwitch(node: Switch): Result<Type>;
67
68
  visitRangeExpression(node: RangeExpression): Result<Type>;
69
+ visitTruth(node: Truth): Result<Type>;
70
+ visitEquality(node: Equality): Result<Type>;
71
+ visitFailure(node: Failure): Result<Type>;
68
72
  visit(node: ASTNode): Result<Type>;
69
73
  }