mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-05-25 14:10:22 +02:00
* tests/ports.test: include (ice-9 rdelim) module.
This commit is contained in:
parent
6d36532c1c
commit
22d356150d
2 changed files with 7 additions and 1 deletions
|
@ -1,3 +1,7 @@
|
|||
2001-01-24 Gary Houston <ghouston@arglist.com>
|
||||
|
||||
* tests/ports.test: include (ice-9 rdelim) module.
|
||||
|
||||
2001-01-18 Dirk Herrmann <D.Herrmann@tu-bs.de>
|
||||
|
||||
* tests/numbers.test: Converted to do real boundary testing.
|
||||
|
|
|
@ -19,7 +19,8 @@
|
|||
;;;; Boston, MA 02111-1307 USA
|
||||
|
||||
(use-modules (test-suite lib)
|
||||
(ice-9 popen))
|
||||
(ice-9 popen)
|
||||
(ice-9 rdelim))
|
||||
|
||||
(define (display-line . args)
|
||||
(for-each display args)
|
||||
|
@ -200,6 +201,7 @@
|
|||
(let ((errno (car (list-ref args 3))))
|
||||
(or (= errno EAGAIN)
|
||||
(= errno EWOULDBLOCK))))))))
|
||||
|
||||
|
||||
;;;; Pipe (popen) ports.
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue