From mboxrd@z Thu Jan 1 00:00:00 1970 From: Lawrence Bottorff Subject: Re: Babel doesn't like some Racket comments Date: Wed, 1 Mar 2017 11:54:12 -0500 Message-ID: References: <87y3wpazek.fsf@nicolasgoaziou.fr> Mime-Version: 1.0 Content-Type: multipart/alternative; boundary=001a1134fd387be0d40549ae2954 Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:39645) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1cj7W2-0002aV-QJ for emacs-orgmode@gnu.org; Wed, 01 Mar 2017 11:54:15 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1cj7W1-0007eJ-PE for emacs-orgmode@gnu.org; Wed, 01 Mar 2017 11:54:14 -0500 Received: from mail-oi0-x22b.google.com ([2607:f8b0:4003:c06::22b]:33112) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1cj7W1-0007eA-IF for emacs-orgmode@gnu.org; Wed, 01 Mar 2017 11:54:13 -0500 Received: by mail-oi0-x22b.google.com with SMTP id 2so25356731oif.0 for ; Wed, 01 Mar 2017 08:54:13 -0800 (PST) In-Reply-To: <87y3wpazek.fsf@nicolasgoaziou.fr> List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Sender: "Emacs-orgmode" To: Nicolas Goaziou Cc: emacs-orgmode Mailinglist --001a1134fd387be0d40549ae2954 Content-Type: text/plain; charset=UTF-8 This produces no Backtrace. Here's my *Messages* Debug on Quit enabled globally executing Scheme code block (set-example1)... Starting Geiser REPL for racket ... There is no ElDoc support in this buffer Starting Geiser REPL for racket ... [2 times] Racket REPL up and running! => "" Quit . . . and no *Backtrace* buffer. I used this code: #+name:set-example1 #+begin_src scheme :session f1 :exports both :tangle yes :cache yes :results silent (define A (set 1 2 3 4)) (define B (set 3 4 5 6)) (define C (set 4 5)) (set-union A B) ; gives (set 1 2 3 4 5 6) (set-intersect A B) ; gives (set 3 4) (set-subtract A B) ; gives (set 1 2) (set=? A B) ; gives #f (subset? C A) ; gives #f (subset? C B) ; gives #t #+end_src and upon C-c C-c, Emacs worked for a long time, finally producing a dead, unresponsive Racket REPL buffer. Again, if I kill the REPL, then try this code: #+name:set-example2 #+begin_src scheme :session f1 :exports both :tangle yes :cache yes :results silent (define A (set 1 2 3 4)) (define B (set 3 4 5 6)) (define C (set 4 5)) (set-union A B) (set-intersect A B) (set-subtract A B) (set=? A B) (subset? C A) (subset? C B) #+end_src it works: Welcome to Racket v6.8. racket@> A (set 1 3 2 4) racket@> On Wed, Mar 1, 2017 at 8:40 AM, Nicolas Goaziou wrote: > Hello, > > Lawrence Bottorff writes: > > > C-c C-c-ing this code > > > > #+begin_src scheme > > (define (foo x) > > ;just add one > > (+ 1 x)) ; comment > > #+end_src > > > > causes Racket (geiser) to freeze up. Sometimes I see a > > Could you use M-x toggle-debug-on-quit, reproduce the freezing, hit C-g > and paste the backtrace? > > Regards, > > -- > Nicolas Goaziou > --001a1134fd387be0d40549ae2954 Content-Type: text/html; charset=UTF-8 Content-Transfer-Encoding: quoted-printable
This produces no Backtrace. Here's my *Messages*
<= br>
Debug on Quit enabled globally
executing Schem= e code block (set-example1)...
Starting Geiser REPL for racket ..= .
There is no ElDoc support in this buffer
Starting Gei= ser REPL for racket ... [2 times]
Racket REPL up and running!
=3D>=C2=A0
""
Quit
=
. . . and no *Backtrace* buffer. I used this code:

#+name:set-example1
#+begin_src scheme :sess= ion f1 :exports both :tangle yes :cache yes :results silent
(defi= ne A (set 1 2 3 4))
(define B (set 3 4 5 6))
(define C = (set 4 5))
=C2=A0
(set-union A B) =C2=A0 =C2=A0 ; gives= (set 1 2 3 4 5 6)
(set-intersect A B) ; gives (set 3 4)
(set-subtract A B) =C2=A0; gives (set 1 2)
(set=3D? A B) =C2=A0= =C2=A0 =C2=A0 =C2=A0 ; gives #f
(subset? C A) =C2=A0 =C2=A0 =C2= =A0 ; gives #f
(subset? C B) =C2=A0 =C2=A0 =C2=A0 ; gives #t
#+end_src

and upon C-c C-c, Emacs work= ed for a long time, finally producing a dead, unresponsive Racket REPL buff= er. Again, if I kill the REPL, then try this code:

#+name:set-example2
#+begin_src scheme :session f1 :exports= both :tangle yes :cache yes :results silent
(define A (set 1 2 3= 4))
(define B (set 3 4 5 6))
(define C (set 4 5))
=C2=A0
(set-union A B) =C2=A0 =C2=A0=C2=A0
(set-i= ntersect A B)=C2=A0
(set-subtract A B) =C2=A0
(set=3D? = A B) =C2=A0 =C2=A0 =C2=A0 =C2=A0=C2=A0
(subset? C A) =C2=A0 =C2= =A0 =C2=A0=C2=A0
(subset? C B) =C2=A0 =C2=A0 =C2=A0=C2=A0
#+end_src

it works:

<= div>
Welcome to Racket v6.8.
racket@> A
(set 1 3= 2 4)
racket@>=C2=A0

On Wed, Mar 1, 2017 at 8:40 AM, Nicolas G= oaziou <mail@nicolasgoaziou.fr> wrote:
Hello,

Lawrence Bottorff <borgauf@gmail.co= m> writes:

> C-c C-c-ing this code
>
> #+begin_src scheme
> (define (foo x)
>=C2=A0 =C2=A0;just add one
>=C2=A0 =C2=A0(+ 1 x)) ; comment
> #+end_src
>
> causes Racket (geiser) to freeze up. Sometimes I see a

Could you use M-x toggle-debug-on-quit, reproduce the freezing, hit = C-g
and paste the backtrace?

Regards,

--
Nicolas Goaziou

--001a1134fd387be0d40549ae2954--