DHBW
/
gemstone
mirror of https://github.com/Servostar/gemstone.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

fixed failing check

This commit is contained in:
Sven Vogel 2024-07-18 23:12:47 +02:00
parent 6596edf6f8
commit cedb12d7b6
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/set/set.c
View File

@ -1483,7 +1483,7 @@ Expression *createExpression(AST_NODE_PTR currentNode) {
return NULL; return NULL;
} }
if (expression->impl.parameter->kind == VariableKindDeclaration) { if (expression->impl.parameter->kind == ParameterDeclarationKind) {
expression->result = expression->impl.parameter->impl.declaration.type; expression->result = expression->impl.parameter->impl.declaration.type;
} else { } else {
expression->result = expression->impl.parameter->impl.definiton.declaration.type; expression->result = expression->impl.parameter->impl.definiton.declaration.type;
@ -1702,7 +1702,7 @@ int createAssign(Statement *ParentStatement, AST_NODE_PTR currentNode) {
return SEMANTIC_ERROR; return SEMANTIC_ERROR;
} }
if (strg_expr->kind == StorageExprKindParameter) { if (strg_expr->kind == AST_Parameter) {
if (getParameterQualifier(assign.destination->impl.parameter) == In) { if (getParameterQualifier(assign.destination->impl.parameter) == In) {
print_diagnostic(&currentNode->location, Error, "Parameter is read-only: `%s`", assign.destination->impl.parameter->name); print_diagnostic(&currentNode->location, Error, "Parameter is read-only: `%s`", assign.destination->impl.parameter->name);
return SEMANTIC_ERROR; return SEMANTIC_ERROR;