summaryrefslogtreecommitdiff
path: root/guile
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2016-10-05 14:30:32 +0200
committerNikos Mavrogiannopoulos <nmav@gnutls.org>2016-10-05 20:03:00 +0200
commit24ccf82c58a2e6b3ab1a95ef6820fd921730dfbd (patch)
treea4bf597a4fada63b0b1eeb69053884164a1e2b4d /guile
parent8c6325363c562d3013225167e49fc82ef91330a2 (diff)
downloadgnutls-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.scm2
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.