summaryrefslogtreecommitdiffstats
path: root/kalyptus/kalyptusCxxToJNI.pm
diff options
context:
space:
mode:
authorMichele Calgaro <[email protected]>2023-06-03 11:49:23 +0900
committerMichele Calgaro <[email protected]>2023-06-03 11:49:23 +0900
commit076ec834048d2465420b6e09599552ad3f9dc9df (patch)
treeb2844ec6a5be632392da2402ad3b52949be2d4e2 /kalyptus/kalyptusCxxToJNI.pm
parentc5477c6589134bdec7e964731ab5fc2786eac91e (diff)
downloadlibtqt-perl-076ec834048d2465420b6e09599552ad3f9dc9df.tar.gz
libtqt-perl-076ec834048d2465420b6e09599552ad3f9dc9df.zip
Drop Qt2 obsolete classes
Signed-off-by: Michele Calgaro <[email protected]>
Diffstat (limited to 'kalyptus/kalyptusCxxToJNI.pm')
-rw-r--r--kalyptus/kalyptusCxxToJNI.pm5
1 files changed, 1 insertions, 4 deletions
diff --git a/kalyptus/kalyptusCxxToJNI.pm b/kalyptus/kalyptusCxxToJNI.pm
index 7d57f37..1b2ba38 100644
--- a/kalyptus/kalyptusCxxToJNI.pm
+++ b/kalyptus/kalyptusCxxToJNI.pm
@@ -1836,7 +1836,6 @@ sub cplusplusToJava
|| kalyptusDataDict::ctypemap($cplusplusType) =~ /tde_MediaList\s*\*/
|| kalyptusDataDict::ctypemap($cplusplusType) =~ /tde_OfferList\s*\*/
|| $cplusplusType =~ /TQMemArray<TQRect>/
- || $cplusplusType =~ /TQArray<TQRect>/
|| kalyptusDataDict::ctypemap($cplusplusType) =~ /qt_QCanvasItemList\s*\*/ ) {
return "ArrayList"
} elsif ( $cplusplusType =~ /uchar\s*\*/ ) {
@@ -2247,8 +2246,6 @@ sub jniToReturnValue($$$)
$returnCall .= "\treturn (jobject) QtSupport::arrayWithTQIconDragItemList(env, (TQValueList<TQIconDragItem>*) " . ($1 eq "\*" ? "" : "&") . "_qlist);\n";
} elsif ( $cplusplusType =~ /TQMemArray<TQRect>\s*([\*\&])?\s*$/ ) {
$returnCall .= "\treturn (jobject) QtSupport::arrayWithTQRectList(env, (TQMemArray<TQRect>*) " . ($1 eq "\*" ? "" : "&") . "_qlist);\n";
- } elsif ( $cplusplusType =~ /TQArray<TQRect>\s*([\*\&])?\s*$/ ) {
- $returnCall .= "\treturn (jobject) QtSupport::arrayWithTQRectList(env, (TQArray<TQRect>*) " . ($1 eq "\*" ? "" : "&") . "_qlist);\n";
}
} elsif ( $javaType =~ /String\[\]/ ) {
; # Do nothing, string arrays are ArrayLists as return values
@@ -2835,7 +2832,7 @@ sub writeClassDoc
my @ancestor_nodes = ();
Iter::Ancestors( $node, $rootnode, undef, undef, sub {
my ( $ances, $name, $type, $template ) = @_;
- if ( $name ne "TQMemArray" and $name ne "TQArray" and $name ne "TQSqlFieldInfoList" ) {
+ if ( $name ne "TQMemArray" and $name ne "TQSqlFieldInfoList" ) {
push @ancestor_nodes, $ances;
push @ancestors, $name;
}