Tels <[EMAIL PROTECTED]> writes:
>-----BEGIN PGP SIGNED MESSAGE-----
>
>Moin,
>
>On Friday 05 March 2004 11:23, Tom Schindl wrote:
>> Hi,
>>
>> how can I create an instance of a Perl-class in XS.
>
>I don't know (dont even understand the question properly). However, I could
>not define a C++ class in XS because apparently "class" is considered some
>keyword.
It is a C++ keyword.
>:/ Does "CLASS" workaround this?
Yes. CLASS is also (I think) special to xsubpp
>
>You should probably call new() from XS. See perldoc perlcall for some info.
>
>Cheers,
>
>Tels
>
>>
>>
>> 1. Both defined in XS:
>> ======================
>> Soccer.xs:
>> -----------------------8<-----------------------
>> MODULE = Soccer PACKAGE = Soccer::Team
>>
>> Team *
>> new(CLASS)
>> char *CLASS
>> CODE:
>> .......
>> OUTPUT:
>> RETVAL
>>
>> Player *
>> Team::getPlayer(p_id)
>> int p_id
>> CODE
>> ## create a new player new Soccer::Player(p_id)
>> ## how is this done?????
>>
>>
>> MODULE = Soccer PACKAGE = Soccer::Player
>>
>> Player *
>> new(CLASS,p_id)
>> char *CLASS
>> int p_id
>> CODE:
>> .......
>> OUTPUT:
>> RETVAL
>> -----------------------8<-----------------------
>>
>>
>> 2. 1 defined in XS 1 defined in Perl:
>> =======================================
>> Soccer.xs:
>> -----------------------8<-----------------------
>> MODULE = Soccer PACKAGE = Soccer::Team
>>
>> Team *
>> new(CLASS)
>> char *CLASS
>> CODE:
>> .......
>> OUTPUT:
>> RETVAL
>>
>> Player *
>> Team::getPlayer(p_id)
>> int p_id
>> CODE
>> ## create a new player new Soccer::Player(p_id)
>> ## how is this done?????
>> -----------------------8<-----------------------
>>
>> Soccer.pm:
>> -----------------------8<-----------------------
>> package Soccer::Player;
>>
>> sub new {
>> my $class = shift;
>> my $p_id = shift;
>>
>> return bless { id => $p_id }, $class;
>> }
>> -----------------------8<-----------------------
>
>- --
> Signed on Fri Mar 5 15:40:17 2004 with key 0x93B84C15.
> Visit my photo gallery at http://bloodgate.com/photos/
> PGP key on http://bloodgate.com/tels.asc or per email.
>
> "Die deutsche Zensoren - - - - - - - - - - - - - - - - - - - - - - - - -
> - - - - - - - - - - - - - - - - - - - - - - - - - - DummkÃpfe - - - - - -
> - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
> - - - - - - - - - - - -." Heinrich Heine
>
>-----BEGIN PGP SIGNATURE-----
>Version: GnuPG v1.2.2-rc1-SuSE (GNU/Linux)
>Comment: When cryptography is outlawed, bayl bhgynjf jvyy unir cevinpl.
>
>iQEVAwUBQEiRy3cLPEOTuEwVAQG6qwf+KiNgJPormADVBhrPK7Yxd8WHgCcb0Ofl
>iTzXwv9jL6zOGYwTAhwlY5uxgHAOfBixjkmvEFhqDyPfPNsxDG7isNEIGZVw3dNk
>sofLaKhJyiLhKX+X+lTm6+aQFzpn/dzOVhp2EtRSysWWO0qFZUXnrhbjOVydsU/q
>YfTekKBzMUgNS9Bdb72H1aT8uxfkatkuYlitE+ZUF4u0jxBI1RXnrzcUw4IZOZFH
>5E4xgJZhvqLaQ10ScjZFA/C93HtCor31KhXL1swzCnJYuxvqLM/+DThKK3V0MqFy
>cjh2OSC3fPUi3b5d2/BM6iYcPsqr2oQRXvztqeMzyiWuZOSX4OYEkA==
>=38is
>-----END PGP SIGNATURE-----
