view release on metacpan or search on metacpan
ChangeLog.pre-git view on Meta::CPAN
more warnings fixes:
* xs/GnomeApp.xs, xs/GnomeConfig.xs, xs/GnomeDruid.xs,
xs/GnomeInit.xs, xs/GnomeModuleInfo.xs, xs/GnomeUIDefs.xs:
don't let RETVAL be used uninitialized in alias switches.
* xs/Gnome2.xs: mark ax unused in functions which don't touch the
input stack, to hush compiler warnings
* xs/GnomeScore.xs: return type on PPCODE xsubs must be void.
2003/12/29 16:32 (-0500) rwmcfa1
* perl-Gnome2.spec.in: use the new DATE replacement in conjunction with
VERSION to create the changlog on the fly, which is better.
2003/12/22 23:54 (-0500) muppetman
* xs/GnomeConfig.xs: initialize variables to avoid 'may be used
uninitialized' warnings in functions with alias switches. it's not
xs/BonoboDock.xs view on Meta::CPAN
void
bonobo_dock_get_item_by_name (dock, name)
BonoboDock *dock
const gchar *name
PREINIT:
BonoboDockItem *dock_item_return;
BonoboDockPlacement placement_return;
guint num_band_return;
guint band_position_return;
guint offset_return;
PPCODE:
EXTEND (SP, 5);
dock_item_return = bonobo_dock_get_item_by_name (dock, name,
&placement_return, &num_band_return,
&band_position_return, &offset_return);
PUSHs (sv_2mortal (newSVBonoboDockItem (dock_item_return)));
PUSHs (sv_2mortal (newSVBonoboDockPlacement (placement_return)));
PUSHs (sv_2mortal (newSVuv (num_band_return)));
PUSHs (sv_2mortal (newSVuv (band_position_return)));
PUSHs (sv_2mortal (newSVuv (offset_return)));
xs/Gnome2.xs view on Meta::CPAN
#include "boot.xsh"
/* route Gnome's log domains through perl's warn() and croak() */
gperl_handle_logs_for ("Gnome");
gperl_handle_logs_for ("GnomeUI");
gperl_handle_logs_for ("Bonobo");
gperl_handle_logs_for ("BonoboUI");
}
void
GET_VERSION_INFO (class)
PPCODE:
EXTEND (SP, 3);
PUSHs (sv_2mortal (newSViv (LIBGNOMEUI_MAJOR_VERSION)));
PUSHs (sv_2mortal (newSViv (LIBGNOMEUI_MINOR_VERSION)));
PUSHs (sv_2mortal (newSViv (LIBGNOMEUI_MICRO_VERSION)));
PERL_UNUSED_VAR (ax);
bool
CHECK_VERSION (class, major, minor, micro)
int major
int minor
int micro
CODE:
RETVAL = LIBGNOMEUI_CHECK_VERSION (major, minor, micro);
OUTPUT:
RETVAL
MODULE = Gnome2 PACKAGE = Gnome2::Bonobo
void
GET_VERSION_INFO (class)
PPCODE:
EXTEND (SP, 3);
PUSHs (sv_2mortal (newSViv (LIBBONOBOUI_MAJOR_VERSION)));
PUSHs (sv_2mortal (newSViv (LIBBONOBOUI_MINOR_VERSION)));
PUSHs (sv_2mortal (newSViv (LIBBONOBOUI_MICRO_VERSION)));
PERL_UNUSED_VAR (ax);
bool
CHECK_VERSION (class, major, minor, micro)
int major
int minor
xs/GnomeAppHelper.xs view on Meta::CPAN
=cut
## GtkWidget *gnome_app_find_menu_pos (GtkWidget *parent, const gchar *path, gint *pos)
void
gnome_app_find_menu_pos (parent, path)
GtkWidget *parent
const gchar *path
PREINIT:
gint pos;
GtkWidget *widget;
PPCODE:
EXTEND (sp, 2);
widget = gnome_app_find_menu_pos (parent, path, &pos);
PUSHs (sv_2mortal (newSVGtkWidget (widget)));
PUSHs (sv_2mortal (newSViv (pos)));
MODULE = Gnome2::AppHelper PACKAGE = Gtk2::Toolbar PREFIX = gnome_app_
=for object Gnome2::AppHelper
=cut
xs/GnomeConfig.xs view on Meta::CPAN
void
get_string_with_default (class, path)
const char *path
ALIAS:
Gnome2::Config::get_translated_string_with_default = 1
Gnome2::Config::Private::get_string_with_default = 2
Gnome2::Config::Private::get_translated_string_with_default = 3
PREINIT:
char *retval = NULL;
gboolean def;
PPCODE:
switch (ix) {
case 0: retval = gnome_config_get_string_with_default (path, &def); break;
case 1: retval = gnome_config_get_translated_string_with_default (path, &def); break;
case 2: retval = gnome_config_private_get_string_with_default (path, &def); break;
case 3: retval = gnome_config_private_get_translated_string_with_default (path, &def); break;
}
EXTEND (sp, 1);
PUSHs (sv_2mortal (newSVuv (def)));
if (retval != NULL)
xs/GnomeConfig.xs view on Meta::CPAN
=cut
void
get_int_with_default (class, path)
const char *path
ALIAS:
Gnome2::Config::Private::get_int_with_default = 1
PREINIT:
int retval = 0;
gboolean def;
PPCODE:
switch (ix) {
case 0: retval = gnome_config_get_int_with_default (path, &def); break;
case 1: retval = gnome_config_private_get_int_with_default (path, &def); break;
}
EXTEND (sp, 2);
PUSHs (sv_2mortal (newSVuv (def)));
PUSHs (sv_2mortal (newSViv (retval)));
gdouble
xs/GnomeConfig.xs view on Meta::CPAN
=cut
void
get_float_with_default (class, path)
const char *path
ALIAS:
Gnome2::Config::Private::get_float_with_default = 1
PREINIT:
gdouble retval = 0.0;
gboolean def;
PPCODE:
switch (ix) {
case 0: retval = gnome_config_get_float_with_default (path, &def); break;
case 1: retval = gnome_config_private_get_float_with_default (path, &def); break;
}
EXTEND (sp, 2);
PUSHs (sv_2mortal (newSVuv (def)));
PUSHs (sv_2mortal (newSVnv (retval)));
gboolean
xs/GnomeConfig.xs view on Meta::CPAN
=cut
void
get_bool_with_default (class, path)
const char *path
ALIAS:
Gnome2::Config::Private::get_bool_with_default = 1
PREINIT:
gboolean retval = FALSE;
gboolean def = FALSE;
PPCODE:
switch (ix) {
case 0: retval = gnome_config_get_bool_with_default (path, &def); break;
case 1: retval = gnome_config_private_get_bool_with_default (path, &def); break;
}
EXTEND (sp, 2);
PUSHs (sv_2mortal (newSVuv (def)));
PUSHs (sv_2mortal (newSVuv (retval)));
SV *
xs/GnomeConfig.xs view on Meta::CPAN
void
get_vector_with_default (class, path)
const char *path
ALIAS:
Gnome2::Config::Private::get_vector_with_default = 1
PREINIT:
gboolean def;
char **argv = NULL;
int argc, i;
AV *array = newAV ();
PPCODE:
switch (ix) {
case 0: gnome_config_get_vector_with_default (path, &argc, &argv, &def); break;
case 1: gnome_config_private_get_vector_with_default (path, &argc, &argv, &def); break;
}
if (argv != NULL) {
for (i = 0; i < argc; i++)
av_push (array, newSVpv (argv[i], 0));
g_free (argv);
xs/GnomeConfig.xs view on Meta::CPAN
Returns the new GnomeConfigIterator, the key, and the value.
=cut
void
gnome_config_iterator_next (handle)
SV *handle
PREINIT:
void *new = NULL, *old = NULL;
char *key = NULL, *value = NULL;
PPCODE:
old = SvGnomeConfigIterator (handle);
new = gnome_config_iterator_next (old, &key, &value);
if (new && key && value) {
EXTEND (sp, 3);
PUSHs (sv_2mortal (newSVGnomeConfigIterator (new)));
PUSHs (sv_2mortal (newSVpv (key, 0)));
PUSHs (sv_2mortal (newSVpv (value, 0)));
xs/GnomeDruid.xs view on Meta::CPAN
=cut
## GtkWidget * gnome_druid_new_with_window (const char *title, GtkWindow *parent, gboolean close_on_cancel, GtkWidget **window);
void
gnome_druid_new_with_window (class, title, parent, close_on_cancel)
const char * title
GtkWindow_ornull * parent
gboolean close_on_cancel
PREINIT:
GtkWidget * window;
GtkWidget * druid;
PPCODE:
druid = gnome_druid_new_with_window (title, parent,
close_on_cancel, &window);
XPUSHs (sv_2mortal (newSVGnomeDruid (druid)));
XPUSHs (sv_2mortal (newSVGtkWindow (window)));
xs/GnomeI18N.xs view on Meta::CPAN
Returns a list of languages.
=cut
## const GList * gnome_i18n_get_language_list (const gchar *category_name)
void
gnome_i18n_get_language_list (class, category_name=NULL)
const gchar *category_name
PREINIT:
const GList *results;
PPCODE:
results = gnome_i18n_get_language_list (category_name);
for ( ; results != NULL; results = results->next)
XPUSHs (sv_2mortal (newSVpv (results->data, 0)));
## void gnome_i18n_push_c_numeric_locale (void)
void
gnome_i18n_push_c_numeric_locale (class)
C_ARGS:
/* void */
xs/GnomeIconList.xs view on Meta::CPAN
Returns a list of integers.
=cut
## GList * gnome_icon_list_get_selection (GnomeIconList *gil)
void
gnome_icon_list_get_selection (gil)
GnomeIconList *gil
PREINIT:
GList *list = NULL;
PPCODE:
list = gnome_icon_list_get_selection (gil);
for (; list != NULL; list = list->next)
/* cast to avoid warning. */
XPUSHs (sv_2mortal (newSViv ((gint) list->data)));
## void gnome_icon_list_focus_icon (GnomeIconList *gil, gint idx)
void
gnome_icon_list_focus_icon (gil, idx)
GnomeIconList *gil
gint idx
xs/GnomeIconLookup.xs view on Meta::CPAN
GnomeThumbnailFactory_ornull *thumbnail_factory
const char *file_uri
SV *custom_icon
GnomeVFSFileInfo *file_info
const char *mime_type
GnomeIconLookupFlags flags
PREINIT:
GnomeIconLookupResultFlags result;
char *icon = NULL;
const char *real_custom_icon = NULL;
PPCODE:
if (SvPOK (custom_icon))
real_custom_icon = (const char *) SvPV_nolen (custom_icon);
icon = gnome_icon_lookup (icon_theme, thumbnail_factory, file_uri, real_custom_icon, file_info, mime_type, flags, &result);
if (icon == NULL)
XSRETURN_UNDEF;
EXTEND (sp, 2);
PUSHs (sv_2mortal (newSVpv (icon, 0)));
xs/GnomeIconLookup.xs view on Meta::CPAN
gnome_icon_lookup_sync (icon_theme, thumbnail_factory, file_uri, custom_icon, flags)
GnomeIconTheme *icon_theme
GnomeThumbnailFactory_ornull *thumbnail_factory
const char *file_uri
SV *custom_icon
GnomeIconLookupFlags flags
PREINIT:
GnomeIconLookupResultFlags result;
char *icon;
const char *real_custom_icon = NULL;
PPCODE:
if (SvPOK (custom_icon))
real_custom_icon = (const char *) SvPV_nolen (custom_icon);
icon = gnome_icon_lookup_sync (icon_theme, thumbnail_factory, file_uri, real_custom_icon, flags, &result);
if (icon == NULL)
XSRETURN_UNDEF;
EXTEND (sp, 2);
PUSHs (sv_2mortal (newSVpv (icon, 0)));
xs/GnomeIconTheme.xs view on Meta::CPAN
Returns a list of paths.
=cut
## void gnome_icon_theme_get_search_path (GnomeIconTheme *theme, char **path[], int *n_elements)
void
gnome_icon_theme_get_search_path (theme)
GnomeIconTheme *theme
PREINIT:
char **path;
int n_elements, i;
PPCODE:
gnome_icon_theme_get_search_path (theme, &path, &n_elements);
if (path) {
EXTEND (sp, n_elements);
for (i = 0; i < n_elements; i++)
PUSHs (sv_2mortal (newSVpv (path[i], 0)));
}
else
XSRETURN_EMPTY;
xs/GnomeIconTheme.xs view on Meta::CPAN
## char * gnome_icon_theme_lookup_icon (GnomeIconTheme *theme, const char *icon_name, int size, const GnomeIconData **icon_data, int *base_size)
void
gnome_icon_theme_lookup_icon (theme, icon_name, size)
GnomeIconTheme *theme
const char *icon_name
int size
PREINIT:
char *filename;
const GnomeIconData *icon_data;
int base_size;
PPCODE:
filename = gnome_icon_theme_lookup_icon (theme, icon_name, size, &icon_data, &base_size);
if (!filename)
XSRETURN_EMPTY;
EXTEND (sp, 3);
PUSHs (sv_2mortal (newSVpv (filename, 0)));
PUSHs (sv_2mortal (newSVGnomeIconData (icon_data)));
PUSHs (sv_2mortal (newSViv (base_size)));
xs/GnomeIconTheme.xs view on Meta::CPAN
Returns a list of icons.
=cut
## GList * gnome_icon_theme_list_icons (GnomeIconTheme *theme, const char *context)
void
gnome_icon_theme_list_icons (theme, context=NULL)
GnomeIconTheme *theme
const char *context
PREINIT:
GList *i, *results = NULL;
PPCODE:
results = gnome_icon_theme_list_icons (theme, context);
for (i = results; i != NULL; i = i->next) {
XPUSHs (sv_2mortal (newSVpv (i->data, 0)));
g_free (i->data);
}
g_list_free (results);
## char * gnome_icon_theme_get_example_icon_name (GnomeIconTheme *theme)
char *
gnome_icon_theme_get_example_icon_name (theme)
xs/GnomeProgram.xs view on Meta::CPAN
## gchar * gnome_program_locate_file (GnomeProgram *program, GnomeFileDomain domain, const gchar *file_name, gboolean only_if_exists, GSList **ret_locations)
void
gnome_program_locate_file (program, domain, file_name, only_if_exists)
GnomeProgram *program
GnomeFileDomain domain
const gchar *file_name
gboolean only_if_exists
PREINIT:
gchar *path;
GSList *i, *ret_locations = NULL;
PPCODE:
path = gnome_program_locate_file (program, domain, file_name,
only_if_exists, &ret_locations);
if (path) {
XPUSHs (sv_2mortal (newSVGChar (path)));
g_free (path);
}
for (i = ret_locations; i != NULL; i = i->next) {
XPUSHs (sv_2mortal (newSVGChar ((gchar *) i->data)));
xs/GnomeScore.xs view on Meta::CPAN
## gint gnome_score_get_notable(const gchar *gamename, const gchar *level, gchar ***names, gfloat **scores, time_t **scoretimes);
void
gnome_score_get_notable (class, gamename, level)
const gchar *gamename
const gchar *level
PREINIT:
gint results, i;
gchar **names;
gfloat *scores;
time_t *scoretimes;
PPCODE:
results = gnome_score_get_notable (gamename, level, &names, &scores, &scoretimes);
for (i = 0; i < results; i++) {
AV *set = newAV ();
av_store (set, 0, newSVpv (names[i], 0));
av_store (set, 1, newSVnv (scores[i]));
av_store (set, 2, newSViv (scoretimes[i]));
XPUSHs (sv_2mortal (newRV_noinc ((SV*) set)));