pingu/Computeability
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Initial

Browse Source
This commit is contained in:
pingu
2025-11-17 14:25:48 +01:00
commit 9bdbe830d2
13 changed files with 1390 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

27
3/Chi.cf Normal file
View File

@ -0,0 +1,27 @@
token Constructor (["ABCDEFGHIJKLMNOPQRSTUVWXYZ"]
(["abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ_-'"]
| digit
)*);
token Variable (["abcdefghijklmnopqrstuvwxyz_"]
(["abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ_-'"]
| digit
)*);
Apply . Exp1 ::= Exp1 Exp2;
Lambda . Exp ::= "\\" Variable "." Exp;
Case . Exp1 ::= "case" Exp "of" "{" [Br] "}";
Rec . Exp ::= "rec" Variable "=" Exp;
Var . Exp2 ::= Variable;
Const . Exp2 ::= Constructor "(" [Exp] ")";
_ . Exp ::= Exp1;
_ . Exp1 ::= Exp2;
_ . Exp2 ::= "(" Exp ")";
Branch . Br ::= Constructor "(" [Variable] ")" "->" Exp;
separator Br ";";
separator Exp ",";
separator Variable ",";
comment "--";
comment "{-" "-}";