.

wcfs/wcfs_test.py

@@ -1000,10 +1000,16 @@ def test_wcfs():
             " head/at (@%s); …" % (h(zf._p_oid), h(atpast), h(t.head)))
     wl.close()
 
-    # some watch requests with explicit pinok
-    # XXX
+    # some watch requests with explicit pinok (also partly verifies how
+    # tWatchLink.watch computes automatic pinok)
+    wl = t.openwatch()
+    # XXX check @at0 ?
+    wl.watch(zf, at1, {2: at1, 3: at0})     #     -> at1 (new watch)    XXX at0 -> ø (blk3 was hole)?
+    wl.watch(zf, at2, {2: at2, 3: None})    # at1 -> at2
+    wl.watch(zf, at3, {2: None})            # at2 -> at3 (current head)
+    wl.close()
 
-    # valid watch requests going at_i -> at_j -> ... with automatic pinok
+    # all valid watch requests going at_i -> at_j -> ... with automatic pinok
     for zf in t.zfiles():
         for revv in t.iter_revv():
             print('\n--------')