Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-05-19 05:39:18 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Correct record-type names in srfi 41

Browse source
This commit is contained in:
Lukas Stoll 2020-06-09 19:50:13 +02:00
parent 4f23fb4e03
commit afba9d8c27
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lib/srfi/41.scm
View file

@ -2,16 +2,16 @@
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; primitive layer adapted from SRFI 41 reference impl ;; primitive layer adapted from SRFI 41 reference impl
(define-record-type <stream> (define-record-type Stream
(make-stream promise) (make-stream promise)
stream? stream?
(promise stream-promise)) (promise stream-promise))
(define-record-type <stream-null> (define-record-type Stream-null
(make-stream-null) (make-stream-null)
%stream-null?) %stream-null?)
(define-record-type <stream-pair> (define-record-type Stream-pair
(make-stream-pair head tail) (make-stream-pair head tail)
%stream-pair? %stream-pair?
(head %stream-car) (head %stream-car)