mirror of
https://github.com/ashinn/chibi-scheme.git
synced 2025-05-18 21:29:19 +02:00
Correct record-type names in srfi 41
This commit is contained in:
parent
4f23fb4e03
commit
afba9d8c27
1 changed files with 3 additions and 3 deletions
|
@ -2,16 +2,16 @@
|
|||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||
;; primitive layer adapted from SRFI 41 reference impl
|
||||
|
||||
(define-record-type <stream>
|
||||
(define-record-type Stream
|
||||
(make-stream promise)
|
||||
stream?
|
||||
(promise stream-promise))
|
||||
|
||||
(define-record-type <stream-null>
|
||||
(define-record-type Stream-null
|
||||
(make-stream-null)
|
||||
%stream-null?)
|
||||
|
||||
(define-record-type <stream-pair>
|
||||
(define-record-type Stream-pair
|
||||
(make-stream-pair head tail)
|
||||
%stream-pair?
|
||||
(head %stream-car)
|
||||
|
|
Loading…
Add table
Reference in a new issue