diff options
Diffstat (limited to 'umbrello/umbrello/codegenerators/pascalwriter.cpp')
-rw-r--r-- | umbrello/umbrello/codegenerators/pascalwriter.cpp | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/umbrello/umbrello/codegenerators/pascalwriter.cpp b/umbrello/umbrello/codegenerators/pascalwriter.cpp index 766ea6df..2a42bef7 100644 --- a/umbrello/umbrello/codegenerators/pascalwriter.cpp +++ b/umbrello/umbrello/codegenerators/pascalwriter.cpp @@ -129,7 +129,7 @@ void PascalWriter::writeClass(UMLClassifier *c) { const bool isClass = !c->isInterface(); TQString classname = cleanName(c->getName()); TQString fileName = qualifiedName(c).lower(); - fileName.replace('.', '-'); + fileName.tqreplace('.', '-'); //find an appropriate name for our file fileName = overwritableName(c, fileName, ".pas"); @@ -151,8 +151,8 @@ void PascalWriter::writeClass(UMLClassifier *c) { TQString str; str = getHeadingFile(".pas"); if (!str.isEmpty()) { - str.replace(TQRegExp("%filename%"), fileName); - str.replace(TQRegExp("%filepath%"), file.name()); + str.tqreplace(TQRegExp("%filename%"), fileName); + str.tqreplace(TQRegExp("%filepath%"), file.name()); pas << str << endl; } @@ -244,8 +244,8 @@ void PascalWriter::writeClass(UMLClassifier *c) { pas << getIndent() << classname << " = object"; if (!superclasses.isEmpty()) { // FIXME: Multiple inheritance is not yet supported - UMLClassifier* parent = superclasses.first(); - pas << "(" << qualifiedName(parent) << ")"; + UMLClassifier* tqparent = superclasses.first(); + pas << "(" << qualifiedName(tqparent) << ")"; } pas << m_endl; @@ -382,7 +382,7 @@ TQStringList PascalWriter::defaultDatatypes() { l.append("Longint"); l.append("LongBool"); l.append("Longword"); - l.append("QWord"); + l.append("TQWord"); l.append("Real"); l.append("Shortint"); l.append("ShortString"); @@ -434,7 +434,7 @@ const TQStringList PascalWriter::reservedKeywords() const { keywords.append( "class" ); keywords.append( "const" ); keywords.append( "constructor" ); - keywords.append( "contains" ); + keywords.append( "tqcontains" ); keywords.append( "default" ); keywords.append( "deprecated" ); keywords.append( "destructor" ); |