[Newbies] block in recursion, Any cure for that kind of situation?

[Ben Goetter]

>This is a maintenance nightmare waiting to happen.  Use a proper method call,

Squeak Smalltalk blocks are just similar enough to Scheme lambdas that I still fall into this trap, too.

(letrec ((carre (lambda (s1 s2 s3 s4 n)
                 (if (> n 0)
                  (carre (segment s1 s2)
                         (segment s2 s3)
                         (segment s3 s4)
                         (segment s1 s4)
                         (- n 1))))))
 'oops-must-remember-this-is-Squeak-not-Scheme)

Ben