From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!.POSTED!not-for-mail From: Tommi =?UTF-8?Q?H=C3=B6yn=C3=A4l=C3=A4nmaa?= Newsgroups: gmane.lisp.guile.bugs Subject: bug#24131: A problem with CPS Date: Tue, 2 Aug 2016 15:46:42 +0300 Message-ID: NNTP-Posting-Host: blaine Mime-Version: 1.0 Content-Type: multipart/alternative; boundary=001a113ecf3cd331b00539161b8b X-Trace: blaine.gmane.org 1470142309 6726 195.159.176.226 (2 Aug 2016 12:51:49 GMT) X-Complaints-To: usenet@blaine.gmane.org NNTP-Posting-Date: Tue, 2 Aug 2016 12:51:49 +0000 (UTC) To: 24131@debbugs.gnu.org Original-X-From: bug-guile-bounces+guile-bugs=m.gmane.org@gnu.org Tue Aug 02 14:51:45 2016 Return-path: Envelope-to: guile-bugs@m.gmane.org Original-Received: from lists.gnu.org ([208.118.235.17]) by blaine.gmane.org with esmtp (Exim 4.84_2) (envelope-from ) id 1bUZAe-0001HK-4V for guile-bugs@m.gmane.org; Tue, 02 Aug 2016 14:51:44 +0200 Original-Received: from localhost ([::1]:56172 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bUZAa-0007lG-QS for guile-bugs@m.gmane.org; Tue, 02 Aug 2016 08:51:40 -0400 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:36255) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bUZ68-0003PZ-Re for bug-guile@gnu.org; Tue, 02 Aug 2016 08:47:05 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1bUZ66-0002cK-NX for bug-guile@gnu.org; Tue, 02 Aug 2016 08:47:03 -0400 Original-Received: from debbugs.gnu.org ([208.118.235.43]:56139) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bUZ66-0002cD-Ja for bug-guile@gnu.org; Tue, 02 Aug 2016 08:47:02 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1bUZ66-0000bG-Bx for bug-guile@gnu.org; Tue, 02 Aug 2016 08:47:02 -0400 X-Loop: help-debbugs@gnu.org Resent-From: Tommi =?UTF-8?Q?H=C3=B6yn=C3=A4l=C3=A4nmaa?= Original-Sender: "Debbugs-submit" Resent-CC: bug-guile@gnu.org Resent-Date: Tue, 02 Aug 2016 12:47:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 24131 X-GNU-PR-Package: guile X-GNU-PR-Keywords: X-Debbugs-Original-To: bug-guile@gnu.org Original-Received: via spool by submit@debbugs.gnu.org id=B.14701420162287 (code B ref -1); Tue, 02 Aug 2016 12:47:02 +0000 Original-Received: (at submit) by debbugs.gnu.org; 2 Aug 2016 12:46:56 +0000 Original-Received: from localhost ([127.0.0.1]:53436 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1bUZ5z-0000ap-UG for submit@debbugs.gnu.org; Tue, 02 Aug 2016 08:46:56 -0400 Original-Received: from eggs.gnu.org ([208.118.235.92]:45219) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1bUZ5z-0000ae-9P for submit@debbugs.gnu.org; Tue, 02 Aug 2016 08:46:55 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1bUZ5s-0002Xz-Nn for submit@debbugs.gnu.org; Tue, 02 Aug 2016 08:46:49 -0400 Original-Received: from lists.gnu.org ([2001:4830:134:3::11]:51852) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bUZ5s-0002WL-Ku for submit@debbugs.gnu.org; Tue, 02 Aug 2016 08:46:48 -0400 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:36183) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bUZ5p-0002sT-OB for bug-guile@gnu.org; Tue, 02 Aug 2016 08:46:47 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1bUZ5n-0002Vp-N0 for bug-guile@gnu.org; Tue, 02 Aug 2016 08:46:44 -0400 Original-Received: from mail-io0-x232.google.com ([2607:f8b0:4001:c06::232]:36594) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bUZ5n-0002Vc-GA for bug-guile@gnu.org; Tue, 02 Aug 2016 08:46:43 -0400 Original-Received: by mail-io0-x232.google.com with SMTP id b62so211264032iod.3 for ; Tue, 02 Aug 2016 05:46:43 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20120113; h=mime-version:from:date:message-id:subject:to; bh=tPo2OdXaDKlXaeW4RoBpgUmR4nnwWAQzWu74L/EUv4A=; b=Yi2rFLLc0w4iJ/NZc1ujdUCcGm3H5LQ4FuLx0J/4S61bV1R8DwuQSQ8CXJgYszvSzC fh5JBHSB0wcq7aOJ2KEYeVm9MMcJOnLaqMR9wEv5MfN58NFLAxxiYwTbytoTF0kAezta LzmCvKGoEhoDbbC3LLONCUqsfYNpyECQuUypqgS0xNHfrsUvSb2ZZ+pgQ7ENCbC8EhVg PrRS9PKjE2HPn+bI5dAuz7aw3k5Sa1lYwxaWlsY0LQzqQseOZBuJ7DI4UTW8Ta1jqBle 3B4TH5k1F5KPBb4kTZSs5TiEiCEqMQqreWYl+Upnjaw5gMyRfwOUM1xrHY5swXdBcwgN Xk7A== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20130820; h=x-gm-message-state:mime-version:from:date:message-id:subject:to; bh=tPo2OdXaDKlXaeW4RoBpgUmR4nnwWAQzWu74L/EUv4A=; b=l4FthwyDl+pDZBtzedp1eDjgptMp7UEXsq48dg6pCLe4yAuqKuslgQAcGrb4e1aaHh m1kpmHjxjaSnGRjG/0EIb71gtpw3c49XLIe6vtEg4lfDVlbYAMiiWZmJOBx+0vC/cxnC K5orkZk+6D1d0O3zksB5qof7D2z0ClieRpGWUyF6HV690alWnm0OtA/Ook3sy+F5xkxR m8zawNxvCBtGKcUERnPQ+wV07kV2SgfLDgZl9tXYJgT/DBYRlUA+DKiHXp5CrlLqTVjN 3/og+FLUiMQqpe5A/MU2tF2O1+G4aIyp4XQ/Mcv6kIF3ZAOhON2h1V8zFPdmcNzIRJGD l79w== X-Gm-Message-State: AEkoouul4I6hf8J4+8Svz17/f4INt3GEpR4HgGKkkhVwWEoHAuQq+sqXBjm3CRgOE49G7T6PzBdERn7wV86u5A== X-Received: by 10.107.136.85 with SMTP id k82mr61452547iod.100.1470142002441; Tue, 02 Aug 2016 05:46:42 -0700 (PDT) Original-Received: by 10.107.10.102 with HTTP; Tue, 2 Aug 2016 05:46:42 -0700 (PDT) X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6.x X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-Received-From: 208.118.235.43 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.org@gnu.org Original-Sender: "bug-guile" Xref: news.gmane.org gmane.lisp.guile.bugs:8324 Archived-At: --001a113ecf3cd331b00539161b8b Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: quoted-printable I get the following error: ---cut here--- tohoyn@tohoyn-laptop:~/src/guile-2.1.3/guile-2.1.3.92-d2684/omat$ ../meta/uninstalled-env guild compile -t cps hello.scm Backtrace: 13 (apply-smob/1 #) In ice-9/boot-9.scm: 704:2 12 (call-with-prompt _ _ #) In ice-9/eval.scm: 608:8 11 (_ #(#(#))) In /home/tohoyn/src/guile-2.1.3/guile-2.1.3.92-d2684/meta/guild: 72:17 10 (main _) In srfi/srfi-1.scm: 640:9 9 (for-each1 ("hello.scm")) In scripts/compile.scm: 251:26 8 (_ _) In system/base/target.scm: 57:6 7 (with-target _ _) In system/base/compile.scm: 152:6 6 (compile-file _ #:output-file _ #:from _ #:to _ #:env _ =E2=80= =A6) 43:4 5 (call-once _) In ice-9/boot-9.scm: 829:4 4 (with-throw-handler _ _ _) In system/base/compile.scm: 59:11 3 (_) In language/cps/spec.scm: 28:9 2 (write-cps # _) In unknown file: 1 (scm-error misc-error #f "~A ~S" ("unexpected cps" #) #f) In ice-9/boot-9.scm: 753:26 0 (dispatch-exception _ _ _) ice-9/boot-9.scm:753:26: In procedure dispatch-exception: ice-9/boot-9.scm:753:26: unexpected cps # tohoyn@tohoyn-laptop:~/src/guile-2.1.3/guile-2.1.3.92-d2684/omat$ ---cut here--- when I try to compile a guile Scheme program to CPS. The contents to file hello.scm are: ---cut here--- (define (main args) (display "Hello") (newline)) ---cut here--- I use guile-2.1.3.92-d2684 without installing it. I also have guile version 2.0.11 installed. - Tommi H=C3=B6yn=C3=A4l=C3=A4nmaa --001a113ecf3cd331b00539161b8b Content-Type: text/html; charset=UTF-8 Content-Transfer-Encoding: quoted-printable
I get the following error:
---cut here---
tohoyn@tohoyn-laptop:~/src/guile-2.1.3/guile-2.1.3.92-d2684/omat$ ../= meta/uninstalled-env guild compile -t cps hello.scm
Backtrace:
=C2=A0= =C2=A0=C2=A0=C2=A0=C2=A0=C2=A0=C2=A0=C2=A0=C2=A0 13 (apply-smob/1 #<catc= h-closure 2739c20>)
In ice-9/boot-9.scm:
=C2=A0=C2=A0=C2=A0 704:2 = 12 (call-with-prompt _ _ #<procedure default-prompt-handle=E2=80=A6>)=
In ice-9/eval.scm:
=C2=A0=C2=A0=C2=A0 608:8 11 (_ #(#(#<directory= (guile-user) 2740f30>)))
In /home/tohoyn/src/guile-2.1.3/guile-2.1.3= .92-d2684/meta/guild:
=C2=A0=C2=A0=C2=A0 72:17 10 (main _)
In srfi/sr= fi-1.scm:
=C2=A0=C2=A0=C2=A0 640:9=C2=A0 9 (for-each1 ("hello.scm&q= uot;))
In scripts/compile.scm:
=C2=A0=C2=A0 251:26=C2=A0 8 (_ _)
I= n system/base/target.scm:
=C2=A0=C2=A0=C2=A0=C2=A0 57:6=C2=A0 7 (with-ta= rget _ _)
In system/base/compile.scm:
=C2=A0=C2=A0=C2=A0 152:6=C2=A0 = 6 (compile-file _ #:output-file _ #:from _ #:to _ #:env _ =E2=80=A6)
=C2= =A0=C2=A0=C2=A0=C2=A0 43:4=C2=A0 5 (call-once _)
In ice-9/boot-9.scm:=C2=A0=C2=A0=C2=A0 829:4=C2=A0 4 (with-throw-handler _ _ _)
In system/b= ase/compile.scm:
=C2=A0=C2=A0=C2=A0 59:11=C2=A0 3 (_)
In language/cps= /spec.scm:
=C2=A0=C2=A0=C2=A0=C2=A0 28:9=C2=A0 2 (write-cps #<intmap = 0-40> _)
In unknown file:
=C2=A0=C2=A0=C2=A0=C2=A0=C2=A0=C2=A0=C2= =A0=C2=A0=C2=A0=C2=A0 1 (scm-error misc-error #f "~A ~S" ("u= nexpected cps" #) #f)
In ice-9/boot-9.scm:
=C2=A0=C2=A0 753:26= =C2=A0 0 (dispatch-exception _ _ _)

ice-9/boot-9.scm:753:26: In proc= edure dispatch-exception:
ice-9/boot-9.scm:753:26: unexpected cps #<i= ntmap 0-40>
tohoyn@tohoyn-laptop:~/src/guile-2.1.3/guile-2.1.3.92-d26= 84/omat$
---cut here---
when I try to compile = a guile Scheme program to CPS. The contents to file hello.scm are:
= ---cut here---

(define (main args)
=C2=A0 (display "Hello&qu= ot;)
=C2=A0 (newline))
---cut here---

I use guile-2= .1.3.92-d2684 without installing it. I also have guile version 2.0.11 insta= lled.

=C2=A0=C2=A0=C2=A0=C2=A0 - Tommi H=C3=B6yn=C3=A4l=C3=A4n= maa

--001a113ecf3cd331b00539161b8b--