GNU bug report logs - #57573
disarchive: Test "[prop] Writing is reversible" fails

Previous Next

Package: guix;

Reported by: Maxime Devos <maxime.devos <at> student.kuleuven.be>

Date: Sun, 4 Sep 2022 08:12:02 UTC

Severity: normal

Full log


View this message in rfc822 format

From: Maxime Devos <maxime.devos <at> student.kuleuven.be>
To: 57573 <at> debbugs.gnu.org
Cc: timothy sample <samplet <at> ngyro.com>
Subject: bug#57573: disarchive: Test "[prop] Writing is reversible" fails
Date: Sun, 4 Sep 2022 11:05:59 +0200
On 04-09-2022 10:24, Maxime Devos wrote:
> Here's a reproducer:
>
> (define o (make-unstructured-octal 0 (make-zero-string "0" #\䤄)))
> (test-equal "Writing is reversible (#57573)"
>         o (decode-octal (encode-octal octal)))
>
That was bogus (octal is undefined), try

>
> (define o (make-unstructured-octal 0 (make-zero-string "0" "䤄")))
> (unless (valid-octal? o) (error "oops"))
> (test-equal "Writing is reversible (#57573)"
>         o (decode-octal (encode-octal o)))
instead. Error message:
> test-name: Writing is reversible (#57573)
> location: tests/kinds/octal.scm:130
> source:
> + (test-equal
> +   "Writing is reversible (#57573)"
> +   o
> +   (decode-octal (encode-octal o)))
> expected-value: #<<unstructured-octal> value: 0 source: 
> #<<zero-string> value: "0" trailer: "䤄">>
> actual-value: #<<padded-octal> value: 0 width: 1 padding: #\0 trailer: 
> "䤄">
> result: FAIL
Greetings,
Maxime.





This bug report was last modified 2 years and 283 days ago.

Previous Next


GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.