From 708f348674b9eb24afe51cd33d93c0608a97cb5c Mon Sep 17 00:00:00 2001 From: Yuichi Nishiwaki Date: Sat, 5 Apr 2014 03:50:38 +0900 Subject: [PATCH] s/pic_null_syntactic_env/pic_null_syntactic_environment/g --- include/picrin/macro.h | 2 +- src/init.c | 2 +- src/lib.c | 2 +- src/macro.c | 2 +- 4 files changed, 4 insertions(+), 4 deletions(-) diff --git a/include/picrin/macro.h b/include/picrin/macro.h index dac3ea72..4dce6987 100644 --- a/include/picrin/macro.h +++ b/include/picrin/macro.h @@ -36,7 +36,7 @@ struct pic_sc { #define pic_senv_p(v) (pic_type(v) == PIC_TT_SENV) #define pic_senv_ptr(v) ((struct pic_senv *)pic_ptr(v)) -struct pic_senv *pic_null_syntactic_env(pic_state *); +struct pic_senv *pic_null_syntactic_environment(pic_state *); pic_sym pic_add_rename(pic_state *, struct pic_senv *, pic_sym); bool pic_find_rename(pic_state *, struct pic_senv *, pic_sym, pic_sym * /* = NULL */); diff --git a/src/init.c b/src/init.c index 5c6142c5..7a5b3d23 100644 --- a/src/init.c +++ b/src/init.c @@ -85,7 +85,7 @@ pic_init_core(pic_state *pic) pic_deflibrary ("(scheme base)") { /* load core syntaces */ - pic->lib->senv = pic_null_syntactic_env(pic); + pic->lib->senv = pic_null_syntactic_environment(pic); pic_put_rename(pic, pic->lib->senv, pic->sDEFINE, pic->sDEFINE); pic_put_rename(pic, pic->lib->senv, pic->sSETBANG, pic->sSETBANG); pic_put_rename(pic, pic->lib->senv, pic->sQUOTE, pic->sQUOTE); diff --git a/src/lib.c b/src/lib.c index 003ff6f6..82416b3e 100644 --- a/src/lib.c +++ b/src/lib.c @@ -24,7 +24,7 @@ pic_make_library(pic_state *pic, pic_value name) return lib; } - senv = pic_null_syntactic_env(pic); + senv = pic_null_syntactic_environment(pic); lib = (struct pic_lib *)pic_obj_alloc(pic, sizeof(struct pic_lib), PIC_TT_LIB); lib->senv = senv; diff --git a/src/macro.c b/src/macro.c index 9d2cb441..6f3fea29 100644 --- a/src/macro.c +++ b/src/macro.c @@ -12,7 +12,7 @@ #include "picrin/box.h" struct pic_senv * -pic_null_syntactic_env(pic_state *pic) +pic_null_syntactic_environment(pic_state *pic) { struct pic_senv *senv;