From 9d05ab26298e98e7e95721a2b208402df02a0c98 Mon Sep 17 00:00:00 2001
From: Yuichi Nishiwaki <yuichi.nishiwaki@gmail.com>
Date: Sat, 19 Jul 2014 12:24:38 +0900
Subject: [PATCH] s/rapid_count/c/g

---
 src/bool.c | 10 ++++++----
 1 file changed, 6 insertions(+), 4 deletions(-)

diff --git a/src/bool.c b/src/bool.c
index 270bb019..a985c625 100644
--- a/src/bool.c
+++ b/src/bool.c
@@ -35,7 +35,7 @@ static bool
 internal_equal_p(pic_state *pic, pic_value x, pic_value y, size_t depth, xhash *ht)
 {
   pic_value local = pic_nil_value();
-  size_t rapid_count = 0;
+  size_t c;
 
   if (depth > 10) {
     if (depth > 200) {
@@ -50,6 +50,8 @@ internal_equal_p(pic_state *pic, pic_value x, pic_value y, size_t depth, xhash *
     }
   }
 
+  c = 0;
+
  LOOP:
 
   if (pic_eqv_p(x, y))
@@ -73,10 +75,10 @@ internal_equal_p(pic_state *pic, pic_value x, pic_value y, size_t depth, xhash *
       x = pic_cdr(pic, x);
       y = pic_cdr(pic, y);
 
-      ++rapid_count;
+      c++;
 
-      if (rapid_count == 2) {
-        rapid_count = 0;
+      if (c == 2) {
+        c = 0;
         local = pic_cdr(pic, local);
         if (pic_eq_p(local, x)) {
           return true;