Index: /branches/working-0711/ccl/lib/foreign-types.lisp
===================================================================
--- /branches/working-0711/ccl/lib/foreign-types.lisp	(revision 12955)
+++ /branches/working-0711/ccl/lib/foreign-types.lisp	(revision 12956)
@@ -1729,5 +1729,6 @@
     (:array #>wchar_t #.#$MAX_PATH)
     #>fd_set
-    #>DWORD_PTR))
+    #>DWORD_PTR
+    #>SYSTEMTIME))