datas are equal? when they refer to the same pointer

picrin-scheme · Feb 6, 2016 · e076a8f · e076a8f
1 parent d710fa3
commit e076a8f
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/extlib/benz/bool.c b/extlib/benz/bool.c
@@ -118,6 +118,9 @@ internal_equal_p(pic_state *pic, pic_value x, pic_value y, int depth, khash_t(m)
     }
     return true;
   }
+  case PIC_TT_DATA: {
+    return pic_data_ptr(x)->data == pic_data_ptr(y)->data;
+  }
   default:
     return false;
   }