From mboxrd@z Thu Jan  1 00:00:00 1970
From: Lawrence Bottorff <borgauf@gmail.com>
Subject: Scheme code block gives false error message
Date: Sat, 12 Sep 2015 01:23:37 +0000
Message-ID: <CAFAhFSWrujdsLdMJp09_JzHtnWdQ9tifKvmvxz=9dENDMxPDDA@mail.gmail.com>
Mime-Version: 1.0
Content-Type: multipart/alternative; boundary=001a11c346388513a5051f82ae10
Return-path: <emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org>
Received: from eggs.gnu.org ([2001:4830:134:3::10]:40990)
	by lists.gnu.org with esmtp (Exim 4.71)
	(envelope-from <borgauf@gmail.com>) id 1ZaZXX-0006l9-W3
	for emacs-orgmode@gnu.org; Fri, 11 Sep 2015 21:23:40 -0400
Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
	(envelope-from <borgauf@gmail.com>) id 1ZaZXX-0003eZ-8A
	for emacs-orgmode@gnu.org; Fri, 11 Sep 2015 21:23:40 -0400
Received: from mail-la0-x229.google.com ([2a00:1450:4010:c03::229]:35805)
	by eggs.gnu.org with esmtp (Exim 4.71)
	(envelope-from <borgauf@gmail.com>) id 1ZaZXX-0003e8-07
	for emacs-orgmode@gnu.org; Fri, 11 Sep 2015 21:23:39 -0400
Received: by lagj9 with SMTP id j9so58586236lag.2
	for <emacs-orgmode@gnu.org>; Fri, 11 Sep 2015 18:23:37 -0700 (PDT)
List-Id: "General discussions about Org-mode." <emacs-orgmode.gnu.org>
List-Unsubscribe: <https://lists.gnu.org/mailman/options/emacs-orgmode>,
	<mailto:emacs-orgmode-request@gnu.org?subject=unsubscribe>
List-Archive: <http://lists.gnu.org/archive/html/emacs-orgmode>
List-Post: <mailto:emacs-orgmode@gnu.org>
List-Help: <mailto:emacs-orgmode-request@gnu.org?subject=help>
List-Subscribe: <https://lists.gnu.org/mailman/listinfo/emacs-orgmode>,
	<mailto:emacs-orgmode-request@gnu.org?subject=subscribe>
Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org
Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org
To: emacs-orgmode@gnu.org

--001a11c346388513a5051f82ae10
Content-Type: text/plain; charset=UTF-8

When I run this code:

#+BEGIN_SRC scheme :session ch1 :exports both
(define (check-it x)
  (cond
    ((string? x) (string-length x))
    ((number? x) (if (<= x 0) x (sub1 x)))
    ((boolean? x) (if (and #t x) 10 20))
    (else #f)))
#+END_SRC

I get this error message:

org-babel-scheme-execute-with-geiser: Invalid read syntax: "#"

But the Chicken Scheme session has accepted the check-it function just
fine. A stand-alone csi REPL works fine, too. Why, then, do I get this
cryptic error?

LB

--001a11c346388513a5051f82ae10
Content-Type: text/html; charset=UTF-8
Content-Transfer-Encoding: quoted-printable

<div dir=3D"ltr">When I run this code:<div><br></div><div><div>#+BEGIN_SRC =
scheme :session ch1 :exports both</div><div>(define (check-it x)</div><div>=
=C2=A0 (cond</div><div>=C2=A0 =C2=A0 ((string? x) (string-length x))</div><=
div>=C2=A0 =C2=A0 ((number? x) (if (&lt;=3D x 0) x (sub1 x)))</div><div>=C2=
=A0 =C2=A0 ((boolean? x) (if (and #t x) 10 20))</div><div>=C2=A0 =C2=A0 (el=
se #f)))</div><div>#+END_SRC</div></div><div><br></div><div>I get this erro=
r message:</div><div><br></div><div>org-babel-scheme-execute-with-geiser: I=
nvalid read syntax: &quot;#&quot;<br></div><div><br></div><div>But the Chic=
ken Scheme session has accepted the check-it function just fine. A stand-al=
one csi REPL works fine, too. Why, then, do I get this cryptic error?</div>=
<div><br></div><div>LB</div></div>

--001a11c346388513a5051f82ae10--