conservatory
/
picrin
4
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

define macro primitives (such as make-syntactic-closure) in (picrin macro)

This commit is contained in:
Yuichi Nishiwaki 2013-12-10 01:49:48 -08:00
parent fad425fcb9
commit 41ffd0d7e5
1 changed files with 7 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
src/macro.c
View File

@ -639,7 +639,11 @@ pic_macro_identifier_eq_p(pic_state *pic)
void
pic_init_macro(pic_state *pic)
{
pic_defun(pic, "make-syntactic-closure", pic_macro_make_sc);
pic_defun(pic, "identifier?", pic_macro_identifier_p);
pic_defun(pic, "identifier=?", pic_macro_identifier_eq_p);
DEFLIBRARY(pic, "(picrin macro)")
{
pic_defun(pic, "make-syntactic-closure", pic_macro_make_sc);
pic_defun(pic, "identifier?", pic_macro_identifier_p);
pic_defun(pic, "identifier=?", pic_macro_identifier_eq_p);
}
ENDLIBRARY(pic)
}