Compare commits

...

2 Commits

Author SHA1 Message Date
b98579699d Improve #def 2024-06-11 19:58:09 +05:00
74d20d9f37 Add some more keywords 2024-06-11 19:44:40 +05:00
2 changed files with 66 additions and 8 deletions

View File

@ -343,6 +343,29 @@ char* compile(tSyntaxElement* syntaxtree) {
compile_exit_tag(&result);
} else if (strcmp(token->content.string, "return") == 0) {
compile_enter_tag(&result);
string_append(&result, "return ");
string_append_free(&result,compile_expression(token->next));
compile_exit_tag(&result);
} else if (strcmp(token->content.string, "run") == 0) {
compile_enter_tag(&result);
string_append(&result, "run ");
string_append_free(&result,compile_expression(token->next));
if (token->next->next != NULL) {
string_append(&result, " with ");
string_append_free(&result,compile_expression(token->next->next));
}
compile_exit_tag(&result);
} else if (strcmp(token->content.string, "if") == 0) {
compile_enter_tag(&result);
@ -416,6 +439,29 @@ char* compile(tSyntaxElement* syntaxtree) {
compile_exit_tag(&result);
} else if (strcmp(token->content.string, "transform") == 0) {
compile_enter_tag(&result);
string_append(&result, "transform ");
string_append_free(&result, compile_expression(token->next->content.syntax));
string_append(&result, " in ");
string_append_free(&result, compile_expression(token->next->content.syntax->next));
string_append(&result, " as ");
string_append_free(&result, compile_expression(token->next->content.syntax->next->next));
compile_exit_tag(&result);
string_append_free(&result, compile(token->next->next));
compile_enter_tag(&result);
string_append(&result, "endtransform");
compile_exit_tag(&result);
} else if (strcmp(token->content.string, "for") == 0) {
compile_enter_tag(&result);

View File

@ -26,9 +26,10 @@ bool replace(tSyntaxElement* tree, tProcessingData* pd) {
return false;
}
void process_mod(tSyntaxElement* tree, tProcessingData* pdata) {
bool process_mod(tSyntaxElement* tree, tProcessingData* pdata) {
tProcessingData* pd = pdata;
bool b = false;
while (1) {
@ -38,7 +39,8 @@ void process_mod(tSyntaxElement* tree, tProcessingData* pdata) {
if (tree->type == TOKEN) {
switch (pd->type) {
case REPLACE:
replace(tree,pd);
if (replace(tree,pd))
b = true;
break;
case FUNCTION:
break;
@ -51,6 +53,8 @@ void process_mod(tSyntaxElement* tree, tProcessingData* pdata) {
else break;
}
return b;
}
@ -129,11 +133,12 @@ bool process_find(tSyntaxElement* tree, tProcessingData** p_pdata) {
}
void process(tSyntaxElement* tree, tProcessingData* pdata) {
bool process(tSyntaxElement* tree, tProcessingData* pdata) {
tProcessingData* pd = pdata;
bool deffound = false;
bool didreplace = false;
tProcessingData* firstpd = NULL;
@ -147,22 +152,29 @@ void process(tSyntaxElement* tree, tProcessingData* pdata) {
deffound = process_find(tree, &pd);
if (tree->next != NULL) {
process(tree->next, pd);
if (process(tree->next, pd))
didreplace = true;
}
if (!deffound) {
if (se_istraversable(tree))
process(tree->content.syntax, pd);
if (process(tree->content.syntax, pd))
didreplace = true;
process_mod(tree, pd);
if (process_mod(tree, pd))
didreplace = true;
}
if (pd != pdata)
free(pd);
if (firstpd != pd && firstpd != NULL)
if (firstpd != pd && firstpd != NULL) {
free(firstpd);
if (didreplace)
process(tree, NULL);
}
return didreplace;
}