From c8efb29a3575304ed22e7e240885265e0e93ea3d Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Fri, 14 Apr 2017 20:36:13 -0700 Subject: Make it a warning only when built-ins redefined. * eval.c (builtin_reject_test): Issue warnings rather than errors when built-in macros, functions or operators are redefined. For now, we don't provide any way to suppress the warning. --- eval.c | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/eval.c b/eval.c index eece7f3d..815689f0 100644 --- a/eval.c +++ b/eval.c @@ -1947,11 +1947,11 @@ static void builtin_reject_test(val op, val sym, val form) } else if (opt_compat && opt_compat <= 107) { /* empty */ } else if (builtin_kind) { - eval_error(form, lit("~s: cannot bind ~s, which is a built-in ~s"), - op, sym, builtin_kind, nao); + eval_warn(form, lit("~s: redefining ~s, which is a built-in ~s"), + op, sym, builtin_kind, nao); } else if (is_operator) { - eval_error(form, lit("~s: cannot bind ~s, which is a built-in operator"), - op, sym, nao); + eval_warn(form, lit("~s: redefining ~s, which is a built-in operator"), + op, sym, nao); } } -- cgit v1.2.3