Please enable JavaScript in your browser!
Etusivu
Tutki
Apua
Kirjaudu sisään
rain1
/
scheme-test-programs
Tarkkaile
1
Äänestä
0
Fork
0
Tiedostot
Ongelmat
0
Pull-pyynnöt
0
Wiki
Branch:
master
Branchit
Tagit
master
scheme-test-...
/
functions
/
repeat.scm
repeat.scm
101 B
Pysyvä linkki
Historia
Raaka
1
2
3
4
5
6
(define (repeat thunk n)
(if (= 0 n)
#t
(begin (thunk)
(repeat thunk (- n 1)))))