From: Mark Wooding <mdw@distorted.org.uk>
Date: Sat, 29 Mar 2025 17:52:09 +0000 (+0000)
Subject: @@@ test top
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/xyla/commitdiff_plain/1d630f0508f3d9a863081e02d1fa62e375aae261

@@@ test top
---

diff --git a/t/avl-commontest.ref b/t/avl-commontest.ref
index 8ed8ee7..c652742 100644
--- a/t/avl-commontest.ref
+++ b/t/avl-commontest.ref
@@ -73,8 +73,16 @@ right
 #<node #0x00000017 5>
 root
 (nil)
+(#<link root -> node #0x00000017 5>)
+3
+root
+(#<link root -> node #0x00000017 5>)
 (#<link root -> (nil)>)
 0
+(#<link root -> (nil)>)
+0
+(#<link root -> node #0x0000001d 1>)
+0
 (#<link root -> node #0x0000001d 1>)
 0
 
diff --git a/t/commontest.in b/t/commontest.in
index dfdea9e..2268141 100644
--- a/t/commontest.in
+++ b/t/commontest.in
@@ -30,8 +30,9 @@ j
 10@p^ <p^
 
 6@ rlp un un un un un
+tp^ up
 
-=_ [p^ 1+ [p^
+=_ tp^ [p^ 1+ tp^ [p^
 )
 
 :
diff --git a/t/rb-commontest.ref b/t/rb-commontest.ref
index 9f4b630..7a34b4a 100644
--- a/t/rb-commontest.ref
+++ b/t/rb-commontest.ref
@@ -73,8 +73,16 @@ right
 #<node #0x00000017 5>
 root
 (nil)
+(#<link root -> node #0x00000017 5>)
+3
+root
+(#<link root -> node #0x00000017 5>)
 (#<link root -> (nil)>)
 0
+(#<link root -> (nil)>)
+0
+(#<link root -> node #0x0000001d 1>)
+0
 (#<link root -> node #0x0000001d 1>)
 0
 
diff --git a/t/splay-commontest.ref b/t/splay-commontest.ref
index b92a672..6c91e8d 100644
--- a/t/splay-commontest.ref
+++ b/t/splay-commontest.ref
@@ -73,8 +73,16 @@ right
 #<node #0x0000001a 5>
 root
 (nil)
+(#<link root -> node #0x0000001a 5>)
+3
+root
+(#<link root -> node #0x0000001a 5>)
 (#<link root -> (nil)>)
 0
+(#<link root -> (nil)>)
+0
+(#<link root -> node #0x0000001d 1>)
+0
 (#<link root -> node #0x0000001d 1>)
 0
 
diff --git a/t/treap-commontest.ref b/t/treap-commontest.ref
index cd15ea8..6f00069 100644
--- a/t/treap-commontest.ref
+++ b/t/treap-commontest.ref
@@ -73,8 +73,16 @@ right
 #<node #0x0000001c 2>
 root
 (nil)
+(#<link root -> node #0x0000001c 2>)
+1
+root
+(#<link root -> node #0x0000001c 2>)
 (#<link root -> (nil)>)
 0
+(#<link root -> (nil)>)
+0
+(#<link root -> node #0x0000001d 1>)
+0
 (#<link root -> node #0x0000001d 1>)
 0