Distinguish between cl_word_size and the ABI's pointer size.

[cln.git] / src / integer / elem / cl_I_equal.cc

diff --git a/src/integer/elem/cl_I_equal.cc b/src/integer/elem/cl_I_equal.cc
index 4bcc646ad970b822a96c6747089b51032541bd3d..3476f5fb1a4fe5fc3268521628974b5f7cf3aa18 100644 (file)
--- a/src/integer/elem/cl_I_equal.cc
+++ b/src/integer/elem/cl_I_equal.cc
@@ -27,7 +27,7 @@ cl_boolean cl_equal (const cl_I& x, const cl_I& y)
         // x Fixnum
         if (fixnump(y))
           // x Fixnum, y Fixnum
-          { // This assumes cl_value_shift + cl_value_len == cl_word_size.
+          { // This assumes cl_value_shift + cl_value_len == cl_pointer_size.
             return (cl_boolean) ((cl_sint)x.word == (cl_sint)y.word);
           }
           else