pcre: add a comment for future knowledges.

diff --git a/extra/pcre/pcre.factor b/extra/pcre/pcre.factor
index 963c1613af4bac9b188b0303c6d7c1836a27e644..4f388e0e18294c674ecb1ad9b02d4434f3476249 100644 (file)
--- a/extra/pcre/pcre.factor
+++ b/extra/pcre/pcre.factor
@@ -60,6 +60,8 @@ ERROR: pcre-error value ;
 
 : name-table ( pcre extra -- addr )
     [ drop alien-address 32 on-bits unmask ]
+    ! On at least win64, the pointer is returned as an int and is
+    ! negative. Cast it to a uint and everything works.
     [ PCRE_INFO_NAMETABLE pcre-fullinfo int <ref> uint deref ] 2bi + ;
 
 : name-entry-size ( pcre extra -- size )