From 0c8ace1b00efe9745d27cc5cf4d5389ba74f3245 Mon Sep 17 00:00:00 2001
From: Camil Staps
Date: Sun, 28 Aug 2016 21:46:53 +0200
Subject: Start graph-based approach

---
 interpreter/syntax.c | 24 ------------------------
 1 file changed, 24 deletions(-)

(limited to 'interpreter/syntax.c')

diff --git a/interpreter/syntax.c b/interpreter/syntax.c
index b8ba0d2..00c9554 100644
--- a/interpreter/syntax.c
+++ b/interpreter/syntax.c
@@ -84,30 +84,6 @@ unsigned eq_expression(expression* a, expression* b) {
 	return 0;
 }
 
-expression** flatten_app_args(expression* from) {
-	expression** result;
-	unsigned int i;
-
-	unsigned char len = 0;
-	expression* _from = from;
-	while (_from->kind == EXPR_APP) {
-		len++;
-		_from = _from->var1;
-	}
-	len++;
-
-	result = my_calloc(1, sizeof(expression*) * (len + 1));
-	i = 1;
-	while (from->kind == EXPR_APP) {
-		result[len - i] = from->var2;
-		from = from->var1;
-		i++;
-	}
-	result[0] = from;
-	result[len] = NULL;
-	return result;
-}
-
 void concat_fuspel(fuspel* start, fuspel* end) {
 	while (start) {
 		if (!start->rest) {
-- 
cgit v1.2.3