Index: /branches/win64/level-1/linux-files.lisp
===================================================================
--- /branches/win64/level-1/linux-files.lisp	(revision 9646)
+++ /branches/win64/level-1/linux-files.lisp	(revision 9647)
@@ -498,5 +498,5 @@
 #+windows-target
 (defun fd-dup (fd &key direction inheritable)
-  (rlet ((handle #>LPHANDLE))
+  (rlet ((handle #>HANDLE))
     (#_DuplicateHandle (#_GetCurrentProcess)
 		       (#__get_osfhandle fd)