oyvindskaaden
/
TDT4205
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Added strings, and cleaned up

main
Øyvind Skaaden 2022-03-17 22:00:38 +01:00
parent d80961ec56
commit e839190fbf
1 changed files with 44 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

59
exercises/04/vslc/src/ir.c
View File

@ -116,6 +116,17 @@ print_global_tree(symbol_t* global)
free(locals_list);
}
void
print_string_list(void)
{
printf("─STRINGS [%ld]\n", stringc);
for (uint64_t i = 0; i < stringc; i++)
printf(" %s─[%ld]: %s\n",
(i < (stringc - 1)) ? "├" : "└",
i, string_list[i]
);
}
void
print_symbol_table ( void )
@ -133,6 +144,8 @@ print_symbol_table ( void )
print_global_tree(global_list[g]);
}
free(global_list);
print_string_list();
}
void
@ -283,7 +296,6 @@ find_globals ( void )
break;
}
}
}
void
@ -318,35 +330,29 @@ void
insert_local_to_scope(symbol_t *local)
{
insert_symbol(scopes[cur_scope_depth - 1], local);
/*tlhash_insert(
scopes[cur_scope_depth - 1], //! Insert local to topmost scope
local->name, //! Key is name, this is used to do lookup
strlen(local->name), //! Length of key
local //! The local symbol
);*/
}
void
insert_local_to_func(symbol_t *function, symbol_t *local)
insert_local_to_func(symbol_t *function, symbol_t *root)
{
tlhash_insert(
function->locals, //! Insert local to the function var table
&local->seq, //! The key is a number, unique, strictly growing
sizeof(local->seq), //! Size of key
local //! The local symbol
&root->seq, //! The key is a number, unique, strictly growing
sizeof(root->seq), //! Size of key
root //! The local symbol
);
}
void
insert_local_var(symbol_t *function, node_t *local)
insert_local_var(symbol_t *function, node_t *root)
{
size_t sequence = tlhash_size(function->locals);
symbol_t *variable = malloc(sizeof(symbol_t));
*variable = (symbol_t){
.type = SYM_LOCAL_VAR,
.name = local->data,
.node = local,
.name = root->data,
.node = root,
.seq = sequence, //! Use sequence as name in var list of function, strictly growing
.nparms = 0,
.locals = NULL
@ -355,10 +361,32 @@ insert_local_var(symbol_t *function, node_t *local)
insert_local_to_func(function, variable);
}
void
collect_string(node_t *root)
{
if (!root->data)
return;
string_list[stringc] = root->data;
root->data = malloc(sizeof(size_t));
*((size_t*)root->data) = stringc++;
if (stringc >= n_string_list)
{
n_string_list *= 2;
char **new_string_list = realloc(string_list, n_string_list * sizeof(char*));
if (!new_string_list)
{
fprintf(stderr, "[ERROR] Could not realloc string list!\n");
exit(EXIT_FAILURE);
}
string_list = new_string_list;
}
}
void
bind_names ( symbol_t *function, node_t *root )
{
/* TODO: Bind names and string literals in local symbol table */
if (!function)
return;
if (!root)
@ -393,6 +421,7 @@ bind_names ( symbol_t *function, node_t *root )
break;
case STRING_DATA:
collect_string(root);
break;
default: