{ "schema": "ailang/v0", "name": "list", "imports": [], "defs": [ { "kind": "type", "name": "IntList", "doc": "Einfach verkettete Int-Liste, boxed.", "ctors": [ { "name": "Nil", "fields": [] }, { "name": "Cons", "fields": [ { "k": "con", "name": "Int" }, { "k": "con", "name": "IntList" } ] } ] }, { "kind": "fn", "name": "sum_list", "type": { "k": "fn", "params": [{ "k": "con", "name": "IntList" }], "ret": { "k": "con", "name": "Int" }, "effects": [] }, "params": ["xs"], "doc": "Summiert die Elemente einer Int-Liste rekursiv.", "body": { "t": "match", "scrutinee": { "t": "var", "name": "xs" }, "arms": [ { "pat": { "p": "ctor", "ctor": "Nil", "fields": [] }, "body": { "t": "lit", "lit": { "kind": "int", "value": 0 } } }, { "pat": { "p": "ctor", "ctor": "Cons", "fields": [ { "p": "var", "name": "h" }, { "p": "var", "name": "t" } ] }, "body": { "t": "app", "fn": { "t": "var", "name": "+" }, "args": [ { "t": "var", "name": "h" }, { "t": "app", "fn": { "t": "var", "name": "sum_list" }, "args": [{ "t": "var", "name": "t" }] } ] } } ] } }, { "kind": "fn", "name": "main", "type": { "k": "fn", "params": [], "ret": { "k": "con", "name": "Unit" }, "effects": ["IO"] }, "params": [], "doc": "Baut [10, 20, 12] und druckt die Summe (42).", "body": { "t": "let", "name": "xs", "value": { "t": "ctor", "type": "IntList", "ctor": "Cons", "args": [ { "t": "lit", "lit": { "kind": "int", "value": 10 } }, { "t": "ctor", "type": "IntList", "ctor": "Cons", "args": [ { "t": "lit", "lit": { "kind": "int", "value": 20 } }, { "t": "ctor", "type": "IntList", "ctor": "Cons", "args": [ { "t": "lit", "lit": { "kind": "int", "value": 12 } }, { "t": "ctor", "type": "IntList", "ctor": "Nil", "args": [] } ] } ] } ] }, "body": { "t": "do", "op": "io/print_int", "args": [ { "t": "app", "fn": { "t": "var", "name": "sum_list" }, "args": [{ "t": "var", "name": "xs" }] } ] } } } ] }