suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

more consistent form for a test

Browse Source 
svn: r12690
This commit is contained in:
Matthew Flatt 2008-12-03 20:01:33 +00:00
parent 142fd53e90
commit c55d305eab
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/tests/r6rs/io/ports.sls
View File

@ -354,7 +354,7 @@
[else [else
;; Must be big-endian ;; Must be big-endian
(test (get-u8) 0) (test (get-u8) 0)
(test (get-u8) (char->integer #\a))])) (test (get-u8) 97)]))
(test/unspec (close-port p))) (test/unspec (close-port p)))
(let ([bytevector->string-via-file (let ([bytevector->string-via-file