Fixes half of bug 164725: missing scheme-report-environment.

This commit is contained in:
Abdulaziz Ghuloum 2007-11-23 14:38:25 -05:00
parent fe42e0912c
commit 8640cb785d
5 changed files with 15 additions and 6 deletions

Binary file not shown.

View File

@ -1795,6 +1795,15 @@ displayed.
12 12
\end{verbatim} \end{verbatim}
\chapter{Contributed Libraries}
FIXME (add intro)
\newpage
\section{SRFI-41: \texttt{(streams)}}
FIXME (add stuff)
\chapter{Missing Features} \chapter{Missing Features}
Ikarus does not fully conform to \rnrs{6} yet. Although it Ikarus does not fully conform to \rnrs{6} yet. Although it

View File

@ -1 +1 @@
1120 1121

View File

@ -207,8 +207,6 @@
[symbols (ikarus symbols) #t #t] [symbols (ikarus symbols) #t #t]
[parameters (ikarus parameters) #t #t] [parameters (ikarus parameters) #t #t]
[interaction (ikarus interaction) #t #t] [interaction (ikarus interaction) #t #t]
[ne (ikarus null-environment-5) #t #t]
[se (ikarus scheme-report-environment-5) #t #t]
[r (rnrs) #t #t] [r (rnrs) #t #t]
[r5 (rnrs r5rs) #t #t] [r5 (rnrs r5rs) #t #t]
[ct (rnrs control) #t #t] [ct (rnrs control) #t #t]
@ -258,6 +256,8 @@
[interrupts (ikarus system interrupts) #f #t] [interrupts (ikarus system interrupts) #f #t]
[$all (psyntax system $all) #f #t] [$all (psyntax system $all) #f #t]
[$boot (psyntax system $bootstrap) #f #t] [$boot (psyntax system $bootstrap) #f #t]
[ne (psyntax null-environment-5) #f #f]
[se (psyntax scheme-report-environment-5) #f #f]
)) ))
(define identifier->library-map (define identifier->library-map
@ -1051,7 +1051,7 @@
[remainder i r r5 se] [remainder i r r5 se]
[null-environment i r5 se] [null-environment i r5 se]
[quotient i r r5 se] [quotient i r r5 se]
[scheme-report-environment r5 se] [scheme-report-environment i r5 se]
[close-port i r ip] [close-port i r ip]
[eol-style i r ip] [eol-style i r ip]
[error-handling-mode i r ip] [error-handling-mode i r ip]

View File

@ -24,14 +24,14 @@
bound-identifier=? datum->syntax syntax-error bound-identifier=? datum->syntax syntax-error
syntax->datum make-variable-transformer syntax->datum make-variable-transformer
eval-r6rs-top-level boot-library-expand eval-top-level eval-r6rs-top-level boot-library-expand eval-top-level
null-environment) null-environment scheme-report-environment)
(import (import
(except (rnrs) (except (rnrs)
environment environment? identifier? environment environment? identifier?
eval generate-temporaries free-identifier=? eval generate-temporaries free-identifier=?
bound-identifier=? datum->syntax syntax-error bound-identifier=? datum->syntax syntax-error
syntax->datum make-variable-transformer syntax->datum make-variable-transformer
null-environment) null-environment scheme-report-environment)
(rnrs base) (rnrs base)
(rnrs lists) (rnrs lists)
(rnrs control) (rnrs control)