From a7ec391cf874b67b99a6b737931a4b8ffc88de80 Mon Sep 17 00:00:00 2001
From: Joe Taylor <k1jt@arrl.org>
Date: Tue, 16 Sep 2008 17:41:23 +0000
Subject: [PATCH] Update the *nix Makefile.in. Removed unused stuff from
 deep65.F.

git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/map65@1020 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
---
 Makefile.in          | 7 ++++---
 deep65.F             | 3 ---
 map65.py             | 2 +-
 plrr.f90 => plrr.F90 | 0
 4 files changed, 5 insertions(+), 7 deletions(-)
 rename plrr.f90 => plrr.F90 (100%)

diff --git a/Makefile.in b/Makefile.in
index 1555fe25d..f28015009 100644
--- a/Makefile.in
+++ b/Makefile.in
@@ -107,12 +107,13 @@ encode_rs_int.o: encode_rs.c
 decode_rs_int.o: decode_rs.c
 	$(CC) $(CFLAGS) -c -DBIGSYM=1 -o decode_rs_int.o decode_rs.c
 
-plrr:   plrr.f90 sec_midn.F90 plrr_subs.c cutil.c
-	$(FC) -o plrr plrr.f90 sec_midn.F90 plrr_subs.c cutil.c
+plrr:   plrr.F90 sec_midn.F90 plrr_subs.c cutil.c
+	$(CC) -c plrs_subs.c cutil.c
+	$(FC) -o plrr -fno-second-underscore plrr.F90 sec_midn.F90 plrr_subs.o cutil.o
 
 plrs:   plrs.F90 sec_midn.F90 plrs_subs.c cutil.c
 	$(CC) -c plrs_subs.c cutil.c
-	$(FC) -o plrs plrs.F90 sec_midn.F90 plrs_subs.o cutil.o
+	$(FC) -o plrs -fno-second-underscore plrs.F90 sec_midn.F90 plrs_subs.o cutil.o
 
 .PHONY : clean
 clean:
diff --git a/deep65.F b/deep65.F
index 937e1f930..a5b2ac7b9 100644
--- a/deep65.F
+++ b/deep65.F
@@ -12,7 +12,6 @@
       character*180 line
       character*4 rpt(MAXRPT)
       integer ncode(63,2*MAXCALLS + 2 + MAXRPT)
-      integer istat23(13)
       real pp(2*MAXCALLS + 2 + MAXRPT)
       common/mrscom/ mrs(63),mrs2(63)
 
@@ -32,8 +31,6 @@
      +         'RO','RRR','73'/
       save
 
-!      call fstatqqq(23,istat23,ierr)         !@@@
-!      modified=istat23(10)                   !@@@
       modified=0                              !@@@
       if(mycall.eq.mycall0 .and. hiscall.eq.hiscall0 .and. 
      +   hisgrid.eq.hisgrid0 .and. modified.eq.modified0) go to 30
diff --git a/map65.py b/map65.py
index c6f2f2eac..39d3e0e87 100644
--- a/map65.py
+++ b/map65.py
@@ -1,4 +1,4 @@
-#-------------------------------------------------------------------- MAP65
+#--------------------------------------------------------------------- MAP65
 # $Date$ $Revision$
 #
 from Tkinter import *
diff --git a/plrr.f90 b/plrr.F90
similarity index 100%
rename from plrr.f90
rename to plrr.F90