summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorArtyom V. Poptsov <poptsov.artyom@gmail.com>2016-06-13 02:39:54 +0400
committerArtyom V. Poptsov <poptsov.artyom@gmail.com>2016-06-13 02:39:54 +0400
commit99c815e5e9b7b9aff6bc24b9da05d581e82f5041 (patch)
tree09268ec2d5583d3800e03983e195dbb8ee29d0fc
parenttests/client-server.scm: Add a new TC (diff)
downloadguile-ssh-99c815e5e9b7b9aff6bc24b9da05d581e82f5041.tar.gz
tests/client-server.scm: Add a new TC
* tests/client-server.scm ("userauth-public-key!, wrong parameter"): New test case.
-rw-r--r--tests/client-server.scm5
1 files changed, 5 insertions, 0 deletions
diff --git a/tests/client-server.scm b/tests/client-server.scm
index d3307b8..98c4ffb 100644
--- a/tests/client-server.scm
+++ b/tests/client-server.scm
@@ -321,6 +321,11 @@
(eq? res 'partial))))))
+;; The procedure called with a wrong object as a parameter which leads to an
+;; exception.
+(test-error-with-log "userauth-public-key!, wrong parameter" 'wrong-type-arg
+ (userauth-public-key! "Not a session." (private-key-from-file %rsakey)))
+
(test-assert-with-log "userauth-public-key!, success"
(run-client-test