From d3f7a1d0b7ec2107db917d87bae452b6d877b6ab Mon Sep 17 00:00:00 2001
From: Michael Gran <spk121@yahoo.com>
Date: Sun, 27 Dec 2020 18:09:45 -0800
Subject: [PATCH] Need Guile and Windows types for the declarations posix-w32

* libguile/posix-w32.h: include scm.h and windows.h
---
 libguile/posix-w32.h | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/libguile/posix-w32.h b/libguile/posix-w32.h
index 8fe4f1c65..83860ff85 100644
--- a/libguile/posix-w32.h
+++ b/libguile/posix-w32.h
@@ -1,7 +1,7 @@
 #ifndef SCM_POSIX_W32_H
 #define SCM_POSIX_W32_H
 
-/* Copyright 2001,2006,2018
+/* Copyright 2001,2006,2018,2020
      Free Software Foundation, Inc.
 
    This file is part of Guile.
@@ -20,7 +20,14 @@
    License along with Guile.  If not, see
    <https://www.gnu.org/licenses/>.  */
 
+#ifdef _WIN32
+#ifndef WIN32_LEAN_AND_MEAN
+#define WIN32_LEAN_AND_MEAN
+#endif
+#include <Windows.h>
+#endif
 #include <string.h>
+#include "libguile/scm.h"
 
 #define _UTSNAME_LENGTH 65
 #define _UTSNAME_NODENAME_LENGTH _UTSNAME_LENGTH