ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/kgsueme/gtk2-perl-xs.patch
(Generate patch)

Comparing kgsueme/gtk2-perl-xs.patch (file contents):
Revision 1.1 by pcg, Sun Jun 1 06:07:11 2003 UTC vs.
Revision 1.2 by pcg, Sun Jun 1 06:40:15 2003 UTC

1
2
3Gtk2/ChangeLog
42003/06/01 08:07 pcg
5
6 * xs/GtkAspectFrame.xs: fixed package name typo.
7 * xs/GtkAspectFrame.xs: renamed ->set to set_param, because ->set is more
8 universal.
9 * xs/GtkTreeSortable: fixed package name typo.
10
11Glib/ChangeLog
122003/06/01 08:07 pcg
13
14 * gperl.h: make it compile even on non-threaded perls (where aTHX is empty).
15 * GObject.xs: ->set and ->get accept more than one property pair/name.
16
17 1
18Index: Glib/GObject.xs 2Index: Glib/GObject.xs
19=================================================================== 3===================================================================
20RCS file: /cvsroot/gtk2-perl/gtk2-perl-xs/Glib/GObject.xs,v 4RCS file: /cvsroot/gtk2-perl/gtk2-perl-xs/Glib/GObject.xs,v
21retrieving revision 1.2 5retrieving revision 1.2
22diff -u -p -r1.2 GObject.xs 6diff -u -p -r1.2 GObject.xs
23--- Glib/GObject.xs 22 May 2003 14:23:11 -0000 1.2 7--- Glib/GObject.xs 22 May 2003 14:23:11 -0000 1.2
24+++ Glib/GObject.xs 1 Jun 2003 06:05:24 -0000 8+++ Glib/GObject.xs 1 Jun 2003 06:36:49 -0000
25@@ -390,37 +390,49 @@ g_object_get_data (object, key) 9@@ -390,37 +390,49 @@ g_object_get_data (object, key)
26 10
27 11
28 SV * 12 SV *
29-g_object_get (object, name) 13-g_object_get (object, name)
… …
44- RETVAL 28- RETVAL
45+ PPCODE: 29+ PPCODE:
46+ int i; 30+ int i;
47+ 31+
48+ EXTEND (SP, items); 32+ EXTEND (SP, items);
49+ for (i = 1; i <= items; i++) { 33+ for (i = 1; i < items; i++) {
50+ char *name = SvPV_nolen (ST (i)); 34+ char *name = SvPV_nolen (ST (i));
51+ 35+
52+ init_property_value (object, name, &value); 36+ init_property_value (object, name, &value);
53+ g_object_get_property (object, name, &value); 37+ g_object_get_property (object, name, &value);
54+ PUSHs (sv_2mortal (gperl_sv_from_value (&value))); 38+ PUSHs (sv_2mortal (gperl_sv_from_value (&value)));
… …
92=================================================================== 76===================================================================
93RCS file: /cvsroot/gtk2-perl/gtk2-perl-xs/Glib/gperl.h,v 77RCS file: /cvsroot/gtk2-perl/gtk2-perl-xs/Glib/gperl.h,v
94retrieving revision 1.4 78retrieving revision 1.4
95diff -u -p -r1.4 gperl.h 79diff -u -p -r1.4 gperl.h
96--- Glib/gperl.h 31 May 2003 04:00:45 -0000 1.4 80--- Glib/gperl.h 31 May 2003 04:00:45 -0000 1.4
97+++ Glib/gperl.h 1 Jun 2003 06:05:24 -0000 81+++ Glib/gperl.h 1 Jun 2003 06:36:51 -0000
98@@ -28,6 +28,11 @@ 82@@ -28,6 +28,11 @@
99 83
100 #include <glib-object.h> 84 #include <glib-object.h>
101 85
102+#ifndef PERL_IMPLICIT_CONTEXT 86+#ifndef PERL_IMPLICIT_CONTEXT
… …
111=================================================================== 95===================================================================
112RCS file: /cvsroot/gtk2-perl/gtk2-perl-xs/Gtk2/xs/GtkAspectFrame.xs,v 96RCS file: /cvsroot/gtk2-perl/gtk2-perl-xs/Gtk2/xs/GtkAspectFrame.xs,v
113retrieving revision 1.3 97retrieving revision 1.3
114diff -u -p -r1.3 GtkAspectFrame.xs 98diff -u -p -r1.3 GtkAspectFrame.xs
115--- Gtk2/xs/GtkAspectFrame.xs 22 May 2003 14:23:23 -0000 1.3 99--- Gtk2/xs/GtkAspectFrame.xs 22 May 2003 14:23:23 -0000 1.3
116+++ Gtk2/xs/GtkAspectFrame.xs 1 Jun 2003 06:05:24 -0000 100+++ Gtk2/xs/GtkAspectFrame.xs 1 Jun 2003 06:36:51 -0000
117@@ -21,7 +21,7 @@ 101@@ -21,7 +21,7 @@
118 102
119 #include "gtk2perl.h" 103 #include "gtk2perl.h"
120 104
121-MODULE = Gtk2::AspectFrame PACKAGE = Gtk2::AspectFrame PREFIX = gtk_aspectframe_ 105-MODULE = Gtk2::AspectFrame PACKAGE = Gtk2::AspectFrame PREFIX = gtk_aspectframe_
… …
139=================================================================== 123===================================================================
140RCS file: /cvsroot/gtk2-perl/gtk2-perl-xs/Gtk2/xs/GtkTreeSortable.xs,v 124RCS file: /cvsroot/gtk2-perl/gtk2-perl-xs/Gtk2/xs/GtkTreeSortable.xs,v
141retrieving revision 1.3 125retrieving revision 1.3
142diff -u -p -r1.3 GtkTreeSortable.xs 126diff -u -p -r1.3 GtkTreeSortable.xs
143--- Gtk2/xs/GtkTreeSortable.xs 22 May 2003 14:23:24 -0000 1.3 127--- Gtk2/xs/GtkTreeSortable.xs 22 May 2003 14:23:24 -0000 1.3
144+++ Gtk2/xs/GtkTreeSortable.xs 1 Jun 2003 06:05:24 -0000 128+++ Gtk2/xs/GtkTreeSortable.xs 1 Jun 2003 06:36:51 -0000
145@@ -23,7 +23,7 @@ 129@@ -23,7 +23,7 @@
146 130
147 // typedef gint (* GtkTreeIterCompareFunc) (GtkTreeModel *model, GtkTreeIter *a, GtkTreeIter *b, gpointer user_data) 131 // typedef gint (* GtkTreeIterCompareFunc) (GtkTreeModel *model, GtkTreeIter *a, GtkTreeIter *b, gpointer user_data)
148 132
149-MODULE = Gtk2::TreeSortable PACKAGE = Gtk2::TreeSortable PREFIX = gtk_tre_sortable_ 133-MODULE = Gtk2::TreeSortable PACKAGE = Gtk2::TreeSortable PREFIX = gtk_tre_sortable_

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines