diff --git a/ChangeLog b/ChangeLog
index b3150110f3cf6b845cf904eed2e4716981988cdb..3d6478ecb3d655c3c09848e2e6d6c63bb5d9fb95 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2016-09-03  Niels Möller  <nisse@lysator.liu.se>
+
+	* testsuite/rsa-encrypt-test.c (test_main): Fix pointer
+	signednesss warning.
+
 2016-08-29  Niels Möller  <nisse@lysator.liu.se>
 
 	* sexp-format.c (strlen_u8): New helper function.
diff --git a/testsuite/rsa-encrypt-test.c b/testsuite/rsa-encrypt-test.c
index d20dee9127e69934744d5615a5b61fba86f3b4d5..93053a7fe602bc7c2df60ee65a22b8cc086e206c 100644
--- a/testsuite/rsa-encrypt-test.c
+++ b/testsuite/rsa-encrypt-test.c
@@ -11,8 +11,8 @@ test_main(void)
   struct knuth_lfib_ctx lfib;
 
   /* FIXME: How is this spelled? */
-  const uint8_t *msg = "Squemish ossifrage";
-  size_t msg_length;
+  const unsigned char msg[] = "Squemish ossifrage";
+  size_t msg_length = LLENGTH(msg);
 
   uint8_t *decrypted;
   size_t decrypted_length;
@@ -27,7 +27,6 @@ test_main(void)
   knuth_lfib_init(&lfib, 17);
   
   test_rsa_set_key_1(&pub, &key);
-  msg_length = strlen(msg);
 
   if (verbose)
     fprintf(stderr, "msg: `%s', length = %d\n", msg, (int) msg_length);