Hello, all!

I hope this is correct fix, if not - please do not apply it.
BCC explains about incorrect numeric operation for some reason ...

diff -u -r perl@14331-orig/hv.h perl@14331/hv.h
--- perl@14331-orig/hv.h        Thu Jan  3 08:54:58 2002
+++ perl@14331/hv.h     Sun Jan 20 23:40:40 2002
@@ -145,7 +145,7 @@
 #define XHvPLACEHOLDERS(xhv)   ((xhv)->xhv_placeholders)
 
 /* the number of keys that exist() (i.e. excluding placeholers) */
-#define XHvUSEDKEYS(xhv)      (XHvTOTALKEYS(xhv) - XHvPLACEHOLDERS(xhv))
+#define XHvUSEDKEYS(xhv)      (XHvTOTALKEYS(xhv) -
(int)XHvPLACEHOLDERS(xhv))
 
 /*
  * HvKEYS gets the number of keys that actually exist(), and is provided



Best wishes,
Vadim.

Reply via email to