From e0025483a06f2d0c15e3b0d9e8d0977255c72b48 Mon Sep 17 00:00:00 2001 From: Justin Ethier Date: Wed, 25 Mar 2015 22:24:57 -0400 Subject: [PATCH] Tweak has-cycle to check symbols again. flip-flopping on this --- runtime.h | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/runtime.h b/runtime.h index a64ae49c..5bdc4dbb 100644 --- a/runtime.h +++ b/runtime.h @@ -566,7 +566,7 @@ static object Cyc_has_cycle(object lst) { if (Cyc_is_cons(cdr(fast_lst)) == boolean_f) return boolean_f; if (is_object_type(car(slow_lst)) && boolean_f == Cyc_is_boolean(car(slow_lst)) && // Avoid expected dupes - boolean_f == Cyc_is_symbol(car(slow_lst)) && // + //boolean_f == Cyc_is_symbol(car(slow_lst)) && // eq(car(slow_lst), car(fast_lst))) return boolean_t; slow_lst = cdr(slow_lst);