[gnunet-scheme] 03/03: cadet/client: Unstub verification of msg:cadet:local:acknowledgement.

[gnunet]

This is an automated email from the git hooks/post-receive script.

maxime-devos pushed a commit to branch master
in repository gnunet-scheme.

commit 36ad8418f9202cca0f4ec183f53df90587caa785
Author: Maxime Devos <maximedevos@telenet.be>
AuthorDate: Sun Jul 31 21:09:00 2022 +0200

    cadet/client: Unstub verification of msg:cadet:local:acknowledgement.
    
    * gnu/gnunet/cadet/client.scm
    (reconnect)[handlers]{msg:cadet:local:acknowledgement}<well-formed?>:
    Unstub.
---
 gnu/gnunet/cadet/client.scm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/gnu/gnunet/cadet/client.scm b/gnu/gnunet/cadet/client.scm
index e677983..83b02fe 100644
--- a/gnu/gnunet/cadet/client.scm
+++ b/gnu/gnunet/cadet/client.scm
@@ -156,7 +156,8 @@
         (message-handler
          (type (symbol-value message-type msg:cadet:local:acknowledgement))
          ((interpose exp) exp)
-         ((well-formed? slice) TODO)
+         ((well-formed? slice)
+          (= (slice-length slice) (sizeof /:msg:cadet:local:acknowledgement 
'())))
          ((handle! slice) TODO))))
       (define error-handler
        (make-error-handler connected disconnected terminal-condition

-- 
To stop receiving notification emails like this one, please contact
gnunet@gnunet.org.