RE: [wxperl-users] Wx::Execute

[Edward W. <Edward.Wildgoose@FRMHedge.com>]

Thanks this is very helpful.

The point is: there do seem to be quite a few useful convenience =
functions, eg these, and say a load of wxSocket event macros, which =
aren't part of standard wx (or at least not in the docs I have), and =
don't seem to be documented except in the samples, or by poking around =
in the XS.

Don't get me wrong, wxPerl is extremely helpful, and docs are a bonus, =
but that's basically what I was hoping to get out of this question, more =
a structured way to poke around in the source to see what I might be =
missing, than a direct question on how to use search.  The split between =
having a few bits in perl and not being able to read XS very well is =
keeping me from getting my teeth into wxperl at the moment.

Thanks for wxPerl!

Ed W

-----Original Message-----
From: DH [mailto:cra...@ya...]
Sent: 03 September 2003 18:43
To: Edward Wildgoose; Mattia Barbon; Ulisses Gomes
Cc: wxp...@li...
Subject: RE: [wxperl-users] Wx::Execute


You download the tarball from CPAN (or wherever)
which is currently Wx-0.16.tar.gz
The you extract that, and you search all the files for WxExecute.
I personally get the following files:
  Changes
  Wx.c
  Wx.obj
  Wx.dll
  wxmsw24.dll
  wxmsw24.lib
  Process.xs           <!---------- the jackpot

You can view it also at
http://search.cpan.org/src/MBARBON/Wx-0.16/XS/Process.xs
One of the entries is
(if you look close, you'll notice there is a unicode/nonunicode version =
of each function)

long
wxExecuteArgs( args, sync =3D wxEXEC_ASYNC, callback =3D 0 )
    SV* args
    int sync
    wxProcess* callback
  PREINIT:
    wxChar** argv;
    wxChar** t;
    int n, i;
  CODE:
    n =3D wxPli_av_2_wxcharparray( aTHX_ args, &t );
    argv =3D new wxChar*[n+1];
    memcpy( argv, t, n*sizeof(char*) );
    argv[n] =3D 0;
    RETVAL =3D wxExecute( argv, sync, callback );
    for( i =3D 0; i < n; ++i )
        delete argv[i];
    delete[] argv;
    delete[] t;
  OUTPUT:
    RETVAL


and since we know that wxYadaYada translates into Wx::YadaYada,
we give it a little test try
C:\>perl -MWx -e"die Wx::ExecuteArgs()"
Usage: Wx::ExecuteArgs(args, sync =3D wxEXEC_ASYNC, callback =3D 0) at =
-e line 1.

Does "Wx::ExecuteArgs(args, sync =3D wxEXEC_ASYNC, callback =3D 0)" look =
familiar?
I think soo.


__________________________________
Do you Yahoo!?
Yahoo! SiteBuilder - Free, easy-to-use web site design software
http://sitebuilder.yahoo.com