Typeclasses

src/ast.ts

@@ -187,6 +187,25 @@ export type Constraint = {
     typeVar: string
 }
 
+export type ClassDefinition = {
+    kind: 'class-definition'
+    name: string
+    param: string
+    methods: { name: string, type: TypeAST }[]
+    line?: number
+    column?: number
+    start?: number
+}
+
+export type InstanceDeclaration = {
+    kind: 'instance-declaration'
+    typeName: string
+    className: string
+    line?: number
+    column?: number
+    start?: number
+}
+
 export type AST =
     | Literal
     | Variable