w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2025-09-03 05:38:01 -04:00
Code Issues Packages Projects Releases Wiki Activity

Fix two unitialized variables in qra64b.f90. Complain only once about directory for azel.dat.

Browse Source 
git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/map65@8180 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
Joe Taylor 2017-10-23 17:29:03 +00:00
parent 6459d73eda
commit 4a7be650ad
3 changed files with 8 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
astro.cpp
View File

@ -14,6 +14,7 @@ Astro::Astro(QWidget *parent) :
ui->astroTextBrowser->setStyleSheet( ui->astroTextBrowser->setStyleSheet(
"QTextBrowser { background-color : cyan; color : black; }"); "QTextBrowser { background-color : cyan; color : black; }");
ui->astroTextBrowser->clear(); ui->astroTextBrowser->clear();
m_AzElDir0="";
} }
Astro::~Astro() Astro::~Astro()
@ -72,8 +73,10 @@ void Astro::astroUpdate(QDateTime t, QString mygrid, QString hisgrid,
QString fname=azelDir+"/azel.dat"; QString fname=azelDir+"/azel.dat";
QFile f(fname); QFile f(fname);
if(!f.open(QIODevice::WriteOnly | QIODevice::Text)) { if(!f.open(QIODevice::WriteOnly | QIODevice::Text)) {
if(azelDir==m_AzElDir0) return;
m_AzElDir0=azelDir;
QMessageBox mb; QMessageBox mb;
mb.setText("Cannot open " + fname); mb.setText("Cannot open " + fname + "\nCorrect the setting of AzEl Directory in Setup?");
mb.exec(); mb.exec();
return; return;
} }

1
astro.h
View File

@ -21,6 +21,7 @@ public:
private: private:
Ui::Astro *ui; Ui::Astro *ui;
QString m_AzElDir0;
}; };
extern "C" { extern "C" {

4
libm65/qra64b.f90
View File

@ -14,8 +14,8 @@ subroutine qra64b(nutc,nqd,fcenter,nfcal,nfsample,ikhz,mousedf,ntol,xpol, &
open(17,file='red.dat',status='unknown') open(17,file='red.dat',status='unknown')
nfft1=MAXNFFT1 nfft1=MAXFFT1
nfft2=MAXNFFT2 nfft2=MAXFFT2
df=96000.0/NFFT1 df=96000.0/NFFT1
if(nfsample.eq.95238) then if(nfsample.eq.95238) then
nfft1=5120000 nfft1=5120000