From unknown Sat Jun 14 00:10:22 2025 X-Loop: help-debbugs@gnu.org Subject: bug#57123: compile discards multiple values Resent-From: Jean Abou Samra Original-Sender: "Debbugs-submit" Resent-CC: bug-guile@gnu.org Resent-Date: Wed, 10 Aug 2022 18:11:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 57123 X-GNU-PR-Package: guile X-GNU-PR-Keywords: To: 57123@debbugs.gnu.org X-Debbugs-Original-To: bug-guile@gnu.org Received: via spool by submit@debbugs.gnu.org id=B.166015506012432 (code B ref -1); Wed, 10 Aug 2022 18:11:01 +0000 Received: (at submit) by debbugs.gnu.org; 10 Aug 2022 18:11:00 +0000 Received: from localhost ([127.0.0.1]:50738 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1oLqAV-0003ES-TU for submit@debbugs.gnu.org; Wed, 10 Aug 2022 14:11:00 -0400 Received: from lists.gnu.org ([209.51.188.17]:56048) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1oLqAG-0003E6-R6 for submit@debbugs.gnu.org; Wed, 10 Aug 2022 14:10:58 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]:36462) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1oLqAF-0004Y2-MQ for bug-guile@gnu.org; Wed, 10 Aug 2022 14:10:43 -0400 Received: from mout.kundenserver.de ([217.72.192.73]:56243) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1oLqAD-000212-US for bug-guile@gnu.org; Wed, 10 Aug 2022 14:10:43 -0400 Received: from [192.168.1.46] ([82.65.251.18]) by mrelayeu.kundenserver.de (mreue107 [212.227.15.184]) with ESMTPSA (Nemesis) id 1MLQgv-1o3Lq828wd-00IXzX for ; Wed, 10 Aug 2022 20:10:39 +0200 Message-ID: <29a4bdce-cf77-fa9d-55d2-4137ccf228d4@abou-samra.fr> Date: Wed, 10 Aug 2022 20:10:37 +0200 MIME-Version: 1.0 User-Agent: Mozilla/5.0 (X11; Linux x86_64; rv:91.0) Gecko/20100101 Thunderbird/91.12.0 Content-Language: en-US From: Jean Abou Samra Content-Type: text/plain; charset=UTF-8; format=flowed Content-Transfer-Encoding: 7bit X-Provags-ID: V03:K1:ANQI1j+J3saLinM+vnm1eYKAOU0wZF+v0DojpzrtFr0itgO+JWS pB2kR1tQPrDMnCYIvzmySxESrkKUoL3kxqFhqiX988qiEGgB2HXI8NEQzkPQPbF76JZxsYE C5qLfRKrA9J3fUDriAigltR4I694hRPb+0MW+17d5rDhaqzFnA7ITRF9mH23liS4L9vJ+R+ ezjAFjWb/IjEpwFLcPn/Q== X-Spam-Flag: NO X-UI-Out-Filterresults: notjunk:1;V03:K0:J3KosFC4R0Q=:LW6Uppod0utb3A1pTZ4cgn 3dsybs303TcheFw3fJbszwYrtOolGtsBNWJRcncjNEORbvVqNn3xWZEgOzrba0jUm7oXupGRp 13mHrxvrG5Gspoa0FxW1+BODwf1AxFlA5Yj8bhAs5FeW28z1Gnje+a9WsoVCu8lK3A5Fxn4/x PvvROjLs2G7PontsPNDbQbi57Sn80e/WZWdba82A+VQCfnHgzvwuIUt8iTLp+VmZ8KX9qf3oF 6wT4tn3oukU2IeT8dE1OFtv2WCOkYRWQTIY+bVIlRBgSAH3AvnAAtnbo17RasT4Lxgv+JuOEj brNPiVcZbDHpnAYhw/3ZhdHFvBY7djJc72MAVaaPQzjrT7FTGHyj0hPj1c2W9fLL+evSjBBwL gVk+9Px37kK1x8DM+JcdnMp+cXUgXpBGM0LdTozzx3F+TlGuvqGZ9z+VrNg0OZYfqRO7IukZH xMc80Yp0eVeBHOV/xVFwtA6vdthHbmexScNxydmCDZXCXztgmE6HgxJRFmpJWun83YRNeQNMW UZiFRclLd3dV6YPu3JcZY5q+nNXL4lahN+4p0ArGLdcRhgH+oPWwUn2dMpRE+iRPX7/VF2zwd +iWSgMcAMapvd79968LthPUzZZpl4XAWaodMBXkt3hCcqq1a2XBAQKixln20DMv9dIvfa+HgF tEQrUeUOJqC6pSYS/dXzF/Buu/3NoPczlWK4dHuvOrwKdBFzWwTH/YjLFWt1S2IVuxfl8iV00 95lNpXQsxUDa9DNX/DYOiLDEU+xbB9Iw5vCLRg== Received-SPF: none client-ip=217.72.192.73; envelope-from=jean@abou-samra.fr; helo=mout.kundenserver.de X-Spam_score_int: -18 X-Spam_score: -1.9 X-Spam_bar: - X-Spam_report: (-1.9 / 5.0 requ) BAYES_00=-1.9, RCVD_IN_DNSWL_NONE=-0.0001, RCVD_IN_MSPIKE_H2=-0.001, SPF_HELO_NONE=0.001, SPF_NONE=0.001, T_SCC_BODY_TEXT_LINE=-0.01 autolearn=ham autolearn_force=no X-Spam_action: no action X-Spam-Score: 0.0 (/) X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -3.3 (---) Example: scheme@(guile-user)> (eval '(values 1 2) (current-module)) $1 = 1 $2 = 2 scheme@(guile-user)> (use-modules (system base compile)) scheme@(guile-user)> (compile '(values 1 2) #:env (current-module)) $3 = 1 scheme@(guile-user)> Tested with Guile 3.0.7. A workaround can be found at https://lists.gnu.org/archive/html/guile-user/2022-08/msg00043.html