changed: goldfish/liii/list.scm

LiiiLabs · Sep 3, 2024 · 550745e · 550745e
1 parent d66a9ee
commit 550745e
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/goldfish/liii/list.scm b/goldfish/liii/list.scm
@@ -55,7 +55,7 @@
                             (cddr rest-funcs)))))
   (define (f-inner . funcs)
     (cond ((null? funcs) scheme-list)
-          ((length=? 2 scheme-list)
+          ((length=? 2 funcs)
            (list-view ((car funcs) (cadr funcs) scheme-list)))
           ((even? (length funcs))
            (f-inner-reducer scheme-list