From mboxrd@z Thu Jan 1 00:00:00 1970
Return-Path:
Received: from mp0 ([2001:41d0:2:4a6f::])
(using TLSv1.2 with cipher ECDHE-RSA-AES256-GCM-SHA384 (256/256 bits))
by ms0.migadu.com with LMTPS
id gDXxIco8dmACCgAAgWs5BA
(envelope-from )
for ; Wed, 14 Apr 2021 02:52:26 +0200
Received: from aspmx1.migadu.com ([2001:41d0:2:4a6f::])
(using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits))
by mp0 with LMTPS
id 4FHkG8o8dmBAIgAA1q6Kng
(envelope-from )
for ; Wed, 14 Apr 2021 00:52:26 +0000
Received: from lists.gnu.org (lists.gnu.org [209.51.188.17])
(using TLSv1.2 with cipher ECDHE-RSA-AES256-GCM-SHA384 (256/256 bits))
(No client certificate requested)
by aspmx1.migadu.com (Postfix) with ESMTPS id A13CE1CEBC
for ; Wed, 14 Apr 2021 02:52:25 +0200 (CEST)
Received: from localhost ([::1]:55592 helo=lists1p.gnu.org)
by lists.gnu.org with esmtp (Exim 4.90_1)
(envelope-from )
id 1lWTlX-00070G-Ns
for larch@yhetil.org; Tue, 13 Apr 2021 20:52:23 -0400
Received: from eggs.gnu.org ([2001:470:142:3::10]:59582)
by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256)
(Exim 4.90_1) (envelope-from )
id 1lWTlD-0006zx-1n
for bug-guix@gnu.org; Tue, 13 Apr 2021 20:52:03 -0400
Received: from debbugs.gnu.org ([209.51.188.43]:49685)
by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128)
(Exim 4.90_1) (envelope-from )
id 1lWTlC-00039N-Qs
for bug-guix@gnu.org; Tue, 13 Apr 2021 20:52:02 -0400
Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2)
(envelope-from ) id 1lWTlC-0002pO-Ni
for bug-guix@gnu.org; Tue, 13 Apr 2021 20:52:02 -0400
X-Loop: help-debbugs@gnu.org
Subject: bug#47764: guix pull bug
Resent-From: Zelphir Kaltstahl
Original-Sender: "Debbugs-submit"
Resent-CC: bug-guix@gnu.org
Resent-Date: Wed, 14 Apr 2021 00:52:02 +0000
Resent-Message-ID:
Resent-Sender: help-debbugs@gnu.org
X-GNU-PR-Message: report 47764
X-GNU-PR-Package: guix
X-GNU-PR-Keywords:
To: 47764@debbugs.gnu.org
X-Debbugs-Original-To: bug-guix@gnu.org
Received: via spool by submit@debbugs.gnu.org id=B.161836150910848
(code B ref -1); Wed, 14 Apr 2021 00:52:02 +0000
Received: (at submit) by debbugs.gnu.org; 14 Apr 2021 00:51:49 +0000
Received: from localhost ([127.0.0.1]:32998 helo=debbugs.gnu.org)
by debbugs.gnu.org with esmtp (Exim 4.84_2)
(envelope-from )
id 1lWTku-0002on-1F
for submit@debbugs.gnu.org; Tue, 13 Apr 2021 20:51:49 -0400
Received: from lists.gnu.org ([209.51.188.17]:37212)
by debbugs.gnu.org with esmtp (Exim 4.84_2)
(envelope-from ) id 1lWSiw-0001DR-FC
for submit@debbugs.gnu.org; Tue, 13 Apr 2021 19:45:40 -0400
Received: from eggs.gnu.org ([2001:470:142:3::10]:50614)
by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256)
(Exim 4.90_1) (envelope-from )
id 1lWSiw-0000bS-27
for bug-guix@gnu.org; Tue, 13 Apr 2021 19:45:38 -0400
Received: from mout01.posteo.de ([185.67.36.65]:51404)
by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256)
(Exim 4.90_1) (envelope-from )
id 1lWSip-0000XC-DH
for bug-guix@gnu.org; Tue, 13 Apr 2021 19:45:37 -0400
Received: from submission (posteo.de [89.146.220.130])
by mout01.posteo.de (Postfix) with ESMTPS id 655E31A022B
for ; Wed, 14 Apr 2021 01:45:22 +0200 (CEST)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=posteo.de; s=2017;
t=1618357522; bh=neApI6NFDVxR45UElvFvEzoOFtXmsfrhFn9QIGDXs/c=;
h=To:From:Subject:Date:From;
b=pgjSaxSuMGraOeEA9yyUMoVMJ9gEP0v8LtWbFbEMiD3AKm7mcJLfGrBAk82Tnsa0A
hHE42UZQJycXij86jeg7uKNlaBlSpuYjaOjMkzLNWnWCAJarYAB78/g8AtejPYT3Y3
ID2izu6crmPbw3Zs5xU4NCsZFUZWPUowFNAu8wAGo3kj126PwJuP4GKBH6Nq7T4Lg+
KY7LVqWNy9HYSQwGvvuSiLP43hiFofIAzlQMLqMNWC7TS7XA6uhSTinxeCeWgJEAfB
jM+8VfUjwCMiwLmRZtoNCQkLyH79gK8rgRVAL+DV2O+aVa99/Z62kHyJUcYJWG0jdO
lYLt6rL6U9KPQ==
Received: from customer (localhost [127.0.0.1])
by submission (posteo.de) with ESMTPSA id 4FKj010z2jz9rxH
for ; Wed, 14 Apr 2021 01:45:20 +0200 (CEST)
From: Zelphir Kaltstahl
Message-ID:
Date: Wed, 14 Apr 2021 01:45:20 +0200
User-Agent: Mozilla/5.0 (X11; Linux x86_64; rv:78.0) Gecko/20100101
Thunderbird/78.7.1
MIME-Version: 1.0
Content-Type: multipart/alternative;
boundary="------------19D271F7C88F5E149166A96D"
Content-Language: en-US
Received-SPF: pass client-ip=185.67.36.65;
envelope-from=zelphirkaltstahl@posteo.de; helo=mout01.posteo.de
X-Spam_score_int: -27
X-Spam_score: -2.8
X-Spam_bar: --
X-Spam_report: (-2.8 / 5.0 requ) BAYES_00=-1.9, DKIM_SIGNED=0.1,
DKIM_VALID=-0.1, DKIM_VALID_AU=-0.1, DKIM_VALID_EF=-0.1, HTML_MESSAGE=0.001,
RCVD_IN_DNSWL_LOW=-0.7, RCVD_IN_MSPIKE_H4=0.001, RCVD_IN_MSPIKE_WL=0.001,
SPF_HELO_NONE=0.001, SPF_PASS=-0.001 autolearn=ham autolearn_force=no
X-Spam_action: no action
X-Mailman-Approved-At: Tue, 13 Apr 2021 20:51:43 -0400
X-BeenThere: debbugs-submit@debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
X-BeenThere: bug-guix@gnu.org
List-Id: Bug reports for GNU Guix
List-Unsubscribe: ,
List-Archive:
List-Post:
List-Help:
List-Subscribe: ,
Errors-To: bug-guix-bounces+larch=yhetil.org@gnu.org
Sender: "bug-Guix"
X-Migadu-Flow: FLOW_IN
ARC-Message-Signature: i=1; a=rsa-sha256; c=relaxed/relaxed; d=yhetil.org;
s=key1; t=1618361546;
h=from:from:sender:sender:reply-to:subject:subject:date:date:
message-id:message-id:to:to:cc:mime-version:mime-version:
content-type:content-type:resent-cc:resent-from:resent-sender:
resent-message-id:list-id:list-help:list-unsubscribe:list-subscribe:
list-post:dkim-signature; bh=LtiIeINCmGZgaibqTziGNh5lHsoofpHRZhWXOzZAUGQ=;
b=IPCgTtJWeVs9p3D/WgfiMQ+m9iMT6xb1aUo96X6m93JEprdio0S1IWkSvuKXe9GW1jsDSW
fmCPtpCmuurioQ+q3hcSpR04dSMIOLXKG4v72mEpkpxUkSyvZKtOjm6c0UwA+ZPNNQmV4v
t/RAuFv7l6JLosftDHXEAAJpDuiFG2ysgY62yphd8/6WoMNlSWtDijd587NjqDIBnkp9XV
zQjwIyHOHmVLEIhqGpm447nv3bpjqszaNrIs3bF+9IN0T48uzY8Xp5JOvSxbk8Shvhvsv/
uwIhcVWOqcsl7mTyCiOE3LZvEydrmrGieyuelOky6kdYqkeuoPbMWKS+6jItrw==
ARC-Seal: i=1; s=key1; d=yhetil.org; t=1618361546; a=rsa-sha256; cv=none;
b=NR0we9ry/DLXhNed36tFgQJ9hLXJx32nMl6u4iMdZ3xmDVctHl3eHSpz6zoT2PRHEbPgE8
0TWkJ3ZoecahyLjcc76iABQgXYzJpGTXJKm2eYqEh9tRv8Sz/HBr0Y31JPq29/mdXU4AYj
n67kXZC/x/3wVThiGi/6Gqkt1aWtUdumdi8DzFlLh1phfleKPYumjZEZ/2t0bnBeBwXPBt
I1yfuYVHC2Y9UdW5vACeBQkdObNIDVBhaMACuVKR1W4eZ1FjBsQ3rVkgZSqJZMBgxmqiXq
QUbOKGKU94U50XOewFTbp1fwuginfpaq8xpQPlWOeebz+JW3T+vq3D5wnNzCGA==
ARC-Authentication-Results: i=1;
aspmx1.migadu.com;
dkim=fail ("headers rsa verify failed") header.d=posteo.de header.s=2017 header.b=pgjSaxSu;
dmarc=fail reason="SPF not aligned (strict)" header.from=posteo.de (policy=none);
spf=pass (aspmx1.migadu.com: domain of bug-guix-bounces@gnu.org designates 209.51.188.17 as permitted sender) smtp.mailfrom=bug-guix-bounces@gnu.org
X-Migadu-Spam-Score: 0.26
Authentication-Results: aspmx1.migadu.com;
dkim=fail ("headers rsa verify failed") header.d=posteo.de header.s=2017 header.b=pgjSaxSu;
dmarc=fail reason="SPF not aligned (strict)" header.from=posteo.de (policy=none);
spf=pass (aspmx1.migadu.com: domain of bug-guix-bounces@gnu.org designates 209.51.188.17 as permitted sender) smtp.mailfrom=bug-guix-bounces@gnu.org
X-Migadu-Queue-Id: A13CE1CEBC
X-Spam-Score: 0.26
X-Migadu-Scanner: scn0.migadu.com
X-TUID: 1RD9bVGLtmKX
This is a multi-part message in MIME format.
--------------19D271F7C88F5E149166A96D
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: 8bit
Hi!
I am experiencing a bug when running `guix pull` again. Not sure, whether it is
the same as the previous one, or a different one. This is a different machine
than the previous bug report I sent in. Guix told me to please report it, so
here it goes:
~~~~
$ guix pull
Updating channel 'guix' from Git repository at 'https://git.savannah.gnu.org/git/guix.git'...
Authenticating channel 'guix', commits 9edb3f6 to 4dff6ec (84 new commits)...
Building from this channel:
guix https://git.savannah.gnu.org/git/guix.git 4dff6ec
substitute: updating substitutes from 'https://ci.guix.gnu.org'... 100.0%
downloading from https://ci.guix.gnu.org/nar/lzip/lfjklynfh3kwsx0iwfwcm71y4qf36ww3-compute-guix-derivation ...
compute-guix-derivation 1KiB 108KiB/s 00:00 [##################] 100.0%
substitute: updating substitutes from 'https://ci.guix.gnu.org'... 100.0%
downloading from https://ci.guix.gnu.org/nar/lzip/1qd88064j2iicfnkxf5ylffmvisnsdlw-curl-7.76.0 ...
curl-7.76.0 385KiB 514.2MiB/s 00:00 [##################] 100.0/
substitute: updating substitutes from 'https://ci.guix.gnu.org'... 100.0%
downloading from https://ci.guix.gnu.org/nar/lzip/531rwkb8m6yccq4l1mkrqxclrqwy0jj3-git-minimal-2.31.1 ...
git-minimal-2.31.1 4.1MiB 5.8MiB/s 00:01 [##################] 100.0/
substitute: updating substitutes from 'https://ci.guix.gnu.org'... 100.0%
substitute: updating substitutes from 'https://ci.guix.gnu.org'... 100.0%
substitute: updating substitutes from 'https://ci.guix.gnu.org'... 100.0%
substitute: updating substitutes from 'https://ci.guix.gnu.org'... 100.0%
downloading from https://ci.guix.gnu.org/nar/lzip/kqmxkrw1kzq486ywgbjw74r6rz1cjnxl-guile-avahi-0.4.0-1.6d43caf ...
guile-avahi-0.4.0-1.6d43caf 54KiB 101.3MiB/s 00:00 [##################] 100.0%
downloading from https://ci.guix.gnu.org/nar/lzip/h3mqirjnv5q7qyfkpswyvxhcarsz6is7-guile-git-0.5.0 ...
guile-git-0.5.0 1.13GiB/s 00:00 | 551KiB transferred
Backtrace:
In guix/ui.scm:
2164:12 19 (run-guix-command _ . _)
In guix/scripts/substitute.scm:
652:2 18 (guix-substitute . _)
In unknown file:
17 (with-continuation-barrier #)
In ice-9/boot-9.scm:
1736:10 16 (with-exception-handler _ _ #:unwind? _ # _)
In unknown file:
15 (apply-smob/0 #)
In ice-9/boot-9.scm:
1736:10 14 (with-exception-handler _ _ #:unwind? _ # _)
1736:10 13 (with-exception-handler _ _ #:unwind? _ # _)
1731:15 12 (with-exception-handler # ?)
In guix/scripts/substitute.scm:
701:17 11 (_)
410:7 10 (process-substitution _ "/gnu/store/62hfr56ipl706k17g0?" ?)
In ice-9/boot-9.scm:
1736:10 9 (with-exception-handler _ _ #:unwind? _ # _)
In guix/scripts/substitute.scm:
419:9 8 (_)
In ice-9/boot-9.scm:
1731:15 7 (with-exception-handler # ?)
1669:16 6 (raise-exception _ #:continuable? _)
1667:16 5 (raise-exception _ #:continuable? _)
1669:16 4 (raise-exception _ #:continuable? _)
Backtrace:
15 (primitive-load "/gnu/store/lfjklynfh3kwsx0iwfwcm71y4qf36ww3-compute-guix-derivation")
In ice-9/eval.scm:
155:9 14 (_ _)
159:9 13 (_ #(#(#(#(#(#(#(#(#(#(#(#(#(#(#(#(# ?) ?) ?) ?) ?) ?) ?) ?) ?) ?) ?) ?) ?) ?) ?) ?))
In ice-9/boot-9.scm:
152:2 12 (with-fluid* _ _ _)
152:2 11 (with-fluid* _ _ _)
In ./guix/store.scm:
2066:24 10 (run-with-store # _ #:guile-for-build _ #:system _ #:target _)
1900:8 9 (_ _)
In ./guix/gexp.scm:
256:18 8 (_ _)
1137:2 7 (_ _)
1003:2 6 (_ _)
849:4 5 (_ _)
In ./guix/store.scm:
1948:12 4 (_ #)
1362:5 3 (map/accumulate-builds # _ _)
1373:15 2 (_ # _ _)
719:11 1 (process-stderr # _)
In ./guix/serialization.scm:
80:6 0 (read-int #)
./guix/serialization.scm:80:6: In procedure read-int:
ERROR:
1. &nar-error:
file: #f
port: #
guix pull: error: You found a bug: the program '/gnu/store/lfjklynfh3kwsx0iwfwcm71y4qf36ww3-compute-guix-derivation'
failed to compute the derivation for Guix (version: "4dff6ecde85eec473ab231cf75f51e98e8aca1e9"; system: "x86_64-linux";
host version: "7327295462fccae4ee3e9bf74962c82d3445fec8"; pull-version: 1).
Please report it by email to .
~~~~
This time I already know I can try `guix pull --no-substitutes`. This ran
without error:
~~~~
$ guix pull --no-substitutes
Updating channel 'guix' from Git repository at 'https://git.savannah.gnu.org/git/guix.git'...
Building from this channel:
guix https://git.savannah.gnu.org/git/guix.git 4dff6ec
building /gnu/store/292slsvr461pf4mmxp5pbn7izyrz6j7a-mkdir.drv...
downloading from https://git.savannah.gnu.org/cgit/guix.git/plain/gnu/packages/bootstrap/i686-linux/mkdir?id=44f07d1dc6806e97c4e9ee3e6be883cc59dc666e ...
building /gnu/store/nlfh939ppk5hjqlrg3qa2bggypwv5yga-guile-json-3.5.0.tar.gz.drv...
downloading from http://download.savannah.gnu.org/releases/guile-json/guile-json-3.5.0.tar.gz ...
building /gnu/store/cz47v443jm6nbjsl0256wnj525d9bdxp-guile-lib-0.2.7.tar.gz.drv...
downloading from http://download.savannah.gnu.org/releases/guile-lib/guile-lib-0.2.7.tar.gz ...
building /gnu/store/nb3vkf3xdpzmq332c1g9plw1fbyv5kqc-guile-json-3.5.0.drv...
building /gnu/store/9wsr9qwm40qcm7cxj4zwnn4jqsl28nfw-guile-lib-0.2.7.drv...
- 'check' phasebuild-log 23528 4096
html->shtml "B" #:strict? 'unset)
==> (*TOP* "B")
;; Passed.
(html->shtml "&42;" #:strict? 'unset)
==> (*TOP* "&42;")
;; Passed.
(html->shtml "aaa©bbb&ccc<ddd&>eee*fffϨgggZhhh" #:strict? 'unset)
==> (*TOP* "aaa" (*ENTITY* "additional" "copy") "bbb&ccceee*fff" (*ENTITY* "additional-char" "1000") "gggZhhh")
;; Passed.
(html->shtml "2" #:strict? 'unset)
==> (*TOP* (img (@ (src "http://pics.ebay.com/aw/pics/listings/ebayLogo_38x16.gif") (border "0") (width "38") (height "16") (hspace "5") (vspace "0"))) "2")
;; Passed.
(html->shtml "eee" #:strict? 'unset)
==> (*TOP* (aaa (@ (bbb "ccc") (ddd)) "eee"))
;; Passed.
(html->shtml "eee" #:strict? 'unset)
==> (*TOP* (aaa (@ (bbb "ccc") (ddd)) "eee"))
;; Passed.
(html->shtml "My TitleThis is a bold-italic test of broken HTML.
Yes it is." #:strict? 'unset)
==> (*TOP* (html (head (title "My Title")) (body (@ (bgcolor "white") (foo "42")) "This is a " (b (i "bold-italic")) " test of " "broken HTML." (br) "Yes it is.")))
;; Passed.
(html->shtml "" #:strict? 'unset)
==> (*TOP* (*DECL* DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd"))
;; Passed.
(html->shtml "" #:strict? 'unset)
==> (*TOP* (html (@ (xmlns "http://www.w3.org/1999/xhtml") (lang "en") (lang "en"))))
;; Passed.
(html->shtml "FrobnosticationMoved to here." #:strict? 'unset)
==> (*TOP* (html (@ (xmlns:html "http://www.w3.org/TR/REC-html40")) (head (title "Frobnostication")) (body (p "Moved to " (a (@ (href "http://frob.com")) "here.")))))
;; Passed.
(html->shtml "Layman, A33BCheck Status1997-05-24T07:55:00+1" #:strict? 'unset)
==> (*TOP* (reservation (@ (xmlns:HTML "http://www.w3.org/TR/REC-html40")) (name (@ (class "largeSansSerif")) "Layman, A") (seat (@ (class "Y") (class "largeMonotype")) "33B") (a (@ (href "/cgi-bin/ResStatus")) "Check Status") (departure "1997-05-24T07:55:00+1")))
;; Passed.
(html->shtml "whateverlinkBLah italic bold ened still < bold
But not done yet..." #:strict? 'unset)
==> (*TOP* (html (head (title) (title "whatever")) (body (a (@ (href "url")) "link") (p (@ (align "center")) (ul (@ (compact) (style "aa")))) (p "BLah" (*COMMENT* " comment ") " " (i " italic " (b " bold " (tt " ened "))) " still < bold ")) (p " But not done yet...")))
;; Passed.
(html->shtml "" #:strict? 'unset)
==> (*TOP* (*PI* xml "version=\"1.0\" encoding=\"UTF-8\""))
;; Passed.
(html->shtml "" #:strict? 'unset)
==> (*TOP* (*PI* php "php_info(); "))
;; Passed.
(html->shtml " (*TOP* (*PI* php "php_info(); ?"))
;; Passed.
(html->shtml " (*TOP* (*PI* php "php_info(); "))
;; Passed.
(html->shtml " blort ?>" #:strict? 'unset)
==> (*TOP* (*PI* foo "bar ? baz > blort "))
;; Passed.
(html->shtml "x" #:strict? 'unset)
==> (*TOP* (*PI* foo "b") "x")
;; Passed.
(html->shtml "x" #:strict?@ build-log 23528 4090
'unset)
==> (*TOP* (*PI* foo "") "x")
;; Passed.
(html->shtml "x" #:strict? 'unset)
==> (*TOP* (*PI* foo "") "x")
;; Passed.
(html->shtml "x" #:strict? 'unset)
==> (*TOP* (*PI* foo "") "x")
;; Passed.
(html->shtml "x" #:strict? 'unset)
==> (*TOP* (*PI* f "") "x")
;; Passed.
(html->shtml "?>x" #:strict? 'unset)
==> (*TOP* (*PI* #f "") "x")
;; Passed.
(html->shtml ">x" #:strict? 'unset)
==> (*TOP* (*PI* #f ">x"))
;; Passed.
(html->shtml "blort" #:strict? 'unset)
==> (*TOP* (foo (@ (bar "baz")) "blort"))
;; Passed.
(html->shtml "blort" #:strict? 'unset)
==> (*TOP* (foo (@ (bar "baz")) "blort"))
;; Passed.
(html->shtml "blort" #:strict? 'unset)
==> (*TOP* (foo (@ (bar "baz'>blort"))))
;; Passed.
(html->shtml " (*TOP* (foo (@ (bar "baz\">blort"))))
;; Passed.
(html->shtml "A
B
" #:strict? 'unset)
==> (*TOP* (p "A") (script "line0 <\n" "line1\n" "") (p "B"))
;; Passed.
(html->shtml "acd" #:strict? 'unset)
==> (*TOP* (xmp "ac") "d")
;; Passed.
(html->shtml "acd" #:strict? 'unset)
==> (*TOP* (xmp "ac") "d")
;; Passed.
(html->shtml "acd" #:strict? 'unset)
==> (*TOP* (xmp "ac") "d")
;; Passed.
(html->shtml "acd" #:strict? 'unset)
==> (*TOP* (xmp "ac") "d")
;; Passed.
(html->shtml "acd" #:strict? 'unset)
==> (*TOP* (xmp "ac") "d")
;; Passed.
(html->shtml "acd" #:strict? 'unset)
==> (*TOP* (xmp "ac") "d")
;; Passed.
(html->shtml "acd" #:strict? 'unset)
==> (*TOP* (xmp "ac") "d")
;; Passed.
(html->shtml "acd" #:strict? 'unset)
==> (*TOP* (xmp "ac") "d")
;; Passed.
(html->shtml "a b>cd" #:strict? 'unset)
==> (*TOP* (xmp "a b>c") "d")
;; Passed.
(html->shtml "a b >cd" #:strict? 'unset)
==> (*TOP* (xmp "a b >c") "d")
;; Passed.
(html->shtml "acd" #:strict? 'unset)
==> (*TOP* (xmp "ac") "d")
;; Passed.
(html->shtml "acd" #:strict? 'unset)
==> (*TOP* (xmp "ac") "d")
;; Passed.
(html->shtml "acd" #:strict? 'unset)
==> (*TOP* (xmp "ac") "d")
;; Passed.
(html->shtml "acd" #:strict? 'unset)
==> (*TOP* (xmp "ac") "d")
;; Passed.
(html->shtml "acd" #:strict? 'unset)
==> (*TOP* (xmp "ac") "d")
;; Passed.
(html->shtml "acd" #:strict? 'unset)
==> (*TOP* (xmp "ac") "d")
;; Passed.
(html->shtml "real1
\n\nalpha\nfake
\nbravo\nreal2
" #:strict? 'unset)
==> (*TOP* (p "real1") "\n" (xmp "\n" "alpha\n" "fake
\n" "bravo\n") (p "real2"))
;; Passed.
(html->shtml "real1
\n\nalpha\nfake
\nbravo\nreal2
" #:strict? 'unset)
==> (*TOP* (p "real1") "\n" (xmp "\n" "alpha\n" "fake
\n" "bravo\n") (p "real2"))
;; Passed.
(html->shtml "ax" #:strict? 'unset)
==> (*TOP* (xmp "a") "x")
;; Passed.
(html->shtml "a\nx" #:strict? 'unset)
==> (*TOP* (xmp "a\n") "x")
;; Passed.
(html->shtml "x" #:strict? 'unset)
==> (*TOP* (xmp) "x")
;; Passed.
(html->shtml "a (*TOP* (xmp "a"))
;; Passed.
(html->shtml "a (*TOP* (xmp "ashtml "a (*TOP* (xmp "ashtml "a" #:strict? 'unset)
==> (*TOP* (xmp "a"))
;; Passed.
(html->shtml "a<" #:strict? 'unset)
==> (*TOP* (xmp "a<"))
;; Passed.
(html->shtml "a" #:strict? 'unset)
==> (*TOP* (xmp "a"))
;; Passed.
(html->shtml "" #:strict? 'unset)
==> (*TOP* (xmp))
;; Passed.
(html->shtml " (*TOP* (xmp))
;; Passed.
(html->shtml " (*TOP* (xmp (@ (x "42"))))
;; Passed.
(html->shtml "-suite ------------------------
Running test case: test-all
1 run, 0 failed
strict? 'unset)
==> (*TOP* (xmp (@ (x))))
;; Passed.
(html->shtml " (*TOP* (xmp (@ (x))))
;; Passed.
(html->shtml "