Gnome2-Dia

 view release on metacpan or  search on metacpan

xs/Dia.xs  view on Meta::CPAN

BOOT:
#include "register.xsh"
#include "boot.xsh"
	gperl_handle_logs_for ("DiaCanvas2");

# --------------------------------------------------------------------------- #

void
GET_VERSION_INFO (class)
    PPCODE:
	EXTEND (SP, 3);
	PUSHs (sv_2mortal (newSViv (DIACANVAS_MAJOR_VERSION)));
	PUSHs (sv_2mortal (newSViv (DIACANVAS_MINOR_VERSION)));
	PUSHs (sv_2mortal (newSViv (DIACANVAS_MICRO_VERSION)));
	PERL_UNUSED_VAR (ax);

bool
CHECK_VERSION (class, major, minor, micro)
	int major
	int minor

xs/DiaCanvas.xs  view on Meta::CPAN

void dia_canvas_set_static_extents (canvas, stat)
	DiaCanvas *canvas
	gboolean stat

##  void dia_canvas_snap_to_grid (DiaCanvas *canvas, gdouble *x, gdouble *y)
void
dia_canvas_snap_to_grid (canvas, x, y)
	DiaCanvas *canvas
	gdouble x
	gdouble y
    PPCODE:
	dia_canvas_snap_to_grid (canvas, &x, &y);
	EXTEND (sp, 2);
	PUSHs (sv_2mortal (newSVnv (x)));
	PUSHs (sv_2mortal (newSVnv (y)));

##  void dia_canvas_set_snap_to_grid (DiaCanvas *canvas, gboolean snap)
void
dia_canvas_set_snap_to_grid (canvas, snap)
	DiaCanvas *canvas
	gboolean snap

xs/DiaCanvas.xs  view on Meta::CPAN

dia_canvas_glue_handle (canvas, handle, dest_x, dest_y)
	DiaCanvas *canvas
	DiaHandle *handle
	gdouble dest_x
	gdouble dest_y
    PREINIT:
	gdouble distance;
	gdouble glue_x;
	gdouble glue_y;
	DiaCanvasItem *item;
    PPCODE:
	distance = dia_canvas_glue_handle (canvas, handle, dest_x, dest_y,
	                                   &glue_x, &glue_y, &item);
	EXTEND (sp, 4);
	PUSHs (sv_2mortal (newSVnv (distance)));
	PUSHs (sv_2mortal (newSVnv (glue_x)));
	PUSHs (sv_2mortal (newSVnv (glue_y)));
	PUSHs (sv_2mortal (newSVDiaCanvasItem (item)));

##  GList* dia_canvas_find_objects_in_rectangle (DiaCanvas *canvas, DiaRectangle *rect)
void
dia_canvas_find_objects_in_rectangle (canvas, rect)
	DiaCanvas *canvas
	DiaRectangle *rect
    PREINIT:
	GList *list = NULL, *i;
    PPCODE:
	list = dia_canvas_find_objects_in_rectangle (canvas, rect);
	for (i = list; i != NULL; i = i->next)
		XPUSHs (sv_2mortal (newSVDiaCanvasItem (i->data)));
	g_list_free (list);

##  void dia_canvas_add_constraint (DiaCanvas *canvas, DiaConstraint *c)
void
dia_canvas_add_constraint (canvas, c)
	DiaCanvas *canvas
	DiaConstraint *c

xs/DiaCanvasItem.xs  view on Meta::CPAN

    CODE:
	RETVAL = &item->bounds;
    OUTPUT:
	RETVAL

void
connected_handles (item)
	DiaCanvasItem *item
    PREINIT:
	GList *i;
    PPCODE:
	for (i = item->connected_handles; i != NULL; i = i->next)
		XPUSHs (sv_2mortal (newSVDiaHandle (i->data)));

##  DiaCanvasItem* dia_canvas_item_create (GType type, const gchar *first_arg_name, ...)
DiaCanvasItem_noinc *
dia_canvas_item_create (class, type, ...)
	const char *type
    PREINIT:
	GType real_type;
	int i;

xs/DiaCanvasItem.xs  view on Meta::CPAN

##  void dia_canvas_item_bb_affine (DiaCanvasItem* item, gdouble affine[6], gdouble *x1, gdouble *y1, gdouble *x2, gdouble *y2)
void
dia_canvas_item_bb_affine (item, affine)
	DiaCanvasItem *item
	SV *affine
    PREINIT:
	gdouble x1;
	gdouble y1;
	gdouble x2;
	gdouble y2;
    PPCODE:
	dia_canvas_item_bb_affine (item, SvDiaAffine (affine), &x1, &y1, &x2, &y2);
	EXTEND (sp, 4);
	PUSHs (sv_2mortal (newSVnv (x1)));
	PUSHs (sv_2mortal (newSVnv (y1)));
	PUSHs (sv_2mortal (newSVnv (x2)));
	PUSHs (sv_2mortal (newSVnv (y2)));

##  gboolean dia_canvas_item_get_shape_iter (DiaCanvasItem *item, DiaCanvasIter *iter)
DiaCanvasIter_copy *
dia_canvas_item_get_shape_iter (item)