Added ResponseCollection::prev().

Author: boenrobot

RELEASE-1.0.0b2

@@ -4,7 +4,7 @@ A lot of new conviniences and a few bug fixes.
 * Added support for CLI argument syntax at Request constructor.
 * Added optional arguments to request constructor for a tag and a query.
 * Added Communicator::isSeekableStream() and made Communicator::sendWordFromStream() use it.
-* Added ResponseCollection::end().
+* Added ResponseCollection::prev() and ResponseCollection::end().
 * Changed the default value of the $value of Message::setArgument from NULL to an empty string.
 * Changed ResponseCollection::getLast() to return FALSE when the collection is empty.
 * Changed Request::setArgument() so that any invalid value is casted to string.

src/PEAR2/Net/RouterOS/ResponseCollection.php

@@ -219,6 +219,18 @@ public function current()
         return $this->valid() ? $this->responses[$this->position] : false;
     }
 
+    /**
+     * Moves the pointer backwards by 1, and gets the previous response.
+     * 
+     * @return Response The next {@link Response} object, or FALSE if the
+     * position is not valid.
+     */
+    public function prev()
+    {
+        --$this->position;
+        return $this->current();
+    }
+
     /**
      * Moves the pointer to the last valid position, and returns the last
      * response.

tests/ClientFeaturesTest.php

@@ -34,6 +34,12 @@ public function testSendSyncReturningCollection()
             __NAMESPACE__ . '\Response', $list->end(),
             'The list is empty'
         );
+        $this->assertEquals(Response::TYPE_FINAL, $list->current()->getType());
+        $this->assertInstanceOf(
+            __NAMESPACE__ . '\Response', $list->prev(),
+            'The list is empty'
+        );
+        $this->assertEquals(Response::TYPE_DATA, $list->current()->getType());
     }
 
     public function testSendSyncReturningCollectionWithStreams()