[Ming-cvs] ming/perl_ext Constants.xs,1.9,1.10 Shape.xs,1.7,1.8

[Klaus R. <kre...@us...>]

Update of /cvsroot/ming/ming/perl_ext
In directory sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv17562

Modified Files:
	Constants.xs Shape.xs 
Log Message:
SWFShape updates


Index: Shape.xs
===================================================================
RCS file: /cvsroot/ming/ming/perl_ext/Shape.xs,v
retrieving revision 1.7
retrieving revision 1.8
diff -C2 -d -r1.7 -r1.8
*** Shape.xs	29 Nov 2007 17:07:12 -0000	1.7
--- Shape.xs	28 Feb 2008 16:27:49 -0000	1.8
***************
*** 230,240 ****
  
  void
! SWFShape_drawGlyph(shape, font, c)
          SWF::Shape shape
          SWF::Font font
          int c
  	CODE:
  	swf_stash_refcnt_inc((SV*)SvRV(ST(0)), (SV*)SvRV(ST(1)));
! 	SWFShape_drawGlyph(shape, font, c);
  
  void
--- 230,241 ----
  
  void
! SWFShape_drawGlyph(shape, font, c, size=0)
          SWF::Shape shape
          SWF::Font font
          int c
+ 	int size
  	CODE:
  	swf_stash_refcnt_inc((SV*)SvRV(ST(0)), (SV*)SvRV(ST(1)));
! 	SWFShape_drawSizedGlyph(shape, font, c, size);
  
  void
***************
*** 257,258 ****
--- 258,277 ----
  	unsigned char b
  	unsigned char a
+ 
+ void 
+ SWFShape_useVersion(shape, version)
+ 	SWF::Shape shape
+ 	int version
+ 
+ int 
+ SWFShape_getVersion(shape)
+ 	SWF::Shape shape
+ 
+ void
+ SWFShape_setRenderHintingFlags(shape, flags)
+ 	SWF::Shape shape
+ 	int flags
+ 
+ void 
+ SWFShape_hideLine(shape)
+ 	SWF::Shape shape

Index: Constants.xs
===================================================================
RCS file: /cvsroot/ming/ming/perl_ext/Constants.xs,v
retrieving revision 1.9
retrieving revision 1.10
diff -C2 -d -r1.9 -r1.10
*** Constants.xs	28 Feb 2008 13:32:16 -0000	1.9
--- Constants.xs	28 Feb 2008 16:27:49 -0000	1.10
***************
*** 129,132 ****
--- 129,134 ----
  	SWF_FILTER_CLAMP = FILTER_FLAG_CLAMP
  	SWF_FILTER_FLAG_PRESERVE_ALPHA = FILTER_FLAG_PRESERVE_ALPHA
+ 	SWF_SHAPE_USESCALINGSTROKES = SWF_SHAPE_USESCALINGSTROKES
+ 	SWF_SHAPE_USENONSCALINGSTROKES = SWF_SHAPE_USENONSCALINGSTROKES
      CODE:
      RETVAL = ix;