From 3f3eccf1a4f3cce10abb256edfaee1cb20c1a3e8 Mon Sep 17 00:00:00 2001
From: Joe Taylor <k1jt@arrl.org>
Date: Thu, 29 Dec 2005 21:07:24 +0000
Subject: [PATCH] Fixed igray.c to compile on Windows; changed go.bat
 accordingly.

git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/trunk@37 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
---
 go.bat  | 3 ++-
 igray.c | 4 ++++
 wsjt.py | 2 +-
 3 files changed, 7 insertions(+), 2 deletions(-)

diff --git a/go.bat b/go.bat
index 48428a3f7..d999ccad2 100644
--- a/go.bat
+++ b/go.bat
@@ -2,4 +2,5 @@ cl /c /DBIGSYM=1 /Foinit_rs.obj init_rs.c
 cl /c /DBIGSYM=1 /Foencode_rs.obj encode_rs.c
 cl /c /DBIGSYM=1 /Ox /Zd /Fodecode_rs.obj decode_rs.c
 cl /c /DWIN32=1 wrapkarn.c
-df /exe:JT65code.exe JT65code_all.f /link wrapkarn.obj init_rs.obj encode_rs.obj decode_rs.obj
+cl /c /DWIN32=1 igray.c
+df /exe:JT65code.exe JT65code_all.f /link wrapkarn.obj init_rs.obj encode_rs.obj decode_rs.obj igray.obj
diff --git a/igray.c b/igray.c
index 4646898b5..e46b4f1f7 100644
--- a/igray.c
+++ b/igray.c
@@ -1,4 +1,8 @@
+#ifdef WIN32
+extern int __stdcall IGRAY(int *n0, int *idir)
+#else
 int igray_(int *n0, int *idir)
+#endif
 {
   int n;
   unsigned long sh;
diff --git a/wsjt.py b/wsjt.py
index 444a400ac..1872d0db8 100644
--- a/wsjt.py
+++ b/wsjt.py
@@ -1,4 +1,4 @@
-# ----------------------------------------------------------- WSJT
+# ---------------------------------------------------------- WSJT
 from Tkinter import *
 from tkFileDialog import *
 import Pmw