From d6f8bbb45b267065a6907e71ff9c98bb6d161241 Mon Sep 17 00:00:00 2001 From: tpearson Date: Sat, 31 Jul 2010 19:56:07 +0000 Subject: Trinity Qt initial conversion git-svn-id: svn://anonsvn.kde.org/home/kde/branches/trinity/kdevelop@1157658 283d02a7-25f6-0310-bc7c-ecb5cbfe19da --- languages/ada/ada_utils.cpp | 44 ++++++++++++++++++++++---------------------- 1 file changed, 22 insertions(+), 22 deletions(-) (limited to 'languages/ada/ada_utils.cpp') diff --git a/languages/ada/ada_utils.cpp b/languages/ada/ada_utils.cpp index 9630f058..6e4bea13 100644 --- a/languages/ada/ada_utils.cpp +++ b/languages/ada/ada_utils.cpp @@ -4,56 +4,56 @@ #include #include -#include -#include -#include -#include +#include +#include +#include +#include #include #include "ada_utils.hpp" #include "adasupport.hpp" -QString qtext (const RefAdaAST& n) +TQString qtext (const RefAdaAST& n) { - return QString::fromLatin1 (text (n).c_str ()); + return TQString::fromLatin1 (text (n).c_str ()); } -QStringList qnamelist (const RefAdaAST& n) +TQStringList qnamelist (const RefAdaAST& n) { - QString txt = qtext (n); + TQString txt = qtext (n); // kdDebug() << "qnamelist: input is " << txt << endl; - return QStringList::split ('.', txt); + return TQStringList::split ('.', txt); } -QString ada_spec_filename (const QString& comp_unit_name) +TQString ada_spec_filename (const TQString& comp_unit_name) { - QString fn (comp_unit_name.lower ()); + TQString fn (comp_unit_name.lower ()); - fn.replace (QRegExp("."), "-"); + fn.replace (TQRegExp("."), "-"); fn += ".ads"; return fn; } -QString fq_specfilename (const QString& comp_unit_name) +TQString fq_specfilename (const TQString& comp_unit_name) { - QString fname = ada_spec_filename (comp_unit_name); + TQString fname = ada_spec_filename (comp_unit_name); - if (QFile::exists (fname)) + if (TQFile::exists (fname)) return fname; - QString adaincpath = getenv ("ADA_INCLUDE_PATH"); + TQString adaincpath = getenv ("ADA_INCLUDE_PATH"); if (adaincpath.isNull ()) - return QString::null; + return TQString::null; - QStringList dirs = QStringList::split (':', adaincpath); - QString fq_filename; - for (QStringList::Iterator it = dirs.begin (); it != dirs.end (); it++) { + TQStringList dirs = TQStringList::split (':', adaincpath); + TQString fq_filename; + for (TQStringList::Iterator it = dirs.begin (); it != dirs.end (); it++) { fq_filename = *it; if (! fq_filename.endsWith ("/")) fq_filename += "/"; fq_filename += fname; - if (QFile::exists (fq_filename)) + if (TQFile::exists (fq_filename)) return fq_filename; } if (fname.startsWith ("ada-") || @@ -64,6 +64,6 @@ QString fq_specfilename (const QString& comp_unit_name) } else { kdDebug () << "Cannot find file " << fname << endl; } - return QString::null; + return TQString::null; } -- cgit v1.2.3