GNU logs - #47232, boring messages

Message sent to bug-guile@HIDDEN:

Subject: bug#47232: GOOPS cannot use generic as accessor in 3.0.x
Resent-From: Jan Nieuwenhuizen <janneke@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: bug-guile@HIDDEN
Resent-Date: Thu, 18 Mar 2021 13:20:02 +0000
Resent-Message-ID: <handler.47232.B.161607355129438 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
To: 47232 <at> debbugs.gnu.org
From: Jan Nieuwenhuizen <janneke@HIDDEN>
Organization: AvatarAcademy.nl
Date: Thu, 18 Mar 2021 14:19:00 +0100
Message-ID: <87czvw1tx7.fsf@HIDDEN>
User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/27.1 (gnu/linux)
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="=-=-="
Precedence: list
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>

--=-=-=
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: quoted-printable

Hi!

Trying to upgrade 8sync to latest Guile, I found the problem that a
generic function cannot be used as as accessor, and then be
exported/imported.  Or something.  At least, the problem is triggered
when compiling (or using) a module that does that.

See the attached foo.scm, bar.scm and `doit', when running it in the
Guile source tree I get

--8<---------------cut here---------------start------------->8---
$ ./doit=20
++ export GUILE_LOAD_COMPILED_PATH=3D/home/janneke/src/8sync/wip
++ GUILE_LOAD_COMPILED_PATH=3D/home/janneke/src/8sync/wip
++ ./pre-inst-env guild compile -L . -o foo.go foo.scm
wrote `foo.go'
++ ./pre-inst-env guild compile -L . -o bar.go bar.scm
Backtrace:
In ice-9/eval.scm:
   293:34 19 (_ #<module (#{ g79}#) 7ff689b8dd20>)
In ice-9/boot-9.scm:
   3380:4 18 (define-module* _ #:filename _ #:pure _ #:version _ #:imports =
_ #:exports _ #:replacements _ # _ # =E2=80=A6)
  2565:24 17 (call-with-deferred-observers #<procedure 7ff689b948c0 at ice-=
9/boot-9.scm:3381:5 ()>)
  3393:24 16 (_)
   222:17 15 (map1 (((foo))))
  3297:17 14 (resolve-interface (foo) #:select _ #:hide _ #:prefix _ #:rena=
mer _ #:version _)
In ice-9/threads.scm:
    390:8 13 (_ _)
In ice-9/boot-9.scm:
  3223:13 12 (_)
In ice-9/threads.scm:
    390:8 11 (_ _)
In ice-9/boot-9.scm:
  3507:20 10 (_)
   2806:4  9 (save-module-excursion #<procedure 7ff68aeece10 at ice-9/boot-=
9.scm:3508:21 ()>)
  3527:26  8 (_)
In unknown file:
           7 (primitive-load-path "foo" #<procedure 7ff689bb6140 at ice-9/b=
oot-9.scm:3514:37 ()>)
In foo.scm:
     12:0  6 (_)
In oop/goops.scm:
   2852:4  5 (_ _ . _)
   2782:2  4 (_ #<<class> <foo> 7ff688c64f80> _)
In srfi/srfi-1.scm:
    634:9  3 (for-each #<procedure 7ff688c5c0c0 at oop/goops.scm:2579:3 (sl=
ot)> (#<<slot> foo 7ff688c64e80>))
In oop/goops.scm:
  2590:22  2 (_ #<<slot> foo 7ff688c64e80>)
In unknown file:
           1 (setter #<<generic> .foo (1)>)
In ice-9/boot-9.scm:
  1669:16  0 (raise-exception _ #:continuable? _)

ice-9/boot-9.scm:1669:16: In procedure raise-exception:
In procedure setter: Wrong type argument in position 1: #<<generic> .foo (1=
)>
--8<---------------cut here---------------end--------------->8---

I found similar behaviour in guile-3.0.2, guile-2.2.7 is fine.

Greetings,
Janneke


--=-=-=
Content-Type: application/octet-stream
Content-Disposition: attachment; filename=doit
Content-Transfer-Encoding: base64

c2V0IC14CgojIFdlIGNhbm5vdCB1c2UgbWV0YS9idWlsZC1lbnYsIHRoYXQgcmVtb3ZlcyAkUFdE
IGZyb20gR1VJTEVfTE9BRF8qX1BBVEgKZXhwb3J0IEdVSUxFX0xPQURfUEFUSD0kUFdEOiRQV0Qv
bW9kdWxlCmV4cG9ydCBHVUlMRV9MT0FEX0NPTVBJTEVEX1BBVEg9JFBXRDokUFdEL21vZHVsZQpl
eHBvcnQgR1VJTEU9JFBXRC9saWJndWlsZS9ndWlsZQoKIyBBbHNvLCAiZ3VpbGQgY29tcGlsZSIg
bGFja3MgdGhlIC1DIGZsYWcKbWV0YS9ndWlsZCBjb21waWxlIC1MIC4gLW8gZm9vLmdvIGZvby5z
Y20KbWV0YS9ndWlsZCBjb21waWxlIC1MIC4gLW8gYmFyLmdvIGJhci5zY20gCg==
--=-=-=
Content-Type: application/octet-stream
Content-Disposition: attachment; filename=foo.scm
Content-Transfer-Encoding: base64

KGRlZmluZS1tb2R1bGUgKGZvbykKICAjOnVzZS1tb2R1bGUgKG9vcCBnb29wcykKICAjOmV4cG9y
dCAoPGZvbz4pKQoKKGRlZmluZSAoZm9vKQogICN0KQooZGVmaW5lLWdlbmVyaWMgLmZvbykKCihk
ZWZpbmUtY2xhc3MgPGZvbz4gKCkKICAoZm9vICM6YWNjZXNzb3IgLmZvbykpCg==
--=-=-=
Content-Type: application/octet-stream
Content-Disposition: attachment; filename=bar.scm
Content-Transfer-Encoding: base64

KGRlZmluZS1tb2R1bGUgKGJhcikKICAjOnVzZS1tb2R1bGUgKGZvbykpCgooZGlzcGxheSAiaGVs
bG9cbiIpCg==
--=-=-=
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: quoted-printable


--=20
Jan Nieuwenhuizen <janneke@HIDDEN> | GNU LilyPond http://lilypond.org
Freelance IT http://JoyofSource.com | Avatar=C2=AE http://AvatarAcademy.com

--=-=-=--

Message sent:

Content-Disposition: inline
Content-Transfer-Encoding: quoted-printable
MIME-Version: 1.0
X-Mailer: MIME-tools 5.505 (Entity 5.505)
Content-Type: text/plain; charset=utf-8
X-Loop: help-debbugs@HIDDEN
From: help-debbugs@HIDDEN (GNU bug Tracking System)
To: Jan Nieuwenhuizen <janneke@HIDDEN>
Subject: bug#47232: Acknowledgement (GOOPS cannot use generic as accessor
 in 3.0.x)
Message-ID: <handler.47232.B.161607355129438.ack <at> debbugs.gnu.org>
References: <87czvw1tx7.fsf@HIDDEN>
X-Gnu-PR-Message: ack 47232
X-Gnu-PR-Package: guile
Reply-To: 47232 <at> debbugs.gnu.org
Date: Thu, 18 Mar 2021 13:20:02 +0000

Thank you for filing a new bug report with debbugs.gnu.org.

This is an automatically generated reply to let you know your message
has been received.

Your message is being forwarded to the package maintainers and other
interested parties for their attention; they will reply in due course.

Your message has been sent to the package maintainer(s):
 bug-guile@HIDDEN

If you wish to submit further information on this problem, please
send it to 47232 <at> debbugs.gnu.org.

Please do not send mail to help-debbugs@HIDDEN unless you wish
to report a problem with the Bug-tracking system.

--=20
47232: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=3D47232
GNU Bug Tracking System
Contact help-debbugs@HIDDEN with problems

Last modified: Thu, 18 Mar 2021 13:30:02 UTC

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997 nCipher Corporation Ltd, 1994-97 Ian Jackson.