home *** CD-ROM | disk | FTP | other *** search
/ PC Welt 2006 November (DVD) / PCWELT_11_2006.ISO / casper / filesystem.squashfs / usr / lib / perl5 / Gnome2 / Canvas / Install / gnomecanvasperl-autogen.h < prev    next >
Encoding:
C/C++ Source or Header  |  2005-12-16  |  10.2 KB  |  164 lines
  1. /* This file is automatically generated. Any changes made here will be lost. */
  2.  
  3. /* This header defines simple perlapi-ish macros for creating SV wrappers
  4.  * and extracting the GPerl value from SV wrappers.  These macros are used
  5.  * by the autogenerated typemaps, and are defined here so that you can use
  6.  * the same logic anywhere in your code (e.g., if you handle the argument
  7.  * stack by hand instead of using the typemap). */
  8.  
  9. #ifdef GNOME_TYPE_CANVAS_BPATH
  10.   /* GtkObject derivative GnomeCanvasBpath */
  11. # define SvGnomeCanvasBpath(sv)    ((GnomeCanvasBpath*)gperl_get_object_check (sv, GNOME_TYPE_CANVAS_BPATH))
  12. # define newSVGnomeCanvasBpath(val)    (gtk2perl_new_gtkobject (GTK_OBJECT (val)))
  13.   typedef GnomeCanvasBpath GnomeCanvasBpath_ornull;
  14. # define SvGnomeCanvasBpath_ornull(sv)    (((sv) && SvOK (sv)) ? SvGnomeCanvasBpath(sv) : NULL)
  15. # define newSVGnomeCanvasBpath_ornull(val)    (((val) == NULL) ? &PL_sv_undef : gtk2perl_new_gtkobject (GTK_OBJECT (val)))
  16. #endif /* GNOME_TYPE_CANVAS_BPATH */
  17.  
  18. #ifdef GNOME_TYPE_CANVAS_ITEM
  19.   /* GtkObject derivative GnomeCanvasItem */
  20. # define SvGnomeCanvasItem(sv)    ((GnomeCanvasItem*)gperl_get_object_check (sv, GNOME_TYPE_CANVAS_ITEM))
  21. # define newSVGnomeCanvasItem(val)    (gtk2perl_new_gtkobject (GTK_OBJECT (val)))
  22.   typedef GnomeCanvasItem GnomeCanvasItem_ornull;
  23. # define SvGnomeCanvasItem_ornull(sv)    (((sv) && SvOK (sv)) ? SvGnomeCanvasItem(sv) : NULL)
  24. # define newSVGnomeCanvasItem_ornull(val)    (((val) == NULL) ? &PL_sv_undef : gtk2perl_new_gtkobject (GTK_OBJECT (val)))
  25. #endif /* GNOME_TYPE_CANVAS_ITEM */
  26.  
  27. #ifdef GNOME_TYPE_CANVAS_GROUP
  28.   /* GtkObject derivative GnomeCanvasGroup */
  29. # define SvGnomeCanvasGroup(sv)    ((GnomeCanvasGroup*)gperl_get_object_check (sv, GNOME_TYPE_CANVAS_GROUP))
  30. # define newSVGnomeCanvasGroup(val)    (gtk2perl_new_gtkobject (GTK_OBJECT (val)))
  31.   typedef GnomeCanvasGroup GnomeCanvasGroup_ornull;
  32. # define SvGnomeCanvasGroup_ornull(sv)    (((sv) && SvOK (sv)) ? SvGnomeCanvasGroup(sv) : NULL)
  33. # define newSVGnomeCanvasGroup_ornull(val)    (((val) == NULL) ? &PL_sv_undef : gtk2perl_new_gtkobject (GTK_OBJECT (val)))
  34. #endif /* GNOME_TYPE_CANVAS_GROUP */
  35.  
  36. #ifdef GNOME_TYPE_CANVAS
  37.   /* GtkObject derivative GnomeCanvas */
  38. # define SvGnomeCanvas(sv)    ((GnomeCanvas*)gperl_get_object_check (sv, GNOME_TYPE_CANVAS))
  39. # define newSVGnomeCanvas(val)    (gtk2perl_new_gtkobject (GTK_OBJECT (val)))
  40.   typedef GnomeCanvas GnomeCanvas_ornull;
  41. # define SvGnomeCanvas_ornull(sv)    (((sv) && SvOK (sv)) ? SvGnomeCanvas(sv) : NULL)
  42. # define newSVGnomeCanvas_ornull(val)    (((val) == NULL) ? &PL_sv_undef : gtk2perl_new_gtkobject (GTK_OBJECT (val)))
  43. #endif /* GNOME_TYPE_CANVAS */
  44.  
  45. #ifdef GNOME_TYPE_CANVAS_LINE
  46.   /* GtkObject derivative GnomeCanvasLine */
  47. # define SvGnomeCanvasLine(sv)    ((GnomeCanvasLine*)gperl_get_object_check (sv, GNOME_TYPE_CANVAS_LINE))
  48. # define newSVGnomeCanvasLine(val)    (gtk2perl_new_gtkobject (GTK_OBJECT (val)))
  49.   typedef GnomeCanvasLine GnomeCanvasLine_ornull;
  50. # define SvGnomeCanvasLine_ornull(sv)    (((sv) && SvOK (sv)) ? SvGnomeCanvasLine(sv) : NULL)
  51. # define newSVGnomeCanvasLine_ornull(val)    (((val) == NULL) ? &PL_sv_undef : gtk2perl_new_gtkobject (GTK_OBJECT (val)))
  52. #endif /* GNOME_TYPE_CANVAS_LINE */
  53.  
  54. #ifdef GNOME_TYPE_CANVAS_PIXBUF
  55.   /* GtkObject derivative GnomeCanvasPixbuf */
  56. # define SvGnomeCanvasPixbuf(sv)    ((GnomeCanvasPixbuf*)gperl_get_object_check (sv, GNOME_TYPE_CANVAS_PIXBUF))
  57. # define newSVGnomeCanvasPixbuf(val)    (gtk2perl_new_gtkobject (GTK_OBJECT (val)))
  58.   typedef GnomeCanvasPixbuf GnomeCanvasPixbuf_ornull;
  59. # define SvGnomeCanvasPixbuf_ornull(sv)    (((sv) && SvOK (sv)) ? SvGnomeCanvasPixbuf(sv) : NULL)
  60. # define newSVGnomeCanvasPixbuf_ornull(val)    (((val) == NULL) ? &PL_sv_undef : gtk2perl_new_gtkobject (GTK_OBJECT (val)))
  61. #endif /* GNOME_TYPE_CANVAS_PIXBUF */
  62.  
  63. #ifdef GNOME_TYPE_CANVAS_POLYGON
  64.   /* GtkObject derivative GnomeCanvasPolygon */
  65. # define SvGnomeCanvasPolygon(sv)    ((GnomeCanvasPolygon*)gperl_get_object_check (sv, GNOME_TYPE_CANVAS_POLYGON))
  66. # define newSVGnomeCanvasPolygon(val)    (gtk2perl_new_gtkobject (GTK_OBJECT (val)))
  67.   typedef GnomeCanvasPolygon GnomeCanvasPolygon_ornull;
  68. # define SvGnomeCanvasPolygon_ornull(sv)    (((sv) && SvOK (sv)) ? SvGnomeCanvasPolygon(sv) : NULL)
  69. # define newSVGnomeCanvasPolygon_ornull(val)    (((val) == NULL) ? &PL_sv_undef : gtk2perl_new_gtkobject (GTK_OBJECT (val)))
  70. #endif /* GNOME_TYPE_CANVAS_POLYGON */
  71.  
  72. #ifdef GNOME_TYPE_CANVAS_RE
  73.   /* GtkObject derivative GnomeCanvasRE */
  74. # define SvGnomeCanvasRE(sv)    ((GnomeCanvasRE*)gperl_get_object_check (sv, GNOME_TYPE_CANVAS_RE))
  75. # define newSVGnomeCanvasRE(val)    (gtk2perl_new_gtkobject (GTK_OBJECT (val)))
  76.   typedef GnomeCanvasRE GnomeCanvasRE_ornull;
  77. # define SvGnomeCanvasRE_ornull(sv)    (((sv) && SvOK (sv)) ? SvGnomeCanvasRE(sv) : NULL)
  78. # define newSVGnomeCanvasRE_ornull(val)    (((val) == NULL) ? &PL_sv_undef : gtk2perl_new_gtkobject (GTK_OBJECT (val)))
  79. #endif /* GNOME_TYPE_CANVAS_RE */
  80.  
  81. #ifdef GNOME_TYPE_CANVAS_RECT
  82.   /* GtkObject derivative GnomeCanvasRect */
  83. # define SvGnomeCanvasRect(sv)    ((GnomeCanvasRect*)gperl_get_object_check (sv, GNOME_TYPE_CANVAS_RECT))
  84. # define newSVGnomeCanvasRect(val)    (gtk2perl_new_gtkobject (GTK_OBJECT (val)))
  85.   typedef GnomeCanvasRect GnomeCanvasRect_ornull;
  86. # define SvGnomeCanvasRect_ornull(sv)    (((sv) && SvOK (sv)) ? SvGnomeCanvasRect(sv) : NULL)
  87. # define newSVGnomeCanvasRect_ornull(val)    (((val) == NULL) ? &PL_sv_undef : gtk2perl_new_gtkobject (GTK_OBJECT (val)))
  88. #endif /* GNOME_TYPE_CANVAS_RECT */
  89.  
  90. #ifdef GNOME_TYPE_CANVAS_ELLIPSE
  91.   /* GtkObject derivative GnomeCanvasEllipse */
  92. # define SvGnomeCanvasEllipse(sv)    ((GnomeCanvasEllipse*)gperl_get_object_check (sv, GNOME_TYPE_CANVAS_ELLIPSE))
  93. # define newSVGnomeCanvasEllipse(val)    (gtk2perl_new_gtkobject (GTK_OBJECT (val)))
  94.   typedef GnomeCanvasEllipse GnomeCanvasEllipse_ornull;
  95. # define SvGnomeCanvasEllipse_ornull(sv)    (((sv) && SvOK (sv)) ? SvGnomeCanvasEllipse(sv) : NULL)
  96. # define newSVGnomeCanvasEllipse_ornull(val)    (((val) == NULL) ? &PL_sv_undef : gtk2perl_new_gtkobject (GTK_OBJECT (val)))
  97. #endif /* GNOME_TYPE_CANVAS_ELLIPSE */
  98.  
  99. #ifdef GNOME_TYPE_CANVAS_RICH_TEXT
  100.   /* GtkObject derivative GnomeCanvasRichText */
  101. # define SvGnomeCanvasRichText(sv)    ((GnomeCanvasRichText*)gperl_get_object_check (sv, GNOME_TYPE_CANVAS_RICH_TEXT))
  102. # define newSVGnomeCanvasRichText(val)    (gtk2perl_new_gtkobject (GTK_OBJECT (val)))
  103.   typedef GnomeCanvasRichText GnomeCanvasRichText_ornull;
  104. # define SvGnomeCanvasRichText_ornull(sv)    (((sv) && SvOK (sv)) ? SvGnomeCanvasRichText(sv) : NULL)
  105. # define newSVGnomeCanvasRichText_ornull(val)    (((val) == NULL) ? &PL_sv_undef : gtk2perl_new_gtkobject (GTK_OBJECT (val)))
  106. #endif /* GNOME_TYPE_CANVAS_RICH_TEXT */
  107.  
  108. #ifdef GNOME_TYPE_CANVAS_SHAPE
  109.   /* GtkObject derivative GnomeCanvasShape */
  110. # define SvGnomeCanvasShape(sv)    ((GnomeCanvasShape*)gperl_get_object_check (sv, GNOME_TYPE_CANVAS_SHAPE))
  111. # define newSVGnomeCanvasShape(val)    (gtk2perl_new_gtkobject (GTK_OBJECT (val)))
  112.   typedef GnomeCanvasShape GnomeCanvasShape_ornull;
  113. # define SvGnomeCanvasShape_ornull(sv)    (((sv) && SvOK (sv)) ? SvGnomeCanvasShape(sv) : NULL)
  114. # define newSVGnomeCanvasShape_ornull(val)    (((val) == NULL) ? &PL_sv_undef : gtk2perl_new_gtkobject (GTK_OBJECT (val)))
  115. #endif /* GNOME_TYPE_CANVAS_SHAPE */
  116.  
  117. #ifdef GNOME_TYPE_CANVAS_TEXT
  118.   /* GtkObject derivative GnomeCanvasText */
  119. # define SvGnomeCanvasText(sv)    ((GnomeCanvasText*)gperl_get_object_check (sv, GNOME_TYPE_CANVAS_TEXT))
  120. # define newSVGnomeCanvasText(val)    (gtk2perl_new_gtkobject (GTK_OBJECT (val)))
  121.   typedef GnomeCanvasText GnomeCanvasText_ornull;
  122. # define SvGnomeCanvasText_ornull(sv)    (((sv) && SvOK (sv)) ? SvGnomeCanvasText(sv) : NULL)
  123. # define newSVGnomeCanvasText_ornull(val)    (((val) == NULL) ? &PL_sv_undef : gtk2perl_new_gtkobject (GTK_OBJECT (val)))
  124. #endif /* GNOME_TYPE_CANVAS_TEXT */
  125.  
  126. #ifdef GNOME_TYPE_CANVAS_WIDGET
  127.   /* GtkObject derivative GnomeCanvasWidget */
  128. # define SvGnomeCanvasWidget(sv)    ((GnomeCanvasWidget*)gperl_get_object_check (sv, GNOME_TYPE_CANVAS_WIDGET))
  129. # define newSVGnomeCanvasWidget(val)    (gtk2perl_new_gtkobject (GTK_OBJECT (val)))
  130.   typedef GnomeCanvasWidget GnomeCanvasWidget_ornull;
  131. # define SvGnomeCanvasWidget_ornull(sv)    (((sv) && SvOK (sv)) ? SvGnomeCanvasWidget(sv) : NULL)
  132. # define newSVGnomeCanvasWidget_ornull(val)    (((val) == NULL) ? &PL_sv_undef : gtk2perl_new_gtkobject (GTK_OBJECT (val)))
  133. #endif /* GNOME_TYPE_CANVAS_WIDGET */
  134.  
  135. #ifdef GNOME_TYPE_CANVAS_POINTS
  136.   /* GBoxed GnomeCanvasPoints */
  137.   typedef GnomeCanvasPoints GnomeCanvasPoints_ornull;
  138. # define SvGnomeCanvasPoints(sv)    (gperl_get_boxed_check ((sv), GNOME_TYPE_CANVAS_POINTS))
  139. # define SvGnomeCanvasPoints_ornull(sv)    (((sv) && SvOK (sv)) ? SvGnomeCanvasPoints (sv) : NULL)
  140.   typedef GnomeCanvasPoints GnomeCanvasPoints_own;
  141.   typedef GnomeCanvasPoints GnomeCanvasPoints_copy;
  142.   typedef GnomeCanvasPoints GnomeCanvasPoints_own_ornull;
  143. # define newSVGnomeCanvasPoints(val)    (gperl_new_boxed ((gpointer) (val), GNOME_TYPE_CANVAS_POINTS, FALSE))
  144. # define newSVGnomeCanvasPoints_ornull(val)    ((val) ? newSVGnomeCanvasPoints(val) : &PL_sv_undef)
  145. # define newSVGnomeCanvasPoints_own(val)    (gperl_new_boxed ((gpointer) (val), GNOME_TYPE_CANVAS_POINTS, TRUE))
  146. # define newSVGnomeCanvasPoints_copy(val)    (gperl_new_boxed_copy ((gpointer) (val), GNOME_TYPE_CANVAS_POINTS))
  147. # define newSVGnomeCanvasPoints_own_ornull(val)    ((val) ? newSVGnomeCanvasPoints_own(val) : &PL_sv_undef)
  148. #endif /* GNOME_TYPE_CANVAS_POINTS */
  149.  
  150. #ifdef GNOME_TYPE_CANVAS_PATH_DEF
  151.   /* GBoxed GnomeCanvasPathDef */
  152.   typedef GnomeCanvasPathDef GnomeCanvasPathDef_ornull;
  153. # define SvGnomeCanvasPathDef(sv)    (gperl_get_boxed_check ((sv), GNOME_TYPE_CANVAS_PATH_DEF))
  154. # define SvGnomeCanvasPathDef_ornull(sv)    (((sv) && SvOK (sv)) ? SvGnomeCanvasPathDef (sv) : NULL)
  155.   typedef GnomeCanvasPathDef GnomeCanvasPathDef_own;
  156.   typedef GnomeCanvasPathDef GnomeCanvasPathDef_copy;
  157.   typedef GnomeCanvasPathDef GnomeCanvasPathDef_own_ornull;
  158. # define newSVGnomeCanvasPathDef(val)    (gperl_new_boxed ((gpointer) (val), GNOME_TYPE_CANVAS_PATH_DEF, FALSE))
  159. # define newSVGnomeCanvasPathDef_ornull(val)    ((val) ? newSVGnomeCanvasPathDef(val) : &PL_sv_undef)
  160. # define newSVGnomeCanvasPathDef_own(val)    (gperl_new_boxed ((gpointer) (val), GNOME_TYPE_CANVAS_PATH_DEF, TRUE))
  161. # define newSVGnomeCanvasPathDef_copy(val)    (gperl_new_boxed_copy ((gpointer) (val), GNOME_TYPE_CANVAS_PATH_DEF))
  162. # define newSVGnomeCanvasPathDef_own_ornull(val)    ((val) ? newSVGnomeCanvasPathDef_own(val) : &PL_sv_undef)
  163. #endif /* GNOME_TYPE_CANVAS_PATH_DEF */
  164.