List literals

2020-11-14 12:25:41 -07:00
parent 4d6a823066
commit ded9836afa
4 changed files with 82 additions and 1 deletions
--- a/src/kiss/Kiss.hx
+++ b/src/kiss/Kiss.hx
@@ -67,6 +67,19 @@ class Kiss {
 					pos: Context.currentPos(),
 					expr: ECall(readerExpToHaxeExpr(func, specialForms), [for (bodyExp in body) readerExpToHaxeExpr(bodyExp, specialForms)])
 				};
+			case List(elements):
+				{
+					pos: Context.currentPos(),
+					expr: ENew({
+						pack: ["kiss"],
+						name: "List"
+					}, [
+						{
+							pos: Context.currentPos(),
+							expr: EArrayDecl([for (elementExp in elements) readerExpToHaxeExpr(elementExp, specialForms)])
+						}
+					])
+				}
 			case RawHaxe(code):
 				Context.parse(code, Context.currentPos());
 			default: