tanakaBox https://blog.hatena.ne.jp/tanakaBox/ ボクノス https://boxnos.hatenablog.com/ Scheme 1個1個に分かれてると、どうもモジュール感がないので、どか~んとまとめてとテストしたい。 #!/usr/bin/gosh (use gauche.test) (test-start "test**-test-start!!") (define (test** title list) (test-section title) (for-each (lambda (l) (test* (cadr l) (eval (car l) '()) (eval (cadr l) '()))) list)) (define test-data '(1 2 3)) (test** "test**-test" '… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fboxnos.hatenablog.com%2Fentry%2F20071212%2F1197422259" title=" Gaucheでまとめてテスト - ボクノス" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2007-12-12 10:17:39 rich https://boxnos.hatenablog.com/entry/20071212/1197422259 1.0 100%