From cdc4aa86bb853a959aeb08523ea64c24970c5c71 Mon Sep 17 00:00:00 2001 From: nishi Date: Sat, 27 Apr 2024 02:19:35 +0000 Subject: [PATCH] define-var to define-variable, define-func to define-subroutine git-svn-id: file:///raid/svn-main/nishi-serenade/trunk@69 0f02c867-ac3d-714e-8a88-971ba1f6efcf --- Serenade/interpreter.c | 2 +- Serenade/run.c | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/Serenade/interpreter.c b/Serenade/interpreter.c index 58c9a30..993d808 100644 --- a/Serenade/interpreter.c +++ b/Serenade/interpreter.c @@ -152,7 +152,7 @@ void sn_stdlib_init(struct sn_interpreter* sn) { sn_set_handler(sn, "/", math_handler); sn_set_handler(sn, "print", print_handler); sn_set_handler(sn, "eval", eval_handler); - sn_set_handler(sn, "define-var", defvar_handler); + sn_set_handler(sn, "define-variable", defvar_handler); sn_set_handler(sn, "source", source_handler); } diff --git a/Serenade/run.c b/Serenade/run.c index d7037e4..705c93f 100644 --- a/Serenade/run.c +++ b/Serenade/run.c @@ -77,7 +77,7 @@ struct sn_generic* _sn_run(struct sn_interpreter* sn, struct sn_generic* gen) { r->string = sn_strdup(SERENADE_VERSION); r->string_length = strlen(r->string); return r; - } else if(strcmp(op->name, "define-func") == 0) { + } else if(strcmp(op->name, "define-subroutine") == 0) { char* name = malloc(gen->tree->args[1]->string_length + 1); memcpy(name, gen->tree->args[1]->string, gen->tree->args[1]->string_length); name[gen->tree->args[1]->string_length] = 0; -- 2.43.0