diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2016-11-05 22:37:46 +0100 |
|---|---|---|
| committer | Artyom V. Poptsov <poptsov.artyom@gmail.com> | 2016-11-06 07:19:11 +0300 |
| commit | e9321025c09f7c179e777e8fdb8c1f5fbacb4cf4 (patch) | |
| tree | d21f4bac151a7f86ce027361a17b206c5bd0eaba | |
| parent | libguile-ssh/server-func.c: Add missing 'const'. (diff) | |
| download | guile-ssh-e9321025c09f7c179e777e8fdb8c1f5fbacb4cf4.tar.gz | |
libguile-ssh: Remove unused variables.
* libguile-ssh/auth.c (guile_ssh_userauth_public_key_x): Remove
'public_key'.
* libguile-ssh/message-func.c (get_auth_req): Remove 'pkey_smob' and
'pkey_data'.
* libguile-ssh/session-type.c (print_session): Remove 'smob_addr'.
* libguile-ssh/sftp-file-type.c (print_sftp_file): Remove 'attr'.
(ptob_flush): Remove 'fd'.
Signed-off-by: Artyom V. Poptsov <poptsov.artyom@gmail.com>
| -rw-r--r-- | libguile-ssh/auth.c | 1 | ||||
| -rw-r--r-- | libguile-ssh/message-func.c | 2 | ||||
| -rw-r--r-- | libguile-ssh/session-type.c | 1 | ||||
| -rw-r--r-- | libguile-ssh/sftp-file-type.c | 2 |
4 files changed, 0 insertions, 6 deletions
diff --git a/libguile-ssh/auth.c b/libguile-ssh/auth.c index 9a2d1b2..cd287b5 100644 --- a/libguile-ssh/auth.c +++ b/libguile-ssh/auth.c @@ -82,7 +82,6 @@ Throw `wrong-type-arg' if a disconnected SESSION is passed as an argument.\ /* See "On the username" commentary above. */ char *username = NULL; - ssh_string public_key; int res; /* Check types. */ diff --git a/libguile-ssh/message-func.c b/libguile-ssh/message-func.c index aa7a8e2..795e9c1 100644 --- a/libguile-ssh/message-func.c +++ b/libguile-ssh/message-func.c @@ -288,8 +288,6 @@ get_auth_req (ssh_message msg, SCM scm_msg) /* FIXME: accept only SCM */ const char *password = ssh_message_auth_password (msg); ssh_key public_key = ssh_message_auth_pubkey (msg); SCM pkey_state; - SCM pkey_smob; - struct key_data *pkey_data; if (user) SCM_SIMPLE_VECTOR_SET (result, 0, scm_from_locale_string (user)); diff --git a/libguile-ssh/session-type.c b/libguile-ssh/session-type.c index 61eb49b..e37dae3 100644 --- a/libguile-ssh/session-type.c +++ b/libguile-ssh/session-type.c @@ -82,7 +82,6 @@ print_session (SCM session, SCM port, scm_print_state *pstate) char *user = NULL; char *host = NULL; unsigned int ssh_port; - uint32_t smob_addr = (uint32_t) scm_object_address (session); int res; scm_puts ("#<session ", port); diff --git a/libguile-ssh/sftp-file-type.c b/libguile-ssh/sftp-file-type.c index 3ddd60c..7da8299 100644 --- a/libguile-ssh/sftp-file-type.c +++ b/libguile-ssh/sftp-file-type.c @@ -115,7 +115,6 @@ print_sftp_file (SCM sftp_file, SCM port, scm_print_state *pstate) { struct sftp_file_data *fd = _scm_to_sftp_file_data (sftp_file); ssh_session session = fd->file->sftp->session; - sftp_attributes attr = sftp_fstat (fd->file); char *user = NULL; char *host = NULL; unsigned int ssh_port; @@ -156,7 +155,6 @@ static void ptob_flush (SCM sftp_file) #define FUNC_NAME "ptob_flush" { - struct sftp_file_data *fd = _scm_to_sftp_file_data (sftp_file); scm_port *pt = SCM_PTAB_ENTRY (sftp_file); size_t wrsize = pt->write_pos - pt->write_buf; |