diff options
| author | Michele Calgaro <michele.calgaro@yahoo.it> | 2023-07-20 15:46:27 +0900 |
|---|---|---|
| committer | Michele Calgaro <michele.calgaro@yahoo.it> | 2023-07-21 21:44:09 +0900 |
| commit | b8fec6ee050f7cd64b5a74d7bde605d9110b22d5 (patch) | |
| tree | 4280a8a53822909b892604311b9fb49229ee99af /kalyptus/kalyptusCxxToKimono.pm | |
| parent | 29f5ba4872719d2c6564ebaef17718b50ae56e3c (diff) | |
| download | libtqt-perl-b8fec6ee.tar.gz libtqt-perl-b8fec6ee.zip | |
Replace Q_OBJECT with TQ_OBJECT
Signed-off-by: Michele Calgaro <michele.calgaro@yahoo.it>
(cherry picked from commit a60dd4770b0f2c4127ff858f817ce4876141314e)
Diffstat (limited to 'kalyptus/kalyptusCxxToKimono.pm')
| -rw-r--r-- | kalyptus/kalyptusCxxToKimono.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/kalyptus/kalyptusCxxToKimono.pm b/kalyptus/kalyptusCxxToKimono.pm index 089cec9..bbc26ba 100644 --- a/kalyptus/kalyptusCxxToKimono.pm +++ b/kalyptus/kalyptusCxxToKimono.pm @@ -952,7 +952,7 @@ sub preParseClass || ($name eq 'type') || ($classNode->{astNodeName} eq 'KTar' and $name eq 'writeFile_impl') || ($classNode->{astNodeName} eq 'TQApplication' and $name eq 'TQApplication') - # Assume only Qt classes have tr() and trUtf8() in their Q_OBJECT macro + # Assume only Qt classes have tr() and trUtf8() in their TQ_OBJECT macro || ($classNode->{astNodeName} !~ /^Q/ and $name eq 'tr') || ($classNode->{astNodeName} !~ /^Q/ and $name eq 'trUtf8') @@ -3510,7 +3510,7 @@ sub printCSharpdocComment($$$$) $line =~ s/bool/bool/g; $line =~ s/SLOT\(\s*([^\)]*)\) ?\)/SLOT("$1)")/g; $line =~ s/SIGNAL\(\s*([^\)]*)\) ?\)/SIGNAL("$1)")/g; - $line =~ s/Q_OBJECT\n//g; + $line =~ s/TQ_OBJECT\n//g; $line =~ s/public\s*(slots)?:\n/public /g; $line =~ s/([^0-9"]\s*)\*(\s*[^0-9"-])/$1$2/g; $line =~ s/^(\s*)\*/$1/g; |