core: Remove unused symbols.
authorJan Nieuwenhuizen <janneke@gnu.org>
Sat, 24 Dec 2016 10:21:30 +0000 (11:21 +0100)
committerJan Nieuwenhuizen <janneke@gnu.org>
Sat, 24 Dec 2016 10:21:30 +0000 (11:21 +0100)
* mes.c (scm_symbol_noexpand, scm_symbol_syntax,
 scm_symbol_quasisyntax, scm_symbol_unsyntax,
 scm_symbol_unsyntax_splicing, scm_symbol_quasiquote,
 scm_symbol_unquote, scm_symbol_unquote_splicing, scm_symbol_define,
 scm_symbol_define_macro): Remove.

mes.c

diff --git a/mes.c b/mes.c
index 74a79a5e82061e8027c20453473f5f97361cdc13..3f11524f3cf630224e39d98fae22d576999781c9 100644 (file)
--- a/mes.c
+++ b/mes.c
@@ -89,23 +89,13 @@ scm scm_symbol_dot = {SYMBOL, "*dot*"};
 scm scm_symbol_lambda = {SYMBOL, "lambda"};
 scm scm_symbol_begin = {SYMBOL, "begin"};
 scm scm_symbol_if = {SYMBOL, "if"};
-scm scm_symbol_define = {SYMBOL, "define"};
-scm scm_symbol_define_macro = {SYMBOL, "define-macro"};
 scm scm_symbol_set_x = {SYMBOL, "set!"};
 
 scm scm_symbol_quote = {SYMBOL, "quote"};
-scm scm_symbol_quasiquote = {SYMBOL, "quasiquote"};
-scm scm_symbol_unquote = {SYMBOL, "unquote"};
-scm scm_symbol_unquote_splicing = {SYMBOL, "unquote-splicing"};
 
 scm scm_symbol_sc_expand = {SYMBOL, "sc-expand"};
 scm scm_symbol_macro_expand = {SYMBOL, "macro-expand"};
 scm scm_symbol_sc_expander_alist = {SYMBOL, "*sc-expander-alist*"};
-scm scm_symbol_noexpand = {SYMBOL, "noexpand"};
-scm scm_symbol_syntax = {SYMBOL, "syntax"};
-scm scm_symbol_quasisyntax = {SYMBOL, "quasisyntax"};
-scm scm_symbol_unsyntax = {SYMBOL, "unsyntax"};
-scm scm_symbol_unsyntax_splicing = {SYMBOL, "unsyntax-splicing"};
 
 scm scm_symbol_call_with_values = {SYMBOL, "call-with-values"};
 scm scm_symbol_current_module = {SYMBOL, "current-module"};