remove rLETREC_SYNTAX

This commit is contained in:
Yuichi Nishiwaki 2014-07-18 11:51:13 +09:00
parent b50f5fc54f
commit a867991b7e
2 changed files with 1 additions and 3 deletions

View File

@ -87,8 +87,7 @@ typedef struct {
pic_sym sEQ, sLT, sLE, sGT, sGE, sNOT;
pic_sym rDEFINE, rLAMBDA, rIF, rBEGIN, rQUOTE, rSETBANG;
pic_sym rDEFINE_SYNTAX, rDEFINE_MACRO;
pic_sym rLET_SYNTAX, rLETREC_SYNTAX;
pic_sym rDEFINE_SYNTAX, rDEFINE_MACRO, rLET_SYNTAX;
pic_sym rDEFINE_LIBRARY, rIMPORT, rEXPORT;
xhash syms; /* name to symbol */

View File

@ -131,7 +131,6 @@ pic_open(int argc, char *argv[], char **envp)
register_renamed_symbol(pic, rDEFINE_SYNTAX, "define-syntax");
register_renamed_symbol(pic, rDEFINE_MACRO, "define-macro");
register_renamed_symbol(pic, rLET_SYNTAX, "let-syntax");
register_renamed_symbol(pic, rLETREC_SYNTAX, "letrec-syntax");
register_renamed_symbol(pic, rDEFINE_LIBRARY, "define-library");
register_renamed_symbol(pic, rIMPORT, "import");
register_renamed_symbol(pic, rEXPORT, "export");