Using VC7. If I compile against pango < 1.17 it compiles fine. Otherwise:

PangoCairo.c
xs\PangoCairo.xs(24) : error C2143: syntax error : missing ';' before 
'type'
xs\PangoCairo.xs(26) : error C2065: 'callback' : undeclared identifier
xs\PangoCairo.xs(26) : error C2223: left of '->priv' must point to 
struct/union
xs\PangoCairo.xs(26) : error C2198: 'Perl_set_context' : too few 
arguments for c
all through pointer-to-function
xs\PangoCairo.xs(37) : error C2223: left of '->data' must point to 
struct/union
xs\PangoCairo.xs(38) : error C2223: left of '->data' must point to 
struct/union
xs\PangoCairo.xs(38) : error C2198: 'Perl_newSVsv' : too few arguments 
for call
through pointer-to-function
xs\PangoCairo.xs(42) : error C2223: left of '->func' must point to 
struct/union
xs\PangoCairo.xs(42) : warning C4047: 'function' : 'SV *' differs in 
levels of i
ndirection from 'int'
xs\PangoCairo.xs(42) : error C2198: 'Perl_call_sv' : too few arguments 
for call
through pointer-to-function
NMAKE : fatal error U1077: 'cl' : return code '0x2'
Stop.

which is due to....

------------------------------------------------------------------------------------------

#if PANGO_CHECK_VERSION (1, 17, 0)
static void
gtk2perl_pango_cairo_shape_renderer_func (cairo_t        *cr,
                      PangoAttrShape *attr,
                      gboolean        do_path,
                      gpointer        data)
{
    dGPERL_CALLBACK_MARSHAL_SP;
    GPerlCallback *callback = (GPerlCallback *) data;
    GPERL_CALLBACK_MARSHAL_INIT (callback);
...
------------------------------------------------------------------------------------------

After messing around a bit, I tried to coerce the 'data' variable 
directly into the GPerlCallback callback pointer (since it appeared to 
me that's all the data variable was used for) and it seemed to compile fine:

------------------------------------------------------------------------------------------

#if PANGO_CHECK_VERSION (1, 17, 0)
static void
gtk2perl_pango_cairo_shape_renderer_func (cairo_t        *cr,
                      PangoAttrShape *attr,
                      gboolean        do_path,
                      GPerlCallback       *callback)
{
    dGPERL_CALLBACK_MARSHAL_SP;

    GPERL_CALLBACK_MARSHAL_INIT (callback);
...
------------------------------------------------------------------------------------------

Dumb idea? I don't know the code...I just know it compiled :) Thanks for 
any thoughts on the matter.


_______________________________________________
gtk-perl-list mailing list
gtk-perl-list@gnome.org
http://mail.gnome.org/mailman/listinfo/gtk-perl-list

Reply via email to