summaryrefslogtreecommitdiffstats
path: root/languages/fortran/fixedformparser.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'languages/fortran/fixedformparser.cpp')
-rw-r--r--languages/fortran/fixedformparser.cpp22
1 files changed, 11 insertions, 11 deletions
diff --git a/languages/fortran/fixedformparser.cpp b/languages/fortran/fixedformparser.cpp
index 7084fbba..312d811e 100644
--- a/languages/fortran/fixedformparser.cpp
+++ b/languages/fortran/fixedformparser.cpp
@@ -11,8 +11,8 @@
#include "fixedformparser.h"
-#include <qfile.h>
-#include <qtextstream.h>
+#include <tqfile.h>
+#include <tqtextstream.h>
#include <kdebug.h>
#include <codemodel.h>
@@ -30,9 +30,9 @@ FixedFormParser::FixedFormParser(CodeModel* model)
}
-void FixedFormParser::process(const QCString &line, const QString &fileName, int lineNum)
+void FixedFormParser::process(const TQCString &line, const TQString &fileName, int lineNum)
{
- QCString simplified;
+ TQCString simplified;
int l = line.length();
for (int i=0; i < l; ++i)
if (line[i] != ' ')
@@ -40,7 +40,7 @@ void FixedFormParser::process(const QCString &line, const QString &fileName, int
if ( simplified.isEmpty() ) return;
- QString name;
+ TQString name;
if (functionre.search(simplified) != -1)
name = functionre.cap(3);
else if (subroutinere.search(simplified) != -1)
@@ -58,22 +58,22 @@ void FixedFormParser::process(const QCString &line, const QString &fileName, int
}
-void FixedFormParser::parse(const QString &fileName)
+void FixedFormParser::parse(const TQString &fileName)
{
- QFile f(QFile::encodeName(fileName));
+ TQFile f(TQFile::encodeName(fileName));
if (!f.open(IO_ReadOnly))
return;
- QTextStream stream(&f);
+ TQTextStream stream(&f);
m_file = m_model->create<FileModel>();
m_file->setName( fileName );
- QCString line;
+ TQCString line;
int lineNum=0, startLineNum=0;
while (!stream.atEnd()) {
++lineNum;
- QCString str = stream.readLine().local8Bit();
- if (!str.isEmpty() && QCString("*Cc#!").find(str[0]) != -1)
+ TQCString str = stream.readLine().local8Bit();
+ if (!str.isEmpty() && TQCString("*Cc#!").find(str[0]) != -1)
continue;
// Continuation line
if (str.length() > 6 && str.left(5) == " " && str[5] != ' ') {