htmlpurifier/tests/HTMLPurifier/ZipperTest.php

<?php

class HTMLPurifier_ZipperTest extends HTMLPurifier_Harness
{
    public function testBasicNavigation() {
        list($z, $t) = HTMLPurifier_Zipper::fromArray(array(0,1,2,3));
        $this->assertIdentical($t, 0);
        $t = $z->next($t);
        $this->assertIdentical($t, 1);
        $t = $z->prev($t);
        $this->assertIdentical($t, 0);
        $t = $z->advance($t, 2);
        $this->assertIdentical($t, 2);
        $t = $z->delete();
        $this->assertIdentical($t, 3);
        $z->insertBefore(4);
        $z->insertAfter(5);
        $this->assertIdentical($z->toArray($t), array(0,1,4,3,5));
        list($old, $t) = $z->splice($t, 2, array(6,7));
        $this->assertIdentical($old, array(3,5));
        $this->assertIdentical($t, 6);
        $this->assertIdentical($z->toArray($t), array(0,1,4,6,7));
    }

    // ToDo: QuickCheck style test comparing with array_splice
}