summaryrefslogtreecommitdiffstats
path: root/languages/fortran/fortransupportpart.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'languages/fortran/fortransupportpart.cpp')
-rw-r--r--languages/fortran/fortransupportpart.cpp86
1 files changed, 43 insertions, 43 deletions
diff --git a/languages/fortran/fortransupportpart.cpp b/languages/fortran/fortransupportpart.cpp
index e0c0bde9..7d4ed1bc 100644
--- a/languages/fortran/fortransupportpart.cpp
+++ b/languages/fortran/fortransupportpart.cpp
@@ -17,13 +17,13 @@
#include "ftnchekconfigwidget.h"
#include "fixedformparser.h"
-#include <qdir.h>
-#include <qfileinfo.h>
-#include <qpopupmenu.h>
-#include <qstringlist.h>
-#include <qtextstream.h>
-#include <qtimer.h>
-#include <qvbox.h>
+#include <tqdir.h>
+#include <tqfileinfo.h>
+#include <tqpopupmenu.h>
+#include <tqstringlist.h>
+#include <tqtextstream.h>
+#include <tqtimer.h>
+#include <tqvbox.h>
#include <kapplication.h>
#include <kdebug.h>
#include <kdialogbase.h>
@@ -48,24 +48,24 @@ typedef KDevGenericFactory<FortranSupportPart> FortranSupportFactory;
static const KDevPluginInfo data("kdevfortransupport");
K_EXPORT_COMPONENT_FACTORY( libkdevfortransupport, FortranSupportFactory( data ) )
-FortranSupportPart::FortranSupportPart(QObject *parent, const char *name, const QStringList &)
+FortranSupportPart::FortranSupportPart(TQObject *parent, const char *name, const TQStringList &)
: KDevLanguageSupport(&data, parent, name ? name : "FortranSupportPart")
{
setInstance(FortranSupportFactory::instance());
setXMLFile("kdevfortransupport.rc");
- connect( core(), SIGNAL(projectConfigWidget(KDialogBase*)),
- this, SLOT(projectConfigWidget(KDialogBase*)) );
- connect( core(), SIGNAL(projectOpened()), this, SLOT(projectOpened()) );
- connect( core(), SIGNAL(projectClosed()), this, SLOT(projectClosed()) );
- connect( partController(), SIGNAL(savedFile(const KURL&)),
- this, SLOT(savedFile(const KURL&)) );
+ connect( core(), TQT_SIGNAL(projectConfigWidget(KDialogBase*)),
+ this, TQT_SLOT(projectConfigWidget(KDialogBase*)) );
+ connect( core(), TQT_SIGNAL(projectOpened()), this, TQT_SLOT(projectOpened()) );
+ connect( core(), TQT_SIGNAL(projectClosed()), this, TQT_SLOT(projectClosed()) );
+ connect( partController(), TQT_SIGNAL(savedFile(const KURL&)),
+ this, TQT_SLOT(savedFile(const KURL&)) );
KAction *action;
action = new KAction( i18n("&Ftnchek"), 0,
- this, SLOT(slotFtnchek()),
+ this, TQT_SLOT(slotFtnchek()),
actionCollection(), "project_ftnchek" );
action->setToolTip(i18n("Run ftnchek"));
action->setWhatsThis(i18n("<b>Run ftnchek</b><p>Runs <b>ftnchek</b> to check fortran programs for semantic errors. Configure ftnchek options in project settings dialog, <b>Ftnchek</b> tab."));
@@ -89,9 +89,9 @@ void FortranSupportPart::slotFtnchek()
if (partController()->saveAllFiles()==false)
return; //user cancelled
- QDomDocument &dom = *projectDom();
+ TQDomDocument &dom = *projectDom();
- QString cmdline = "cd ";
+ TQString cmdline = "cd ";
cmdline += KProcess::quote(project()->projectDirectory());
cmdline += "&& ftnchek -nonovice ";
@@ -140,26 +140,26 @@ void FortranSupportPart::slotFtnchek()
else
cmdline += DomUtil::readEntry(dom, "/kdevfortransupport/ftnchek/portabilityonly") + " ";
- QStringList list = project()->allFiles();
- QStringList::ConstIterator it;
+ TQStringList list = project()->allFiles();
+ TQStringList::ConstIterator it;
for (it = list.begin(); it != list.end(); ++it) {
- QFileInfo fi(*it);
- QString extension = fi.extension();
+ TQFileInfo fi(*it);
+ TQString extension = fi.extension();
if (extension == "f77" || extension == "f" || extension == "for"
|| extension == "ftn") {
cmdline += *it + " ";
}
}
- makeFrontend()->queueCommand(QString::null, cmdline);
+ makeFrontend()->queueCommand(TQString::null, cmdline);
}
void FortranSupportPart::projectConfigWidget(KDialogBase *dlg)
{
- QVBox *vbox = dlg->addVBoxPage(i18n("Ftnchek"), i18n("Ftnchek"), BarIcon("kdevelop", KIcon::SizeMedium));
+ TQVBox *vbox = dlg->addVBoxPage(i18n("Ftnchek"), i18n("Ftnchek"), BarIcon("kdevelop", KIcon::SizeMedium));
FtnchekConfigWidget *w = new FtnchekConfigWidget(*projectDom(), vbox, "ftnchek config widget");
- connect( dlg, SIGNAL(okClicked()), w, SLOT(accept()) );
+ connect( dlg, TQT_SIGNAL(okClicked()), w, TQT_SLOT(accept()) );
}
@@ -167,16 +167,16 @@ void FortranSupportPart::projectOpened()
{
kdDebug(9019) << "projectOpened()" << endl;
- connect( project(), SIGNAL(addedFilesToProject(const QStringList &)),
- this, SLOT(addedFilesToProject(const QStringList &)) );
- connect( project(), SIGNAL(removedFilesFromProject(const QStringList &)),
- this, SLOT(removedFilesFromProject(const QStringList &)) );
+ connect( project(), TQT_SIGNAL(addedFilesToProject(const TQStringList &)),
+ this, TQT_SLOT(addedFilesToProject(const TQStringList &)) );
+ connect( project(), TQT_SIGNAL(removedFilesFromProject(const TQStringList &)),
+ this, TQT_SLOT(removedFilesFromProject(const TQStringList &)) );
// We want to parse only after all components have been
// properly initialized
parser = new FixedFormParser(codeModel());
- QTimer::singleShot(0, this, SLOT(initialParse()));
+ TQTimer::singleShot(0, this, TQT_SLOT(initialParse()));
}
@@ -187,10 +187,10 @@ void FortranSupportPart::projectClosed()
}
-void FortranSupportPart::maybeParse(const QString fileName)
+void FortranSupportPart::maybeParse(const TQString fileName)
{
- QFileInfo fi(fileName);
- QString extension = fi.extension();
+ TQFileInfo fi(fileName);
+ TQString extension = fi.extension();
if (extension == "f77" || extension == "f" || extension == "for" || extension == "ftn") {
if( codeModel()->hasFile(fileName) ){
@@ -209,9 +209,9 @@ void FortranSupportPart::initialParse()
if (project()) {
kapp->setOverrideCursor(waitCursor);
- QStringList files = project()->allFiles();
- for (QStringList::Iterator it = files.begin(); it != files.end() ;++it) {
- QFileInfo fileInfo( project()->projectDirectory(), *it );
+ TQStringList files = project()->allFiles();
+ for (TQStringList::Iterator it = files.begin(); it != files.end() ;++it) {
+ TQFileInfo fileInfo( project()->projectDirectory(), *it );
kdDebug(9019) << "maybe parse " << fileInfo.absFilePath() << endl;
maybeParse( fileInfo.absFilePath() );
}
@@ -224,16 +224,16 @@ void FortranSupportPart::initialParse()
}
-void FortranSupportPart::addedFilesToProject(const QStringList &fileList)
+void FortranSupportPart::addedFilesToProject(const TQStringList &fileList)
{
kdDebug(9019) << "addedFilesToProject()" << endl;
- QStringList::ConstIterator it;
+ TQStringList::ConstIterator it;
for ( it = fileList.begin(); it != fileList.end(); ++it )
{
- QFileInfo fileInfo( project()->projectDirectory(), *it );
- QString path = fileInfo.absFilePath();
+ TQFileInfo fileInfo( project()->projectDirectory(), *it );
+ TQString path = fileInfo.absFilePath();
maybeParse( path );
emit addedSourceInfo( path );
}
@@ -242,16 +242,16 @@ void FortranSupportPart::addedFilesToProject(const QStringList &fileList)
}
-void FortranSupportPart::removedFilesFromProject(const QStringList &fileList)
+void FortranSupportPart::removedFilesFromProject(const TQStringList &fileList)
{
kdDebug(9019) << "removedFilesFromProject()" << endl;
- QStringList::ConstIterator it;
+ TQStringList::ConstIterator it;
for ( it = fileList.begin(); it != fileList.end(); ++it )
{
- QFileInfo fileInfo( project()->projectDirectory(), *it );
- QString path = fileInfo.absFilePath();
+ TQFileInfo fileInfo( project()->projectDirectory(), *it );
+ TQString path = fileInfo.absFilePath();
if( codeModel()->hasFile(path) ){
emit aboutToRemoveSourceInfo( path );
generated by cgit v1.2.3 (git 2.25.1) at 2024-05-25 03:14:59 +0000