From 452567f7d0e08e88101e1127533a854e5a4baee2 Mon Sep 17 00:00:00 2001
From: Doug Coleman <doug.coleman@gmail.com>
Date: Thu, 10 Jul 2014 16:22:45 -0700
Subject: [PATCH] pcre: On at least win64, the pointer is returned as an int
 and is negative. Cast it to a uint and everything works. Fixes #1105.

---
 extra/pcre/pcre.factor | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/extra/pcre/pcre.factor b/extra/pcre/pcre.factor
index bfd16ce835..963c1613af 100644
--- a/extra/pcre/pcre.factor
+++ b/extra/pcre/pcre.factor
@@ -60,7 +60,7 @@ ERROR: pcre-error value ;
 
 : name-table ( pcre extra -- addr )
     [ drop alien-address 32 on-bits unmask ]
-    [ PCRE_INFO_NAMETABLE pcre-fullinfo ] 2bi + ;
+    [ PCRE_INFO_NAMETABLE pcre-fullinfo int <ref> uint deref ] 2bi + ;
 
 : name-entry-size ( pcre extra -- size )
     PCRE_INFO_NAMEENTRYSIZE pcre-fullinfo ;