GNU bug report logs - #36787
Is current-language expected to break compilation in an eval-when?

Message received at submit <at> debbugs.gnu.org:

Received: (at submit) by debbugs.gnu.org; 24 Jul 2019 15:16:41 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Wed Jul 24 11:16:41 2019
Received: from localhost ([127.0.0.1]:37884 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1hqJ0S-00006J-6j
	for submit <at> debbugs.gnu.org; Wed, 24 Jul 2019 11:16:40 -0400
Received: from lists.gnu.org ([209.51.188.17]:55552)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <rlb@HIDDEN>) id 1hqJ0Q-00006B-NO
 for submit <at> debbugs.gnu.org; Wed, 24 Jul 2019 11:16:39 -0400
Received: from eggs.gnu.org ([2001:470:142:3::10]:43226)
 by lists.gnu.org with esmtp (Exim 4.86_2)
 (envelope-from <rlb@HIDDEN>) id 1hqJ0P-0003gY-Q7
 for bug-guile@HIDDEN; Wed, 24 Jul 2019 11:16:38 -0400
X-Spam-Checker-Version: SpamAssassin 3.3.2 (2011-06-06) on eggs.gnu.org
X-Spam-Level: 
X-Spam-Status: No, score=0.8 required=5.0 tests=BAYES_50,URIBL_BLOCKED
 autolearn=disabled version=3.3.2
Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
 (envelope-from <rlb@HIDDEN>) id 1hqJ0N-0008Lf-Lm
 for bug-guile@HIDDEN; Wed, 24 Jul 2019 11:16:36 -0400
Received: from defaultvalue.org ([45.33.119.55]:37912)
 by eggs.gnu.org with esmtp (Exim 4.71)
 (envelope-from <rlb@HIDDEN>) id 1hqJ0N-0008KD-Bn
 for bug-guile@HIDDEN; Wed, 24 Jul 2019 11:16:35 -0400
Received: from trouble.defaultvalue.org (localhost [127.0.0.1])
 (Authenticated sender: rlb@HIDDEN)
 by defaultvalue.org (Postfix) with ESMTPSA id 03B552033D
 for <bug-guile@HIDDEN>; Wed, 24 Jul 2019 10:16:32 -0500 (CDT)
Received: by trouble.defaultvalue.org (Postfix, from userid 1000)
 id 6BDA014E066; Wed, 24 Jul 2019 10:16:31 -0500 (CDT)
From: Rob Browning <rlb@HIDDEN>
To: bug-guile@HIDDEN
Subject: Is current-language expected to break compilation in an eval-when?
Date: Wed, 24 Jul 2019 10:16:31 -0500
Message-ID: <87ef2fmpio.fsf@HIDDEN>
MIME-Version: 1.0
Content-Type: text/plain
X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic]
X-Received-From: 45.33.119.55
X-Spam-Score: -1.4 (-)
X-Debbugs-Envelope-To: submit
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -2.4 (--)


With Debian 2.2.4, this causes a compilation failure:

  (eval-when (expand)
    (current-language 'scheme))

  $ guile -s main.scm
  ;;; note: source file .../main.scm
  ;;;       newer than compiled /home/rlb/.cache/guile/ccache/2.2-LE-8-3.A/.../main.scm.go
  ;;; note: auto-compilation is enabled, set GUILE_AUTO_COMPILE=0
  ;;;       or pass the --no-auto-compile argument to disable.
  ;;; compiling .../main.scm
  ;;; WARNING: compilation of .../main.scm failed:
  ;;; In procedure struct_vtable: Wrong type argument in position 1 (expecting struct): scheme

I wondered if that was expected.

Thanks
-- 
Rob Browning
rlb @defaultvalue.org and @debian.org
GPG as of 2011-07-10 E6A9 DA3C C9FD 1FF8 C676 D2C4 C0F0 39E9 ED1B 597A
GPG as of 2002-11-03 14DD 432F AE39 534D B592 F9A0 25C8 D377 8C7E 73A4