summaryrefslogtreecommitdiff
path: root/src/jwk/generate-key.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/jwk/generate-key.c')
-rw-r--r--src/jwk/generate-key.c4
1 files changed, 4 insertions, 0 deletions
diff --git a/src/jwk/generate-key.c b/src/jwk/generate-key.c
index ec8ce76..e875b24 100644
--- a/src/jwk/generate-key.c
+++ b/src/jwk/generate-key.c
@@ -10,6 +10,8 @@
#define _(s) gettext (s)
SCM webidoidc_generate_key_g (SCM args);
+SCM webidoidc_strip_key_g (SCM key);
+SCM webidoidc_jkt_g (SCM key);
extern int init_webidoidc (void);
@@ -48,6 +50,8 @@ run (void *params, int argc, char *argv[])
(scm_from_utf8_keyword ("n-size"),
scm_from_size_t (n_size)));
}
+ scm_display (webidoidc_jkt_g (data), scm_current_error_port ());
+ fprintf (stderr, "\n");
scm_display (data, scm_current_output_port ());
}