geiser-users
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [Geiser-users] iterative process not finishing


From: Aleix Conchillo Flaqué
Subject: Re: [Geiser-users] iterative process not finishing
Date: Sat, 13 Apr 2013 17:05:08 -0700

On Sat, Apr 13, 2013 at 12:53 PM, Jose A. Ortega Ruiz <address@hidden> wrote:
>
> I've just checked, and it works for me...it's also almost immediate.
> Actually, in the REPL there's little done by Geiser itself, it's
> comint-mode doing most of the job.  What happens if you  M-x run-scheme
> and try it? (That uses a plain emacs inferior scheme, with nothing to do
> with Geiser)
>

It works. I've tried M-x run-guile and then in the REPL:

scheme@(guile-user)> (define (add1 n)
  (+ n 1))

(define (sub1 n)
  (- n 1))

(define (o+ a b)
  (cond
   ((zero? b) a)
   (else (o+ (add1 a) (sub1 b)))))

scheme@(guile-user)> (o+ 10 10000000)
$2 = 10000010
scheme@(guile-user)> ,time (o+ 10 10000000)
$3 = 10000010
;; 0.822361s real time, 0.821115s run time.  0.000000s spent in GC.
scheme@(guile-user)>

After how much time geiser gives up? Is there any public variable for
that? 0.8s seems very little time to me.

Aleix



reply via email to

[Prev in Thread] Current Thread [Next in Thread]