Added g95-compiled KVASD. Updated version to 0.9.

git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/map65@596 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
Joe Taylor 2007-12-21 18:51:43 +00:00
parent 06a8165cc8
commit f99ad05c1d
3 changed files with 2 additions and 4 deletions

BIN
KVASD_g95.EXE Normal file

Binary file not shown.

View File

@ -18,7 +18,7 @@ from types import *
import array import array
root = Tk() root = Tk()
Version="0.8 r" + "$Rev$"[6:-1] Version="0.9 r" + "$Rev$"[6:-1]
Version=Version.strip() Version=Version.strip()
print "******************************************************************" print "******************************************************************"
print "MAP65 Version " + Version + ", by K1JT" print "MAP65 Version " + Version + ", by K1JT"

View File

@ -10,9 +10,7 @@ subroutine runqqq(fname,cmnd,iret)
#ifdef CVF #ifdef CVF
iret=runqq(fname,cmnd) iret=runqq(fname,cmnd)
#else #else
! iret=system('./KVASD -q >& /dev/null') iret=system('KVASD_g95 -q > dev_null')
iret=system('KVASD -q')
! print*,iret
#endif #endif
return return