HCoop / bpt / guile.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
Rename the `testsuite' directory to `test-suite/vm'.
[bpt/guile.git] / test-suite / vm / t-do-loop.scm
1 (let ((n+ 0))
2 (do ((n- 5 (1- n-))
3 (n+ n+ (1+ n+)))
4 ((= n- 0))
5 (format #f "n- = ~a~%" n-)))
Unnamed repository; edit this file 'description' to name the repository.