Re: Gauche GTK2 hint
Shiro Kawai <[email protected]> Fri, 12 Dec 2025 18:19:41 -1000
| Newsgroups | gmane.lisp.scheme.gauche |
|---|---|
| Message-ID | <CALN0JNHSkeu57BqN5WmFriRhxRGgjL3b4fadw_YhhOh_=Nq90g@mail.gmail.com> |
--===============6229326829271499705==
Content-Type: multipart/alternative; boundary="0000000000007adb0c0645cdb0e6"
--0000000000007adb0c0645cdb0e6
Content-Type: text/plain; charset="UTF-8"
Content-Transfer-Encoding: quoted-printable
Hi Stephen,
Thank you for the patch. It is in the HEAD. I also plan to release 0.6.2
including this patch. A "pre-release" tarball is downloadable from here:
https://practical-scheme.net/vault/Gauche-gtk2-0.6.2_pre1.tgz
Could you try it at your convenience?
--shiro
On Fri, Dec 12, 2025 at 9:57=E2=80=AFAM Stephen Lewis <lewis+gauche@freeshe=
ll.org>
wrote:
> Shiro,
>
> I built 'gauche-gtk2' from the tarball "Gauche-gtk2-0.6.1.tgz"
>
> I can use 'gdk-pixbuf-loader-new-with-type' which works fine
> then 'gdk-pixbuf-loader-write' and 'gdk-pixbuf-loader-close'
> but 'gdk-pixbuf-loader-get-pixbuf' is missing so you can't
> access the 'pixbuf' you just made :-(
>
> Here is my patch to add hint for 'gdk-pixbuf-loader-get-pixbuf'.
>
> =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
> --- ./src/gdk-lib.hints.orig 2025-12-08 13:36:52.268016378 -0800
> +++ ./src/gdk-lib.hints 2025-12-08 13:51:52.243272391 -0800
> @@ -1057,6 +1057,13 @@
> ;; gdk-pixbuf-loader.h
> ;;
>
> +(define-cproc-fix gdk-pixbuf-loader-get-pixbuf
> + (fix-arguments! '(loader::<gdk-pixbuf-loader>))
> + (fix-body!
> + "{ GdkPixbuf *pixbuf =3D gdk_pixbuf_loader_get_pixbuf(loader);
> + if (pixbuf) SCM_RETURN(SCM_MAKE_GDK_PIXBUF(pixbuf));
> + else SCM_RETURN(SCM_FALSE);}"))
> +
> (define-cproc-fix gdk-pixbuf-loader-new-with-type
> (fix-arguments! '(image-type::<const-char*>))
> (fix-body! "GError *perr =3D NULL;
> =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
>
> I really like Gauche and thank you for producing and maintaining it
> and 'gauche-gtk2' as well. It still works on Fedora Asahi Remix 42
> which I am running on a Mac Mini M2 Pro.
>
> Stephen Lewis
> --
>
>
> _______________________________________________
> Gauche-devel mailing list
> [email protected]
> https://lists.sourceforge.net/lists/listinfo/gauche-devel
>
--0000000000007adb0c0645cdb0e6
Content-Type: text/html; charset="UTF-8"
Content-Transfer-Encoding: quoted-printable
<div dir=3D"ltr">Hi Stephen,<div>Thank you for the patch.=C2=A0 It is in th=
e HEAD.=C2=A0 I also plan to release 0.6.2 including this patch.=C2=A0 A &q=
uot;pre-release" tarball is downloadable from here:</div><div><a href=
=3D"https://practical-scheme.net/vault/Gauche-gtk2-0.6.2_pre1.tgz">https://=
practical-scheme.net/vault/Gauche-gtk2-0.6.2_pre1.tgz</a></div><div>Could y=
ou try it at your convenience?</div><div><br></div><div>--shiro</div><div><=
br></div></div><br><div class=3D"gmail_quote gmail_quote_container"><div di=
r=3D"ltr" class=3D"gmail_attr">On Fri, Dec 12, 2025 at 9:57=E2=80=AFAM Step=
hen Lewis <<a href=3D"mailto:lewis%[email protected]">lewis+gauche@=
freeshell.org</a>> wrote:<br></div><blockquote class=3D"gmail_quote" sty=
le=3D"margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);paddi=
ng-left:1ex">Shiro,<br>
<br>
I built 'gauche-gtk2' from the tarball "Gauche-gtk2-0.6.1.tgz&=
quot;<br>
<br>
I can use 'gdk-pixbuf-loader-new-with-type' which works fine<br>
then 'gdk-pixbuf-loader-write' and 'gdk-pixbuf-loader-close'=
;<br>
but 'gdk-pixbuf-loader-get-pixbuf' is missing so you can't <br>
access the 'pixbuf' you just made :-(<br>
<br>
Here is my patch to add hint for 'gdk-pixbuf-loader-get-pixbuf'.<br=
>
<br>
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D<br=
>
--- ./src/gdk-lib.hints.orig=C2=A0 =C2=A0 2025-12-08 13:36:52.268016378 -08=
00<br>
+++ ./src/gdk-lib.hints 2025-12-08 13:51:52.243272391 -0800<br>
@@ -1057,6 +1057,13 @@<br>
=C2=A0;; gdk-pixbuf-loader.h<br>
=C2=A0;;<br>
<br>
+(define-cproc-fix gdk-pixbuf-loader-get-pixbuf<br>
+=C2=A0 (fix-arguments! '(loader::<gdk-pixbuf-loader>))<br>
+=C2=A0 (fix-body!<br>
+=C2=A0 "{ GdkPixbuf *pixbuf =3D gdk_pixbuf_loader_get_pixbuf(loader);=
<br>
+=C2=A0 if (pixbuf) SCM_RETURN(SCM_MAKE_GDK_PIXBUF(pixbuf));<br>
+=C2=A0 else SCM_RETURN(SCM_FALSE);}"))<br>
+<br>
=C2=A0(define-cproc-fix gdk-pixbuf-loader-new-with-type<br>
=C2=A0 =C2=A0(fix-arguments! '(image-type::<const-char*>))<br>
=C2=A0 =C2=A0(fix-body! "GError *perr =3D NULL;<br>
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D<br=
>
<br>
I really like Gauche and thank you for producing and maintaining it<br>
and 'gauche-gtk2' as well. It still works on Fedora Asahi Remix 42<=
br>
which I am running on a Mac Mini M2 Pro.<br>
<br>
Stephen Lewis<br>
-- <br>
<br>
<br>
_______________________________________________<br>
Gauche-devel mailing list<br>
<a href=3D"mailto:[email protected]" target=3D"_blank">Gau=
[email protected]</a><br>
<a href=3D"https://lists.sourceforge.net/lists/listinfo/gauche-devel" rel=
=3D"noreferrer" target=3D"_blank">https://lists.sourceforge.net/lists/listi=
nfo/gauche-devel</a><br>
</blockquote></div>
--0000000000007adb0c0645cdb0e6--
--===============6229326829271499705==
Content-Type: text/plain; charset="us-ascii"
MIME-Version: 1.0
Content-Transfer-Encoding: 7bit
Content-Disposition: inline
--===============6229326829271499705==
Content-Type: text/plain; charset="us-ascii"
MIME-Version: 1.0
Content-Transfer-Encoding: 7bit
Content-Disposition: inline
_______________________________________________
Gauche-devel mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/gauche-devel
--===============6229326829271499705==--