unofficial mirror of guile-user@gnu.org 
 help / color / mirror / Atom feed
From: Thien-Thi Nguyen <ttn@surf.glug.org>
Cc: guile-user@gnu.org
Subject: Re: make check fails (guile 1.4.1.97)
Date: Sat, 17 Jan 2004 11:13:50 +0100	[thread overview]
Message-ID: <E1AhnSg-00043j-00@surf.glug.org> (raw)
In-Reply-To: <87y8s8dptn.fsf@ID-28718.user.uni-berlin.de> (message from Andreas Voegele on Fri, 16 Jan 2004 13:45:56 +0100)

   From: Andreas Voegele <voegelas@gmx.net>
   Date: Fri, 16 Jan 2004 13:45:56 +0100

   Linux/i386 with gcc 3.3.2, binutils 2.14 and glibc 2.3.2
   FAIL: r4rs.test: (6 9): (#<procedure leaf-eq? (x y)> [...])

could you replace the `leaf-eq?' proc in r4rs.test w/ the following and
post or email the output of "export DEBUG=1 ; ./check-guile r4rs.test"
run from $(top_builddir)?

(define (leaf-eq? x y)
  (let* ((eot (list 'eot))
         (xf (next-leaf-generator x eot))
         (yf (next-leaf-generator y eot)))
    (letrec ((loop (lambda (x y)
                     (pk 'x x 'y y)
                     (cond ((not (eq? x y)) #f)
                           ((eq? eot x) #t)
                           (else (loop (xf) (yf)))))))
      (loop (xf) (yf)))))

there is an extra `pk' here, to see where things are failing.  in the
meantime i'll try to find a system where those software versions are
installed (or install them locally but that will take more time).  if
anyone has a handy ssh-able shell account dmz'd somewhere w/ the above
software that i can use temporarily to debug this, feel free to ping me
off-list.

thi


_______________________________________________
Guile-user mailing list
Guile-user@gnu.org
http://mail.gnu.org/mailman/listinfo/guile-user


  reply	other threads:[~2004-01-17 10:13 UTC|newest]

Thread overview: 6+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2004-01-16 12:45 make check fails (guile 1.4.1.97) Andreas Voegele
2004-01-17 10:13 ` Thien-Thi Nguyen [this message]
2004-01-18 20:57 ` Thien-Thi Nguyen
2004-01-19 17:46   ` Andreas Voegele
2004-01-19 18:37     ` Thien-Thi Nguyen
2004-01-21 16:30       ` Thien-Thi Nguyen

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

  List information: https://www.gnu.org/software/guile/

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=E1AhnSg-00043j-00@surf.glug.org \
    --to=ttn@surf.glug.org \
    --cc=guile-user@gnu.org \
    --cc=ttn@glug.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).