* Failing test from r4rstest.scm
@ 2003-01-06 19:55 Neil Jerram
2003-01-08 1:34 ` Thien-Thi Nguyen
0 siblings, 1 reply; 3+ messages in thread
From: Neil Jerram @ 2003-01-06 19:55 UTC (permalink / raw)
I just tried adding this test (from r4rstest.scm) to r4rs.test ...
(SECTION 5 2 1)
(define add3 (lambda (x) (+ x 3)))
(test 6 'define (add3 3))
(define first car)
(test 1 'define (first '(1 2)))
(define old-+ +)
(begin (begin (begin)
(begin (begin (begin) (define + (lambda (x y) (list y x)))
(begin)))
(begin))
(begin)
(begin (begin (begin) (test '(3 6) 'add3 6) ; FAILS HERE
(begin))))
... but it fails. Any idea why?
Neil
_______________________________________________
Bug-guile mailing list
Bug-guile@gnu.org
http://mail.gnu.org/mailman/listinfo/bug-guile
^ permalink raw reply [flat|nested] 3+ messages in thread
* Re: Failing test from r4rstest.scm
2003-01-06 19:55 Failing test from r4rstest.scm Neil Jerram
@ 2003-01-08 1:34 ` Thien-Thi Nguyen
2003-01-08 20:18 ` Neil Jerram
0 siblings, 1 reply; 3+ messages in thread
From: Thien-Thi Nguyen @ 2003-01-08 1:34 UTC (permalink / raw)
Cc: bug-guile
From: Neil Jerram <neil@ossau.uklinux.net>
Date: 06 Jan 2003 19:55:26 +0000
... but it fails. Any idea why?
what messages do you see?
thi
_______________________________________________
Bug-guile mailing list
Bug-guile@gnu.org
http://mail.gnu.org/mailman/listinfo/bug-guile
^ permalink raw reply [flat|nested] 3+ messages in thread
* Re: Failing test from r4rstest.scm
2003-01-08 1:34 ` Thien-Thi Nguyen
@ 2003-01-08 20:18 ` Neil Jerram
0 siblings, 0 replies; 3+ messages in thread
From: Neil Jerram @ 2003-01-08 20:18 UTC (permalink / raw)
Cc: bug-guile
>>>>> "thi" == Thien-Thi Nguyen <ttn@giblet.glug.org> writes:
thi> From: Neil Jerram <neil@ossau.uklinux.net>
thi> Date: 06 Jan 2003 19:55:26 +0000
thi> ... but it fails. Any idea why?
thi> what messages do you see?
Testing /home/neil/Guile/cvs/guile-core/pre-inst-guile ...
with GUILE_LOAD_PATH=/home/neil/Guile/cvs/guile-core/test-suite
FAIL: r4rs.test: (5 2 1): (add3 6)
FAIL: r4rs.test: (5 2 1): (add3 6)
This is with current CVS. The test expects '(3 6) but gets 9.
Neil
_______________________________________________
Bug-guile mailing list
Bug-guile@gnu.org
http://mail.gnu.org/mailman/listinfo/bug-guile
^ permalink raw reply [flat|nested] 3+ messages in thread
end of thread, other threads:[~2003-01-08 20:18 UTC | newest]
Thread overview: 3+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2003-01-06 19:55 Failing test from r4rstest.scm Neil Jerram
2003-01-08 1:34 ` Thien-Thi Nguyen
2003-01-08 20:18 ` Neil Jerram
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).