conservatory
/
picrin
4
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Merge pull request #284 from omasanori/srfi-106-test 

Get stats of SRFI 106's test.
This commit is contained in:
OGINO Masanori 2015-07-02 06:40:10 +09:00
parent 65ade266d1 11e3d7741f
commit e67029c87e
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
contrib/40.srfi/t/106.scm
View File

@ -2,6 +2,8 @@
(srfi 106) (srfi 106)
(picrin test)) (picrin test))
(test-begin)
; The number 9600 has no meaning. I just borrowed from Rust. ; The number 9600 has no meaning. I just borrowed from Rust.
(define *test-port* 9600) (define *test-port* 9600)
(define (next-test-port) (define (next-test-port)
@ -70,3 +72,5 @@
(test *shut-wr* (shutdown-method write)) (test *shut-wr* (shutdown-method write))
(test *shut-rdwr* (shutdown-method read write)) (test *shut-rdwr* (shutdown-method read write))
(test *shut-rdwr* (shutdown-method write read)) (test *shut-rdwr* (shutdown-method write read))
(test-end)