[Uml-devel] branches/KDE/3.5/kdesdk/umbrello/umbrello/codegenerators

[Oliver Kellogg]

SVN commit 565505 by okellogg:

defaultDatatypes(): Add yet more.

 M  +14 -10    pascalwriter.cpp  


--- branches/KDE/3.5/kdesdk/umbrello/umbrello/codegenerators/pascalwriter.cpp #565504:565505
@@ -364,25 +364,29 @@
 
 QStringList PascalWriter::defaultDatatypes() {
     QStringList l;
+    l.append("AnsiString");
     l.append("Boolean");
+    l.append("Byte");
+    l.append("ByteBool");
+    l.append("Cardinal");
     l.append("Character");
-    l.append("Cardinal");
+    l.append("Currency");
+    l.append("Double");
+    l.append("Extended");
+    l.append("Int64");
     l.append("Integer");
-    l.append("Shortint");
-    l.append("Smallint");
     l.append("Longint");
-    l.append("Byte");
-    l.append("Word");
+    l.append("LongBool");
     l.append("Longword");
+    l.append("QWord");
     l.append("Real");
+    l.append("Shortint");
+    l.append("ShortString");
     l.append("Single");
-    l.append("Double");
-    l.append("Extended");
-    l.append("Currency");
+    l.append("Smallint");
     l.append("String");
-    l.append("ShortString");
-    l.append("AnsiString");
     l.append("WideString");
+    l.append("Word");
     return l;
 }