GNU bug report logs -
#57573
disarchive: Test "[prop] Writing is reversible" fails
Previous Next
Full log
Message #11 received at 57573 <at> debbugs.gnu.org (full text, mbox):
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.