Re: Bigloo2.8a

Aubrey Jaffer <agj@alum.mit.edu>
25 Jun 2006 07:49:09 -0400

          From comp.compilers

Related articles
Bigloo2.8a Manuel.Serrano@inria.fr (Manuel Serrano) (2006-06-03)
Re: Bigloo2.8a agj@alum.mit.edu (Aubrey Jaffer) (2006-06-25)
Re: Bigloo2.8a chain_lube@hotmail.com (=?iso-8859-1?q?F=F6rster_vom_Silberwald?=) (2006-06-27)
| List of all articles for this month |

From: Aubrey Jaffer <agj@alum.mit.edu>
Newsgroups: comp.lang.scheme,comp.compilers
Date: 25 Jun 2006 07:49:09 -0400
Organization: Compilers Central
References: 06-06-007
Keywords: Scheme

"r4rstest.scm"
<http://cvs.savannah.gnu.org/viewcvs/*checkout*/scm/scm/r4rstest.scm?rev=HEAD>
is a R4RS conformance test for Scheme implementations.


bigloo2.8b fails a number of the R4RS tests:


    (let ((x 5))
        (begin (begin (begin)
(begin (begin (begin) (define foo (lambda (y) (bar x y)))
(begin)))
(begin))
(begin)
(begin)
(begin (define bar (lambda (a b) (+ (* a b) a))))
(begin))
        (begin)
        (begin (foo (+ x 3))))
    *** ERROR:eval:
    Unbound variable (from top-level) -- foo


`begin' is not a binding construct; `foo' (and `bar') should be bound
in the line `(begin (foo (+ x 3)))'.


    (let ((f -)) (let f ((n (f 1))) n)) returns 1, but should return -1.


    (expt -1 256) returns 1.0, but should return 1 .


    (expt -1 255) returns -1.0, but should return -1 .


    (string->number "-") returns 0, but should return #f.


    (string->number "+") returns 0, but should return #f.


    (string->number "80000000" 16) returns -1, but should return #f.


    (string->number "-80000000" 16) returns 0, but should return #f.


    (max 3.9 4) returns 4, but should return 4.0.



Post a followup to this message

Return to the comp.compilers page.
Search the comp.compilers archives again.