mirrors/Odin
1
0
Fork 0
mirror of https://github.com/odin-lang/Odin.git synced 2025-12-29 17:34:34 +00:00
Code Issues Packages Projects Releases Wiki Activity

Massive Refactor and If statements

Browse Source
This commit is contained in:
gingerBill
2016-08-02 01:08:36 +01:00
parent e5665a190d
commit bf3283c889
12 changed files with 1229 additions and 1102 deletions
Download Patch File Download Diff File Expand all files Collapse all files

128
src/printer.cpp
View File

@@ -12,24 +12,24 @@ void print_ast(AstNode *node, isize indent) {
switch (node->kind) {
case AstNode_BasicLit:
print_indent(indent);
print_token(node->basic_lit);
print_token(node->BasicLit);
break;
case AstNode_Ident:
print_indent(indent);
print_token(node->ident.token);
print_token(node->Ident.token);
break;
case AstNode_ProcLit:
print_indent(indent);
gb_printf("(proc lit)\n");
print_ast(node->proc_lit.type, indent+1);
print_ast(node->proc_lit.body, indent+1);
print_ast(node->ProcLit.type, indent+1);
print_ast(node->ProcLit.body, indent+1);
break;
case AstNode_CompoundLit:
print_indent(indent);
gb_printf("(compound lit)\n");
print_ast(node->compound_lit.type, indent+1);
print_ast(node->compound_lit.elem_list, indent+1);
print_ast(node->CompoundLit.type, indent+1);
print_ast(node->CompoundLit.elem_list, indent+1);
break;
@@ -37,168 +37,168 @@ void print_ast(AstNode *node, isize indent) {
print_indent(indent);
gb_printf("(tag)\n");
print_indent(indent+1);
print_token(node->tag_expr.name);
print_ast(node->tag_expr.expr, indent+1);
print_token(node->TagExpr.name);
print_ast(node->TagExpr.expr, indent+1);
break;
case AstNode_UnaryExpr:
print_indent(indent);
print_token(node->unary_expr.op);
print_ast(node->unary_expr.expr, indent+1);
print_token(node->UnaryExpr.op);
print_ast(node->UnaryExpr.expr, indent+1);
break;
case AstNode_BinaryExpr:
print_indent(indent);
print_token(node->binary_expr.op);
print_ast(node->binary_expr.left, indent+1);
print_ast(node->binary_expr.right, indent+1);
print_token(node->BinaryExpr.op);
print_ast(node->BinaryExpr.left, indent+1);
print_ast(node->BinaryExpr.right, indent+1);
break;
case AstNode_CallExpr:
print_indent(indent);
gb_printf("(call)\n");
print_ast(node->call_expr.proc, indent+1);
print_ast(node->call_expr.arg_list, indent+1);
print_ast(node->CallExpr.proc, indent+1);
print_ast(node->CallExpr.arg_list, indent+1);
break;
case AstNode_SelectorExpr:
print_indent(indent);
gb_printf(".\n");
print_ast(node->selector_expr.expr, indent+1);
print_ast(node->selector_expr.selector, indent+1);
print_ast(node->SelectorExpr.expr, indent+1);
print_ast(node->SelectorExpr.selector, indent+1);
break;
case AstNode_IndexExpr:
print_indent(indent);
gb_printf("([])\n");
print_ast(node->index_expr.expr, indent+1);
print_ast(node->index_expr.index, indent+1);
print_ast(node->IndexExpr.expr, indent+1);
print_ast(node->IndexExpr.index, indent+1);
break;
case AstNode_CastExpr:
print_indent(indent);
gb_printf("(cast)\n");
print_ast(node->cast_expr.type, indent+1);
print_ast(node->cast_expr.expr, indent+1);
print_ast(node->CastExpr.type, indent+1);
print_ast(node->CastExpr.expr, indent+1);
break;
case AstNode_DerefExpr:
print_indent(indent);
gb_printf("(deref)\n");
print_ast(node->deref_expr.expr, indent+1);
print_ast(node->DerefExpr.expr, indent+1);
break;
case AstNode_ExprStmt:
print_ast(node->expr_stmt.expr, indent);
print_ast(node->ExprStmt.expr, indent);
break;
case AstNode_IncDecStmt:
print_indent(indent);
print_token(node->inc_dec_stmt.op);
print_ast(node->inc_dec_stmt.expr, indent+1);
print_token(node->IncDecStmt.op);
print_ast(node->IncDecStmt.expr, indent+1);
break;
case AstNode_AssignStmt:
print_indent(indent);
print_token(node->assign_stmt.op);
print_ast(node->assign_stmt.lhs_list, indent+1);
print_ast(node->assign_stmt.rhs_list, indent+1);
print_token(node->AssignStmt.op);
print_ast(node->AssignStmt.lhs_list, indent+1);
print_ast(node->AssignStmt.rhs_list, indent+1);
break;
case AstNode_BlockStmt:
print_indent(indent);
gb_printf("(block)\n");
print_ast(node->block_stmt.list, indent+1);
print_ast(node->BlockStmt.list, indent+1);
break;
case AstNode_IfStmt:
print_indent(indent);
gb_printf("(if)\n");
print_ast(node->if_stmt.cond, indent+1);
print_ast(node->if_stmt.body, indent+1);
if (node->if_stmt.else_stmt) {
print_ast(node->IfStmt.cond, indent+1);
print_ast(node->IfStmt.body, indent+1);
if (node->IfStmt.else_stmt) {
print_indent(indent);
gb_printf("(else)\n");
print_ast(node->if_stmt.else_stmt, indent+1);
print_ast(node->IfStmt.else_stmt, indent+1);
}
break;
case AstNode_ReturnStmt:
print_indent(indent);
gb_printf("(return)\n");
print_ast(node->return_stmt.result_list, indent+1);
print_ast(node->ReturnStmt.result_list, indent+1);
break;
case AstNode_ForStmt:
print_indent(indent);
gb_printf("(for)\n");
print_ast(node->for_stmt.init, indent+1);
print_ast(node->for_stmt.cond, indent+1);
print_ast(node->for_stmt.end, indent+1);
print_ast(node->for_stmt.body, indent+1);
print_ast(node->ForStmt.init, indent+1);
print_ast(node->ForStmt.cond, indent+1);
print_ast(node->ForStmt.end, indent+1);
print_ast(node->ForStmt.body, indent+1);
break;
case AstNode_DeferStmt:
print_indent(indent);
gb_printf("(defer)\n");
print_ast(node->defer_stmt.stmt, indent+1);
print_ast(node->DeferStmt.stmt, indent+1);
break;
case AstNode_VarDecl:
print_indent(indent);
if (node->var_decl.kind == Declaration_Mutable)
if (node->VarDecl.kind == Declaration_Mutable)
gb_printf("(decl:var,mutable)\n");
else if (node->var_decl.kind == Declaration_Immutable)
else if (node->VarDecl.kind == Declaration_Immutable)
gb_printf("(decl:var,immutable)\n");
print_ast(node->var_decl.name_list, indent+1);
print_ast(node->var_decl.type, indent+1);
print_ast(node->var_decl.value_list, indent+1);
print_ast(node->VarDecl.name_list, indent+1);
print_ast(node->VarDecl.type, indent+1);
print_ast(node->VarDecl.value_list, indent+1);
break;
case AstNode_ProcDecl:
print_indent(indent);
if (node->proc_decl.kind == Declaration_Mutable)
if (node->ProcDecl.kind == Declaration_Mutable)
gb_printf("(decl:proc,mutable)\n");
else if (node->proc_decl.kind == Declaration_Immutable)
else if (node->ProcDecl.kind == Declaration_Immutable)
gb_printf("(decl:proc,immutable)\n");
print_ast(node->proc_decl.type, indent+1);
print_ast(node->proc_decl.body, indent+1);
print_ast(node->proc_decl.tag_list, indent+1);
print_ast(node->ProcDecl.type, indent+1);
print_ast(node->ProcDecl.body, indent+1);
print_ast(node->ProcDecl.tag_list, indent+1);
break;
case AstNode_TypeDecl:
print_indent(indent);
gb_printf("(type)\n");
print_ast(node->type_decl.name, indent+1);
print_ast(node->type_decl.type, indent+1);
print_ast(node->TypeDecl.name, indent+1);
print_ast(node->TypeDecl.type, indent+1);
break;
case AstNode_AliasDecl:
print_indent(indent);
gb_printf("(alias)\n");
print_ast(node->alias_decl.name, indent+1);
print_ast(node->alias_decl.type, indent+1);
print_ast(node->AliasDecl.name, indent+1);
print_ast(node->AliasDecl.type, indent+1);
break;
case AstNode_ProcType:
print_indent(indent);
gb_printf("(type:proc)(%td -> %td)\n", node->proc_type.param_count, node->proc_type.result_count);
print_ast(node->proc_type.param_list, indent+1);
if (node->proc_type.result_list) {
gb_printf("(type:proc)(%td -> %td)\n", node->ProcType.param_count, node->ProcType.result_count);
print_ast(node->ProcType.param_list, indent+1);
if (node->ProcType.result_list) {
print_indent(indent+1);
gb_printf("->\n");
print_ast(node->proc_type.result_list, indent+1);
print_ast(node->ProcType.result_list, indent+1);
}
break;
case AstNode_Field:
print_ast(node->field.name_list, indent);
print_ast(node->field.type, indent);
print_ast(node->Field.name_list, indent);
print_ast(node->Field.type, indent);
break;
case AstNode_PointerType:
print_indent(indent);
print_token(node->pointer_type.token);
print_ast(node->pointer_type.type, indent+1);
print_token(node->PointerType.token);
print_ast(node->PointerType.type, indent+1);
break;
case AstNode_ArrayType:
print_indent(indent);
gb_printf("[]\n");
print_ast(node->array_type.count, indent+1);
print_ast(node->array_type.elem, indent+1);
print_ast(node->ArrayType.count, indent+1);
print_ast(node->ArrayType.elem, indent+1);
break;
case AstNode_StructType:
print_indent(indent);
gb_printf("(struct)\n");
print_ast(node->struct_type.field_list, indent+1);
print_ast(node->StructType.field_list, indent+1);
break;
}