jacob/scl
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases 1 Wiki Activity

Fixed function calls on builtin.

Browse Source 
Random pointer indirection.
This commit is contained in:
Jacob Signorovitch 2025-02-25 07:56:25 -05:00
parent 79b60e4853
commit 109bcb3fa5
1 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/exec.c
View File

@ -66,12 +66,14 @@ AST* exec_call(AST* ast) {
AST* fdef = exec_find(fname); AST* fdef = exec_find(fname);
if (fdef == NULL) if (fdef == NULL)
return ast_init(AST_TYPE_EXC, ast_exc_data_init(strdup("No such function found."))); return ast_init(
AST_TYPE_EXC, ast_exc_data_init(strdup("No such function found."))
);
switch (fdef->type) { switch (fdef->type) {
case AST_TYPE_BIF: case AST_TYPE_BIF:
ASTBIFData* bifdata = fdef->data; ASTBIFData bifdata = fdef->data;
return (*bifdata)(argc, argv); return bifdata(argc, argv);
default: return ast_init(AST_TYPE_EXC, ast_exc_data_init("Good job")); default: return ast_init(AST_TYPE_EXC, ast_exc_data_init("Good job"));
} }
} }