Wrapping wxArtProvider class

I'm interested, as an intro to doing XS work and something useful to
both myself and the community, in attempting to add wrappers for at
least the static functions in wxArtProvider to wxPerl.  I've started
looking into what I need to do, and have some questions, which are
probably mostly targeted at Mattia.

I'm trying to use the .xsp format because it seems simpler in the
future for handling perl-based art providers.  However, this is
leaving me confused about how to handle static functions.  Should I
just handle them with plain old XS?  That's what I've done for now.

The ArtProvider class uses strings for its ID type, which is mostly
OK, but doesn't fit with the Constant.xs style of doing things. 
Should I just add a lib/Wx/ArtProvider.pm that provides the id
constants and id-making macros as pure perl?

Attached is my work so far that implements the static GetIcon and
GetBitmap functions of wxArtProvider (patch against Wx-0.22).  I
tested to see if I'd done things at least remotely right by adding a
line to the minimal sample to change the frame icon to one returned by
the GetIcon function, and that worked.  It's probably not ready for
inclusion into the main code, but commentary and verification that it
works on someone else's computer would be nice :)

-- 
    -- Cheetah

wx-artprov-2.patch
Description: Binary data