Index: nano.c
==================================================================
--- nano.c
+++ nano.c
@@ -8,11 +8,11 @@
 #include "tweetnacl.h"
 #include "blake2-supercop.h"
 
 #define NANO_SECRET_KEY_LENGTH (crypto_sign_SECRETKEYBYTES - crypto_sign_PUBLICKEYBYTES)
 #define NANO_PUBLIC_KEY_LENGTH (crypto_sign_PUBLICKEYBYTES)
-#define TclNano_AttemptAlloc(x) ((void *) Tcl_Alloc(x))
+#define TclNano_AttemptAlloc(x) ((void *) Tcl_AttemptAlloc(x))
 #define TclNano_Free(x) Tcl_Free((char *) x)
 
 #if defined(HAVE_GETRANDOM)
 #  ifdef HAVE_SYS_RANDOM_H
 #    include <sys/random.h>
@@ -281,11 +281,10 @@
 
 		return(TCL_ERROR);
 	}
 
 	verify_data_length_nacl = verify_data_length;
-printf("cso sdl = %i, dl=%i, sl=%i\n", signed_data_length, data_length, signature_length);
 	cso_ret = crypto_sign_open(verify_data, &verify_data_length_nacl, signed_data, signed_data_length, public_key);
 	result = 0;
 	if (cso_ret == 0) {
 		result = 1;
 	}