From 5ad9c18a635b25dcc3a8edce8fffa8462abd6520 Mon Sep 17 00:00:00 2001
From: Leo Tenenbaum <pommicket@gmail.com>
Date: Sat, 11 Jan 2020 13:14:08 -0500
Subject: removed unnecessary c code generation

---
 typedefs_cgen.c | 67 +++++++++++++++++++--------------------------------------
 1 file changed, 22 insertions(+), 45 deletions(-)

(limited to 'typedefs_cgen.c')

diff --git a/typedefs_cgen.c b/typedefs_cgen.c
index 814eb4a..1b333d6 100644
--- a/typedefs_cgen.c
+++ b/typedefs_cgen.c
@@ -3,13 +3,13 @@
   This file is part of toc. toc is distributed under version 3 of the GNU General Public License, without any warranty whatsoever.
   You should have received a copy of the GNU General Public License along with toc. If not, see <https://www.gnu.org/licenses/>.
 */
-static bool typedefs_stmt(CGenerator *g, Statement *s);
-static bool typedefs_decl(CGenerator *g, Declaration *d);
-static bool typedefs_expr(CGenerator *g, Expression *e);
+static bool cgen_sdecls_stmt(CGenerator *g, Statement *s);
+static bool cgen_sdecls_decl(CGenerator *g, Declaration *d);
+static bool cgen_sdecls_expr(CGenerator *g, Expression *e);
 
 /* i is the name for this type, NULL if not available */
 /* ALWAYS RETURNS TRUE. it just returns a bool for cgen_recurse_into_type to work */
-static bool typedefs_type(CGenerator *g, Type *type) {
+static bool cgen_sdecls_type(CGenerator *g, Type *type) {
 	if (!(type->flags & TYPE_IS_RESOLVED)) /* non-instance constant fn parameter type */
 		return true;
 	if (type->kind == TYPE_STRUCT) {
@@ -32,105 +32,82 @@ static bool typedefs_type(CGenerator *g, Type *type) {
 			sdef->flags |= STRUCT_DEF_CGEN_DECLARED;
 		}
 	}
-	cgen_recurse_subtypes(typedefs_type, g, type);
+	cgen_recurse_subtypes(cgen_sdecls_type, g, type);
 	return true;
 }
 
-static bool typedefs_block(CGenerator *g, Block *b) {
+static bool cgen_sdecls_block(CGenerator *g, Block *b) {
 	Block *prev = g->block;
 	if (!cgen_block_enter(g, b))
 		return false;
 	arr_foreach(b->stmts, Statement, s)
-		if (!typedefs_stmt(g, s))
+		if (!cgen_sdecls_stmt(g, s))
 			return false;
-	if (b->ret_expr && !typedefs_expr(g, b->ret_expr))
+	if (b->ret_expr && !cgen_sdecls_expr(g, b->ret_expr))
 		return false;
 	cgen_block_exit(g, prev);
 	return true;
 }
 
-static bool typedefs_expr(CGenerator *g, Expression *e) {
-	cgen_recurse_subexprs(g, e, typedefs_expr, typedefs_block, typedefs_decl);
+static bool cgen_sdecls_expr(CGenerator *g, Expression *e) {
+	cgen_recurse_subexprs(g, e, cgen_sdecls_expr, cgen_sdecls_block, cgen_sdecls_decl);
 	if (e->kind == EXPR_CAST) {
-		typedefs_type(g, &e->cast.type);
+		cgen_sdecls_type(g, &e->cast.type);
 	}
 	if (e->kind == EXPR_FN) {
 		/* needs to go before decls_cgen.c... */
 		e->fn->c.id = ++g->ident_counter;
 	}
 	if (e->kind == EXPR_TYPE) {
-		if (!typedefs_type(g, &e->typeval))
+		if (!cgen_sdecls_type(g, &e->typeval))
 			return false;
 	}
 	return true;
 
 }
 
-static bool typedefs_decl(CGenerator *g, Declaration *d) {
-	typedefs_type(g, &d->type);
+static bool cgen_sdecls_decl(CGenerator *g, Declaration *d) {
+	cgen_sdecls_type(g, &d->type);
 	if (cgen_fn_is_direct(g, d)) {
 		d->expr.fn->c.name = d->idents[0];
 	}
 	for (int idx = 0; idx < (int)arr_len(d->idents); ++idx) {
-		Identifier i = d->idents[idx];
 		Type *type = decl_type_at_index(d, idx);
 		Value *val = decl_val_at_index(d, idx);
 		if (type_is_builtin(type, BUILTIN_TYPE)) {
-			/* generate typedef */
-			if (!typedefs_type(g, val->type))
+			if (!cgen_sdecls_type(g, val->type))
 				return false;
-			
-			if (val->type->kind != TYPE_STRUCT) {
-				IdentID id = 0;
-				if (g->block != NULL || g->fn != NULL)
-					id = ++g->ident_counter;
-				if (!type_is_compileonly(val->type)) {
-					cgen_write(g, "typedef ");
-					if (!cgen_type_pre(g, val->type, d->where)) return false;
-					cgen_write(g, " ");
-					if (id) {
-						cgen_ident_id(g, id);
-					} else {
-						cgen_ident(g, i);
-					}
-					if (val->type->kind != TYPE_STRUCT) {
-						if (!cgen_type_post(g, val->type, d->where)) return false;
-					}
-					cgen_write(g, ";");
-				}
-			}
-			cgen_nl(g);
 		}
 	}
 	if (d->flags & DECL_HAS_EXPR) {
-		if (!typedefs_expr(g, &d->expr))
+		if (!cgen_sdecls_expr(g, &d->expr))
 			return false;
 	}
 	return true;
 }
 
-static bool typedefs_stmt(CGenerator *g, Statement *s) {
+static bool cgen_sdecls_stmt(CGenerator *g, Statement *s) {
 	switch (s->kind) {
 	case STMT_DECL:
-		if (!typedefs_decl(g, &s->decl))
+		if (!cgen_sdecls_decl(g, &s->decl))
 			return false;
 		break;
 	case STMT_EXPR:
-		if (!typedefs_expr(g, &s->expr))
+		if (!cgen_sdecls_expr(g, &s->expr))
 			return false;
 		break;
 	case STMT_RET:
 		if (s->ret.flags & RET_HAS_EXPR)
-			if (!typedefs_expr(g, &s->ret.expr))
+			if (!cgen_sdecls_expr(g, &s->ret.expr))
 				return false;
 		break;
 	}
 	return true;
 }
 
-static bool typedefs_file(CGenerator *g, ParsedFile *f) {
+static bool cgen_sdecls_file(CGenerator *g, ParsedFile *f) {
 	arr_foreach(f->stmts, Statement, s) {
-		if (!typedefs_stmt(g, s))
+		if (!cgen_sdecls_stmt(g, s))
 			return false;
 	}
 	return true;
-- 
cgit v1.2.3