diff --git a/basis/windows/types/types.factor b/basis/windows/types/types.factor
index ea5daba688..cf21f74fd8 100644
--- a/basis/windows/types/types.factor
+++ b/basis/windows/types/types.factor
@@ -36,8 +36,8 @@ TYPEDEF: int                 HFILE
 
 TYPEDEF: long                LONG
 TYPEDEF: long*               LPLONG
-TYPEDEF: long                LONG_PTR
-TYPEDEF: long*               PLONG_PTR
+TYPEDEF: intptr_t            LONG_PTR
+TYPEDEF: intptr_t*           PLONG_PTR
 
 TYPEDEF: uint                ULONG
 TYPEDEF: void*               ULONG_PTR
@@ -55,9 +55,6 @@ TYPEDEF: intptr_t    UHALF_PTR
 TYPEDEF: intptr_t    INT_PTR
 TYPEDEF: intptr_t    UINT_PTR
 
-TYPEDEF: int         LONG_PTR
-TYPEDEF: ulong       ULONG_PTR
-
 TYPEDEF: int         INT32
 TYPEDEF: uint        UINT32
 TYPEDEF: uint        DWORD32