diff options
Diffstat (limited to 'dcopperl/DCOP.xs')
| -rw-r--r-- | dcopperl/DCOP.xs | 20 |
1 files changed, 10 insertions, 10 deletions
diff --git a/dcopperl/DCOP.xs b/dcopperl/DCOP.xs index cfcd1dbd..7c6280dc 100644 --- a/dcopperl/DCOP.xs +++ b/dcopperl/DCOP.xs @@ -110,22 +110,22 @@ SV *TQStringToSV(const TQString &data, SV * self = 0) return data.isNull() ? &PL_sv_undef : newSVpv((char *)data.latin1(), 0); } -TQCStringList TQCStringListFromSV(SV *data) +QCStringList QCStringListFromSV(SV *data) { if (!SvROK(data)) croak("DCOP: Not reference"); if (SvTYPE(SvRV(data)) != SVt_PVAV) croak("DCOP: Not an array reference"); - TQCStringList result; + QCStringList result; for (int i = 0; i <= av_len((AV*)SvRV(data)); i++) result.append(TQCStringFromSV(av_fetch((AV*)SvRV(data), i, 0)[0])); return result; } -SV *TQCStringListToSV(const TQCStringList &data, SV * self = 0) +SV *QCStringListToSV(const QCStringList &data, SV * self = 0) { AV *result = newAV(); - for (TQCStringList::ConstIterator i = data.begin(); i != data.end(); i++) + for (QCStringList::ConstIterator i = data.begin(); i != data.end(); i++) av_push(result, TQCStringToSV(*i)); return newRV((SV*)result); } @@ -277,7 +277,7 @@ TQByteArray mapArgs(const TQCString &func, SV **data, int n) else CHECK_ARG(bool) else CHECK_ARG(TQCString) else CHECK_ARG(TQString) - else CHECK_ARG(TQCStringList) + else CHECK_ARG(QCStringList) else CHECK_ARG(TQStringList) else CHECK_ARG(TQPoint) else CHECK_ARG(TQSize) @@ -302,7 +302,7 @@ SV* mapReply(const TQCString &replyType, const TQByteArray &replyData, SV *self) else CHECK_REPLY(bool) else CHECK_REPLY(TQCString) else CHECK_REPLY(TQString) - else CHECK_REPLY(TQCStringList) + else CHECK_REPLY(QCStringList) else CHECK_REPLY(TQStringList) else CHECK_REPLY(TQPoint) else CHECK_REPLY(TQSize) @@ -452,25 +452,25 @@ DCOPClient::isApplicationRegistered(app) OUTPUT: RETVAL -TQCStringList +QCStringList DCOPClient::registeredApplications() OUTPUT: RETVAL -TQCStringList +QCStringList DCOPClient::remoteObjects(app) TQCString app OUTPUT: RETVAL -TQCStringList +QCStringList DCOPClient::remoteInterfaces(app, obj) TQCString app TQCString obj OUTPUT: RETVAL -TQCStringList +QCStringList DCOPClient::remoteFunctions(app, obj) TQCString app TQCString obj |