From 4f9ffa5e5921fbc00f9312bcbcfa3a0613edb0b8 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Sat, 24 Apr 2010 16:02:08 +0000
Subject: [PATCH] GNU/MIT Scheme: Attempt to fix Cygwin builds.

svn path=/nixpkgs/trunk/; revision=21295
---
 pkgs/development/compilers/mit-scheme/default.nix   |  3 +++
 .../compilers/mit-scheme/ucontext-cygwin.patch      | 13 +++++++++++++
 2 files changed, 16 insertions(+)
 create mode 100644 pkgs/development/compilers/mit-scheme/ucontext-cygwin.patch

diff --git a/pkgs/development/compilers/mit-scheme/default.nix b/pkgs/development/compilers/mit-scheme/default.nix
index 9ddd3b6791dd..0cfbcc959221 100644
--- a/pkgs/development/compilers/mit-scheme/default.nix
+++ b/pkgs/development/compilers/mit-scheme/default.nix
@@ -33,6 +33,9 @@ stdenv.mkDerivation {
 
   buildInputs = [ gnum4 ];
 
+  patches =
+    stdenv.lib.optional (stdenv.system == "i686-cygwin") ./ucontext-cygwin.patch;
+
   # XXX: The `check' target doesn't exist.
   doCheck = false;
 
diff --git a/pkgs/development/compilers/mit-scheme/ucontext-cygwin.patch b/pkgs/development/compilers/mit-scheme/ucontext-cygwin.patch
new file mode 100644
index 000000000000..2bc279ff4a7d
--- /dev/null
+++ b/pkgs/development/compilers/mit-scheme/ucontext-cygwin.patch
@@ -0,0 +1,13 @@
+Make `ucontext_t' definition visible on Cygwin.  See
+<http://thread.gmane.org/gmane.lisp.scheme.mit-scheme.devel/489>.
+
+--- mit-scheme-9.0.1/src/microcode/uxtrap.h	2010-02-09 01:09:53.000000000 +0100
++++ mit-scheme-9.0.1/src/microcode/uxtrap.h	2010-04-24 17:55:01.000000000 +0200
+@@ -27,6 +27,7 @@ USA.
+ #define SCM_UXTRAP_H
+ 
+ #include "os.h"
++#include <ucontext.h>
+ 
+ /* Machine/OS-dependent section (long) */
+