scarlett/compiler-the-translators
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

added entries for reserve and release

Browse Source
This commit is contained in:
Partho
2025-04-15 19:44:46 -04:00
parent b325548b97
commit 90f9eb2f00
3 changed files with 28 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
src/grammar.y
View File

@ -392,6 +392,7 @@ sblock:
printdebug("Moving up a scope after seeing sblock with dblock");
cur = getParent(cur);
//$<tn>$ = $5;
}
R_BRACE
{$$ = $5;}

28
src/symbol_table.c
View File

@ -605,20 +605,31 @@ SymbolTable *init(SymbolTable *start) {
chara = (TableNode *)calloc(1, sizeof(TableNode));
stri = (TableNode *)calloc(1, sizeof(TableNode));
boo = (TableNode *)calloc(1, sizeof(TableNode));
TableNode* reservetype = (TableNode *)calloc(1, sizeof(TableNode));
TableNode* reserve = (TableNode *)calloc(1, sizeof(TableNode));
TableNode* releasetype = (TableNode *)calloc(1, sizeof(TableNode));
TableNode* release = (TableNode *)calloc(1, sizeof(TableNode));
// TableNode* arr = (TableNode*)malloc(sizeof(SymbolTable));
start->entries = integ;
integ->next = addr;
addr->next = chara;
chara->next = stri;
stri->next = boo;
// boo->next = arr;
boo->next = NULL;
boo->next = reservetype;
reservetype->next = reserve;
reserve->next = releasetype;
releasetype->next = release;
release->next = NULL;
integ->theName = "integer";
addr->theName = "address";
chara->theName = "character";
boo->theName = "Boolean";
stri->theName = "string";
reserve->theName = "reserve";
reservetype->theName = "reserve type";
releasetype->theName = "release type";
release->theName = "release";
// arr->theName= "array"
// root TableNode that all are pointing to but not in table
@ -685,6 +696,11 @@ SymbolTable *init(SymbolTable *start) {
chara->theType = prime;
stri->theType = arrayprim;
boo->theType = prime;
reserve->theType = reservetype;
reservetype->theType = funtypeprime;
releasetype->theType = funtypeprime;
release->theType = releasetype;
// arr->theType=arrayprim;
// filling in all the values for the additional info for initial types
@ -697,12 +713,20 @@ SymbolTable *init(SymbolTable *start) {
chara->additionalinfo = CreatePrimitiveInfo(SIZE_CHAR);
stri->additionalinfo = CreateArrayInfo(1, chara);
boo->additionalinfo = CreatePrimitiveInfo(SIZE_BOOL);
reserve->additionalinfo = CreateFunctionDeclarationInfo(0, false);
reservetype->additionalinfo = CreateFunctionTypeInfo(integ, addr);
releasetype->additionalinfo = CreateFunctionTypeInfo(addr, integ);
release->additionalinfo = CreateFunctionDeclarationInfo(0, false);
integ->tag = TYPE_PRIMITIVE_TYPE; // explicitly set the type for integ
addr->tag = TYPE_PRIMITIVE_TYPE; // explicitly set the type for addr
chara->tag = TYPE_PRIMITIVE_TYPE; // explicitly set the type for chara
stri->tag = TYPE_ARRAY_TYPE; // explicitly set the type for stri
boo->tag = TYPE_PRIMITIVE_TYPE; // explicitly set the type for boo
reserve->tag = TYPE_FUNCTION_DECLARATION;
reservetype->tag = TYPE_FUNCTION_TYPE;
releasetype->tag = TYPE_FUNCTION_TYPE;
release->tag = TYPE_FUNCTION_DECLARATION;
// addr->additionalinfo = CreatePrimitiveInfo(8);
start->Line_Number = 1;

2
tests/sprint2/test/sp2_simple.alpha
View File

@ -4,4 +4,4 @@ function entry: main
entry(arg) := {
[integer : x]
return 0;
}
}