diff options
author | Ludovic Courtès <ludo@gnu.org> | 2016-10-05 14:30:32 +0200 |
---|---|---|
committer | Nikos Mavrogiannopoulos <nmav@gnutls.org> | 2016-10-05 20:03:00 +0200 |
commit | 24ccf82c58a2e6b3ab1a95ef6820fd921730dfbd (patch) | |
tree | a4bf597a4fada63b0b1eeb69053884164a1e2b4d /guile | |
parent | 8c6325363c562d3013225167e49fc82ef91330a2 (diff) | |
download | gnutls-24ccf82c58a2e6b3ab1a95ef6820fd921730dfbd.tar.gz |
guile: Test 'set-session-transport-fd!'.
* guile/tests/session-record-port.scm: Use 'set-session-transport-fd!'
on the server side.
Diffstat (limited to 'guile')
-rw-r--r-- | guile/tests/session-record-port.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/guile/tests/session-record-port.scm b/guile/tests/session-record-port.scm index 0eafefafa7..8764d43655 100644 --- a/guile/tests/session-record-port.scm +++ b/guile/tests/session-record-port.scm @@ -83,7 +83,7 @@ (let ((server (make-session connection-end/server))) (set-session-priorities! server priorities) - (set-session-transport-port! server (cdr socket-pair)) + (set-session-transport-fd! server (fileno (cdr socket-pair))) (let ((cred (make-anonymous-server-credentials)) (dh-params (import-dh-params "dh-parameters.pem"))) ;; Note: DH parameter generation can take some time. |