From 799912b953b9e41b52f1c12ffb79ecc299448175 Mon Sep 17 00:00:00 2001 From: John Benediktsson Date: Mon, 13 Apr 2020 11:13:20 -0700 Subject: [PATCH] sodium.secure-memory: fix return type of secure-memory=. --- extra/sodium/secure-memory/secure-memory.factor | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/extra/sodium/secure-memory/secure-memory.factor b/extra/sodium/secure-memory/secure-memory.factor index 33bbe9b6d2..1a3a315ac7 100644 --- a/extra/sodium/secure-memory/secure-memory.factor +++ b/extra/sodium/secure-memory/secure-memory.factor @@ -36,7 +36,7 @@ TUPLE: secure-memory < disposable : secure-memory= ( a b -- ? ) [ check-disposed ] bi@ { [ [ size>> ] bi@ = ] - [ [ [ >c-ptr ] bi@ ] keep size>> sodium_memcmp ] + [ [ [ >c-ptr ] bi@ ] keep size>> sodium_memcmp 0 = ] } 2&& ; M: secure-memory dispose* ( disposable -- )