… | |
… | |
13 | #include <gtk/gtk.h> |
13 | #include <gtk/gtk.h> |
14 | #include <gdk-pixbuf/gdk-pixbuf.h> |
14 | #include <gdk-pixbuf/gdk-pixbuf.h> |
15 | |
15 | |
16 | #include <gperl.h> |
16 | #include <gperl.h> |
17 | #include <gtk2perl.h> |
17 | #include <gtk2perl.h> |
|
|
18 | |
|
|
19 | #include <assert.h> |
18 | |
20 | |
19 | #define IW 80 /* MUST match Schnauzer.pm! */ |
21 | #define IW 80 /* MUST match Schnauzer.pm! */ |
20 | #define IH 60 /* MUST match Schnauzer.pm! */ |
22 | #define IH 60 /* MUST match Schnauzer.pm! */ |
21 | |
23 | |
22 | #define RAND (seed = (seed + 7141) * 54773 % 134456) |
24 | #define RAND (seed = (seed + 7141) * 54773 % 134456) |
… | |
… | |
400 | compare (GdkPixbuf *a, GdkPixbuf *b) |
402 | compare (GdkPixbuf *a, GdkPixbuf *b) |
401 | PPCODE: |
403 | PPCODE: |
402 | { |
404 | { |
403 | int w = gdk_pixbuf_get_width (a); |
405 | int w = gdk_pixbuf_get_width (a); |
404 | int h = gdk_pixbuf_get_height (a); |
406 | int h = gdk_pixbuf_get_height (a); |
|
|
407 | |
405 | int sa = gdk_pixbuf_get_rowstride (a); |
408 | int sa = gdk_pixbuf_get_rowstride (a); |
406 | int sb = gdk_pixbuf_get_rowstride (b); |
409 | int sb = gdk_pixbuf_get_rowstride (b); |
407 | |
410 | |
408 | guchar *pa = gdk_pixbuf_get_pixels (a); |
411 | guchar *pa = gdk_pixbuf_get_pixels (a); |
409 | guchar *pb = gdk_pixbuf_get_pixels (b); |
412 | guchar *pb = gdk_pixbuf_get_pixels (b); |