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

Fix typo

Browse source
This commit is contained in:
Bradley Lucier 2024-05-28 04:12:54 -04:00
parent 1dd84df451
commit ffc8bec1bf
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lib/srfi/231/transforms.scm
View file

@ -393,7 +393,7 @@
(array? array) (array? array)
(every array? arrays) (every array? arrays)
(every (lambda (a) (interval= (array-domain array) a)) arrays))) (every (lambda (a) (interval= (array-domain array) a)) arrays)))
(if (null? array) (if (null? arrays)
(interval-fold-left (array-getter array) (interval-fold-left (array-getter array)
(lambda (accumulator array-element) (lambda (accumulator array-element)
(operator accumulator array-element)) (operator accumulator array-element))