From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.blaine.gmane.org!not-for-mail From: Jean Abou Samra Newsgroups: gmane.lisp.guile.user Subject: Re: Why does compile discard multiple values? Date: Wed, 10 Aug 2022 15:20:05 +0200 Message-ID: References: <9f083148-6764-5943-9042-665e2b1c6099@abou-samra.fr> <74c26aac-0c3b-623a-6c6c-52501342cfc6@abou-samra.fr> Mime-Version: 1.0 Content-Type: text/plain; charset=UTF-8; format=flowed Content-Transfer-Encoding: 8bit Injection-Info: ciao.gmane.io; posting-host="blaine.gmane.org:116.202.254.214"; logging-data="1052"; mail-complaints-to="usenet@ciao.gmane.io" User-Agent: Mozilla/5.0 (X11; Linux x86_64; rv:91.0) Gecko/20100101 Thunderbird/91.12.0 To: Guile User Original-X-From: guile-user-bounces+guile-user=m.gmane-mx.org@gnu.org Wed Aug 10 15:51:42 2022 Return-path: Envelope-to: guile-user@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 1oLm7a-0000BQ-9J for guile-user@m.gmane-mx.org; Wed, 10 Aug 2022 15:51:42 +0200 Original-Received: from localhost ([::1]:59296 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1oLm7Y-0004Cp-Uo for guile-user@m.gmane-mx.org; Wed, 10 Aug 2022 09:51:41 -0400 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]:54624) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1oLldA-0006kX-3Y for guile-user@gnu.org; Wed, 10 Aug 2022 09:20:16 -0400 Original-Received: from mout.kundenserver.de ([212.227.126.130]:59945) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1oLld6-0004W4-T5 for guile-user@gnu.org; Wed, 10 Aug 2022 09:20:15 -0400 Original-Received: from [192.168.1.46] ([82.65.251.18]) by mrelayeu.kundenserver.de (mreue012 [212.227.15.168]) with ESMTPSA (Nemesis) id 1MVaQW-1nwVYK3UCS-00RWcT for ; Wed, 10 Aug 2022 15:20:08 +0200 Content-Language: en-US In-Reply-To: <74c26aac-0c3b-623a-6c6c-52501342cfc6@abou-samra.fr> X-Provags-ID: V03:K1:nWXba0oWgr9aqTvh6a46TeyKdzZeknw96z7BZhkyHkB0tPw39VJ KXylpCrxga9lF3xYVjRvrwhiPH2RfpgwUkoouEUIxDxT+GUzltmDuZZ0DiBfWSlG2HkbBKp z6BSFT2tddor0Ueo8ut0mRlQ+NK6kh+Kvx/7BBGW5es2kN8QvzJhAb7Vi6LcgoaC0APhgK/ c2Lgps4L9QMIoHsJhyANA== X-UI-Out-Filterresults: notjunk:1;V03:K0:gWtp9A5U//A=:s/kQW9VWRh4iPdaFxxRpF9 4TnoS4Iw7S9KikcRgETSGGklYuUjbDQQca8d/Dr9MyNNbWxNmEGLncu9FlQ5s2xfzNtrr71uI YjmiFxoRMDmFc1MuFq1kqbng5tQjh3EL7A+tmYsdyH4407FB41TvpV1HHzYfIP4J3sbjHV5WZ LVQRNOXxmQoaZjmS1H0UDErMehZ+lYxEpFyHMXXwRbFMToJE9NuJp0Zl0DyGqb4e9LhvzSgPe BG5PX7PUCNu/WLrd+ULhaMoefOlukgS0SvAdfzTv5xo4lGPNhbjaabmFcOzahhlEVpAhLvSqL d4Jr6wkCa21Fmv5fpEzQwB9oZvJIgW46QOksSO91J+6mgXZmXDcvHrunuv+Zw7Eb19xmSNQ4A J6gQiJdGT0BxrxczaO6JKT9y2SS3dH1gTHQyGo2KxjDdw/lSTHSS8SppWJV6g8iicQyjLS/ef G8JNgZCI1HVkvkf/apEOk3Doczro7G9nLV2sKbvaz4SjhiL2fA2VlrLJ6TR4HM9JQPjDP4UI+ +WjI1qi+JhSjIg4skgH+znqrx/7kSyZkh7Zjb2uGtDW8rw37uqkJn+ocxgG99GlskV9pV/LED zQ95duPo2Xjzz7Q3tbfLKWld+Vl+/zvKu2ePFC9vb3VlIWFd8ID5Q6e5D+tA+OmpEi5FwuY3s jtM6k4gRDX9ClXC1mY+ZKEspC7rQ4QZI8uhf0e07zMlUw4tckp01m0Si1f5kMWLrTDmbVlnGZ SiLB5CuBBm/DkbPudCG06xhRLBL1kDzz9jxrJQ== Received-SPF: none client-ip=212.227.126.130; 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, NICE_REPLY_A=-0.001, 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-BeenThere: guile-user@gnu.org X-Mailman-Version: 2.1.29 Precedence: list List-Id: General Guile related discussions List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guile-user-bounces+guile-user=m.gmane-mx.org@gnu.org Original-Sender: "guile-user" Xref: news.gmane.io gmane.lisp.guile.user:18512 Archived-At: Le 10/08/2022 à 15:11, Jean Abou Samra a écrit : > > > Le 10/08/2022 à 15:01, Jean Abou Samra a écrit : >> I can work around that using >> >> ((compile `(lambda () ,my-form) >>           #:env (current-module))) > > > Ugh, no, I can't. The form might be a define. > > Does anybody know of a workaround? OK, digging into the implementation, I found scheme@(guile-user)> (use-modules (system vm loader)) scheme@(guile-user)> ((load-thunk-from-memory (compile '(values 1 2) #:to 'bytecode #:env (current-module)))) $1 = 1 $2 = 2 If someone has a better workaround, I'm still interested.