From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.blaine.gmane.org!not-for-mail From: Maxim Cournoyer Newsgroups: gmane.lisp.guile.bugs Subject: bug#66046: Relative includes in R7RS define-library seem broken Date: Sat, 18 Nov 2023 17:56:48 -0500 Message-ID: <87msvabrgv.fsf@gmail.com> References: <6C8500AC-6352-4849-A2C9-2DFEB34F21D5@nonceword.org> <3jwzxtCW91bvW_AqM4x1Xpm-kdOmiBYvVFfKneO0-Ls556aEA5wWugMgOShhtaP0cpfvxta2wcuqZX3jSelpVE4QpmTo2zjX92QQ5owzp04=@hyper.dev> <87il64cu8z.fsf@gmail.com> Mime-Version: 1.0 Content-Type: text/plain Injection-Info: ciao.gmane.io; posting-host="blaine.gmane.org:116.202.254.214"; logging-data="37488"; mail-complaints-to="usenet@ciao.gmane.io" User-Agent: Gnus/5.13 (Gnus v5.13) Cc: "66046@debbugs.gnu.org" <66046@debbugs.gnu.org> To: Amirouche Original-X-From: bug-guile-bounces+guile-bugs=m.gmane-mx.org@gnu.org Sat Nov 18 23:57:44 2023 Return-path: Envelope-to: guile-bugs@m.gmane-mx.org Original-Received: from lists.gnu.org ([209.51.188.17]) by ciao.gmane.io with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.92) (envelope-from ) id 1r4UFz-0009cn-Lf for guile-bugs@m.gmane-mx.org; Sat, 18 Nov 2023 23:57:43 +0100 Original-Received: from localhost ([::1] helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1r4UFM-0008I1-5B; Sat, 18 Nov 2023 17:57:04 -0500 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1r4UFJ-0008HD-El for bug-guile@gnu.org; Sat, 18 Nov 2023 17:57:01 -0500 Original-Received: from debbugs.gnu.org ([2001:470:142:5::43]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1r4UFJ-0001Bb-6Q for bug-guile@gnu.org; Sat, 18 Nov 2023 17:57:01 -0500 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1r4UFK-0007NK-8L for bug-guile@gnu.org; Sat, 18 Nov 2023 17:57:02 -0500 X-Loop: help-debbugs@gnu.org Resent-From: Maxim Cournoyer Original-Sender: "Debbugs-submit" Resent-CC: bug-guile@gnu.org Resent-Date: Sat, 18 Nov 2023 22:57:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 66046 X-GNU-PR-Package: guile Original-Received: via spool by 66046-submit@debbugs.gnu.org id=B66046.170034822128341 (code B ref 66046); Sat, 18 Nov 2023 22:57:02 +0000 Original-Received: (at 66046) by debbugs.gnu.org; 18 Nov 2023 22:57:01 +0000 Original-Received: from localhost ([127.0.0.1]:49639 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1r4UFI-0007Mw-TK for submit@debbugs.gnu.org; Sat, 18 Nov 2023 17:57:01 -0500 Original-Received: from mail-qv1-xf31.google.com ([2607:f8b0:4864:20::f31]:45078) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1r4UFF-0007Mi-Oz for 66046@debbugs.gnu.org; Sat, 18 Nov 2023 17:56:59 -0500 Original-Received: by mail-qv1-xf31.google.com with SMTP id 6a1803df08f44-66d76904928so4830766d6.2 for <66046@debbugs.gnu.org>; Sat, 18 Nov 2023 14:56:56 -0800 (PST) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20230601; t=1700348210; x=1700953010; darn=debbugs.gnu.org; h=mime-version:user-agent:message-id:date:references:in-reply-to :subject:cc:to:from:from:to:cc:subject:date:message-id:reply-to; bh=yGKNijdFhq+yGIEV9clzCdRHIblarnvO854+inLXRqY=; b=fN5XXKFHKEoq5Ikr+IYqvWSjM4kIgIOTDd6KzRwnqpeRQT/8ApU9ZLl6WOUZUKunzX q3VOjZfLSzeQc60n4HuFT5Tv0kVDL3QdoGomZpDTEH9E47IQCNK3jsYoZLxxzrvaIutg jFioKcPfNxNPd/N1+AObNyWw7i4PbSEb7zWx5L9w/FvhOb1IZvI0tAXnCzaPDJpS6j// vgFNsIweXdBhc4LGcPrVBX0D3hen/WiSChssd3kR50rKP9jk7sjRnyPWGLxNj5bXPMfJ zcmoGGjbrIyq2jsgy09FV+W4n19n2zmAle9FaAdZSxG6GZn9wJRfo2qG+hpcSJ8omW2S lr5A== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20230601; t=1700348210; x=1700953010; h=mime-version:user-agent:message-id:date:references:in-reply-to :subject:cc:to:from:x-gm-message-state:from:to:cc:subject:date :message-id:reply-to; bh=yGKNijdFhq+yGIEV9clzCdRHIblarnvO854+inLXRqY=; b=aKV31H81bPlv+Cr8a6hj/vo3LU77zO+/WQYDe2Y+dZPio7PrT9GzypUQpVJ4RV+G6l KlK4WSm/duC1ITP496v4Kq9ouDtkqmGXFdxSnbgbHGftYXYRKLEGu93RXlZUJZ0Iy11I Hr2Q2CRyI1K35gV3/adtbZn1oIPm7ui+D8d3nV40papWHpF3T+FySXZLeKqt4O75Kbqo DnbhDiCL8f8xf+9Gnh74jvQaflVuLI6+DUCASz6HmVTijlTmw/J7cCrNMNh0QSzJm9i9 593X5Mb81PzD/pSDpLQpl+cfuOEhkLWTka2DvlfgpWOJkPMUcZT0hgj1Z1DXNTcoVDU1 RqQw== X-Gm-Message-State: AOJu0YzFLF71F/vZZHKx715D8wuo54x/TQqB4aO/I1aaXqtwAEVB8/ZG 4p1B6wM2MApPO9xeESB3Gp7qKazxK8w= X-Google-Smtp-Source: AGHT+IGahZfty8an43xZVnGv7eHgjYvYpbswrj7rB6pwdrtbl24t6QvGDOUk1HZfK/yi7B9FYiY0Fw== X-Received: by 2002:a05:6214:e64:b0:66f:b847:71b7 with SMTP id jz4-20020a0562140e6400b0066fb84771b7mr4043291qvb.25.1700348210315; Sat, 18 Nov 2023 14:56:50 -0800 (PST) Original-Received: from hurd (dsl-154-236.b2b2c.ca. [66.158.154.236]) by smtp.gmail.com with ESMTPSA id m13-20020a0cbf0d000000b0066d04196c3dsm1698105qvi.49.2023.11.18.14.56.49 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256); Sat, 18 Nov 2023 14:56:49 -0800 (PST) In-Reply-To: <87il64cu8z.fsf@gmail.com> (Maxim Cournoyer's message of "Tue, 14 Nov 2023 08:57:48 -0500") X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-BeenThere: bug-guile@gnu.org List-Id: "Bug reports for GUILE, GNU's Ubiquitous Extension Language" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-guile-bounces+guile-bugs=m.gmane-mx.org@gnu.org Original-Sender: bug-guile-bounces+guile-bugs=m.gmane-mx.org@gnu.org Xref: news.gmane.io gmane.lisp.guile.bugs:10702 Archived-At: Hello, I've just found a cross-compilation buggy interaction with my fix: --8<---------------cut here---------------start------------->8--- $ touch ./module/srfi/srfi-151.scm maxim@hurd ~/src/guile [env]$ touch ./module/srfi/srfi-160/base.sld maxim@hurd ~/src/guile [env]$ m make all-recursive make[1]: Entering directory '/home/maxim/src/guile' Making all in lib make[2]: Entering directory '/home/maxim/src/guile/lib' make all-recursive make[3]: Entering directory '/home/maxim/src/guile/lib' make[4]: Entering directory '/home/maxim/src/guile/lib' make[4]: Nothing to be done for 'all-am'. make[4]: Leaving directory '/home/maxim/src/guile/lib' make[3]: Leaving directory '/home/maxim/src/guile/lib' make[2]: Leaving directory '/home/maxim/src/guile/lib' Making all in meta make[2]: Entering directory '/home/maxim/src/guile/meta' make[2]: Nothing to be done for 'all'. make[2]: Leaving directory '/home/maxim/src/guile/meta' Making all in libguile make[2]: Entering directory '/home/maxim/src/guile/libguile' make all-am make[3]: Entering directory '/home/maxim/src/guile/libguile' make[3]: Nothing to be done for 'all-am'. make[3]: Leaving directory '/home/maxim/src/guile/libguile' make[2]: Leaving directory '/home/maxim/src/guile/libguile' Making all in module make[2]: Entering directory '/home/maxim/src/guile/module' make[2]: Nothing to be done for 'all'. make[2]: Leaving directory '/home/maxim/src/guile/module' Making all in stage0 make[2]: Entering directory '/home/maxim/src/guile/stage0' BOOTSTRAP(stage0) GUILEC srfi/srfi-151.go BOOTSTRAP(stage0) GUILEC srfi/srfi-160/base.go ;;; note: source file /home/maxim/src/guile/module/srfi/srfi-151.scm ;;; newer than compiled /home/maxim/src/guile/stage0/srfi/srfi-151.go ;;; note: source file /home/maxim/src/guile/module/srfi/srfi-151.scm ;;; newer than compiled /home/maxim/src/guile/cache/guile/ccache/3.0-LE-8-4.6/home/maxim/src/guile/module/srfi/srfi-151.scm.go Backtrace: In ice-9/r6rs-libraries.scm: 113:17 19 (_ # ?) In ice-9/boot-9.scm: 3355:17 18 (resolve-interface (srfi srfi-151) #:select _ #:hide _ # ?) In ice-9/threads.scm: 397:8 17 (_ #) In ice-9/boot-9.scm: 3281:13 16 (_) In ice-9/threads.scm: 397:8 15 (_ #) In ice-9/boot-9.scm: 3572:20 14 (_) 2864:4 13 (save-module-excursion #) 3592:26 12 (_) In unknown file: 11 (primitive-load-path "srfi/srfi-151" #) In ice-9/eval.scm: 721:20 10 (primitive-eval (define-library (srfi srfi-151) (# #) ?)) wrote `srfi/srfi-151.go' In ice-9/psyntax.scm: 1229:36 9 (expand-top-sequence (#) ?) 1123:16 8 (lp (#) ?) 1123:16 7 (lp (# ?) ?) 1123:16 6 (lp (#) ?) 1121:20 5 (lp (#) ?) 1342:32 4 (syntax-type (# #) ?) 1562:32 3 (expand-macro # ?) 3278:16 2 (_ # ?) In unknown file: 1 (open-file "../module/srfi/srfi-160/srfi-151/bitwise-3?" ?) In ice-9/boot-9.scm: 1682:22 0 (lp 0) ice-9/boot-9.scm:1682:22: In procedure lp: In procedure open-file: No such file or directory: "../module/srfi/srfi-160/srfi-151/bitwise-33.scm" make[2]: *** [Makefile:2562: srfi/srfi-160/base.go] Error 1 make[2]: Leaving directory '/home/maxim/src/guile/stage0' make[1]: *** [Makefile:2203: all-recursive] Error 1 make[1]: Leaving directory '/home/maxim/src/guile' make: *** [Makefile:2088 : all] Erreur 2 --8<---------------cut here---------------end--------------->8--- I'll try to come up with a test case, then a fix. -- Thanks, Maxim