diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2016-11-05 22:37:45 +0100 |
|---|---|---|
| committer | Artyom V. Poptsov <poptsov.artyom@gmail.com> | 2016-11-06 07:18:42 +0300 |
| commit | 8ca0b93e01dad50b6971f7a6fd020c2183950a0f (patch) | |
| tree | 6252247064e1f27d6c87b8f1c31c4aa716c62301 | |
| parent | channel.scm: Remove trailing bang from 'channel-send-eof'. (diff) | |
| download | guile-ssh-8ca0b93e01dad50b6971f7a6fd020c2183950a0f.tar.gz | |
libguile-ssh/server-func.c: Add missing 'const'.
This is a followup to e490ba5226cedf22eb8f9166b5ac9fb5486c65f8.
* libguile-ssh/server-func.c (set_sym_opt)
(guile_ssh_server_set_x, guile_ssh_server_get): 'const'-qualify 'opt'
and 'sd'.
Signed-off-by: Artyom V. Poptsov <poptsov.artyom@gmail.com>
| -rw-r--r-- | libguile-ssh/server-func.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/libguile-ssh/server-func.c b/libguile-ssh/server-func.c index 0edd32e..2cc00c1 100644 --- a/libguile-ssh/server-func.c +++ b/libguile-ssh/server-func.c @@ -108,7 +108,7 @@ set_blocking_mode (ssh_bind bind, SCM value) static inline int set_sym_opt (ssh_bind bind, int type, struct symbol_mapping *sm, SCM value) { - struct symbol_mapping *opt = _scm_to_ssh_const (sm, value); + const struct symbol_mapping *opt = _scm_to_ssh_const (sm, value); if (! opt) guile_ssh_error1 ("server-set!", "Wrong value", value); return ssh_bind_options_set (bind, type, &opt->value); @@ -154,7 +154,7 @@ Return value is undefined.\ #define FUNC_NAME s_guile_ssh_server_set_x { struct server_data *server_data = _scm_to_server_data (server); - struct symbol_mapping *opt; /* Server option */ + const struct symbol_mapping *opt; /* Server option */ int res; SCM_ASSERT (scm_is_symbol (option), option, SCM_ARG2, FUNC_NAME); @@ -187,8 +187,8 @@ not set. Throw `guile-ssh-error' on error.\ ") #define FUNC_NAME s_guile_ssh_server_get { - struct server_data *sd = _scm_to_server_data (server); - struct symbol_mapping *opt = _scm_to_ssh_const (server_options, option); + const struct server_data *sd = _scm_to_server_data (server); + const struct symbol_mapping *opt = _scm_to_ssh_const (server_options, option); if (! opt) guile_ssh_error1 (FUNC_NAME, "No such option", option); |