Support count argument for [p and ]p

Part of #795

src/selectors.cc

@@ -558,7 +558,10 @@ select_paragraph(const Context& context, const Selection& selection,
 {
     auto& buffer = context.buffer();
     BufferIterator first = buffer.iterator_at(selection.cursor());
+    BufferIterator last;
 
+    for (++count; count > 0; --count)
+    {
         if (not (flags & ObjectFlags::ToEnd) and first.coord() > BufferCoord{0,1} and
             is_eol(*(first-1)) and first-1 != buffer.begin() and is_eol(*(first-2)))
             --first;
@@ -566,8 +569,8 @@ select_paragraph(const Context& context, const Selection& selection,
                  first != buffer.begin() and (first+1) != buffer.end() and
                  is_eol(*(first-1)) and is_eol(*first))
             ++first;
-
-    BufferIterator last = first;
+        if (last == BufferIterator{})
+            last = first;
 
         if ((flags & ObjectFlags::ToBegin) and first != buffer.begin())
         {
@@ -604,6 +607,7 @@ select_paragraph(const Context& context, const Selection& selection,
             }
             --last;
         }
+    }
     return (flags & ObjectFlags::ToEnd) ? Selection{first.coord(), last.coord()}
                                         : Selection{last.coord(), first.coord()};
 }

test/normal/object/end-extending/paragraph/count/cmd

@@ -0,0 +1 @@
+2}p

test/normal/object/end-extending/paragraph/count/in

@@ -0,0 +1,7 @@
+%(a
+b)
+
+c
+d
+
+e

test/normal/object/end-extending/paragraph/count/kak_quoted_selections

@@ -0,0 +1,7 @@
+'a
+b
+
+c
+d
+
+'

test/normal/object/end/paragraph/count/cmd

@@ -0,0 +1 @@
+2]p

test/normal/object/end/paragraph/count/in

@@ -0,0 +1,7 @@
+%(a)
+b
+
+c
+d
+
+e

test/normal/object/end/paragraph/count/kak_quoted_selections

@@ -0,0 +1,7 @@
+'a
+b
+
+c
+d
+
+'

test/normal/object/end/paragraph/to-buffer-end/cmd

@@ -0,0 +1 @@
+9]p

test/normal/object/end/paragraph/to-buffer-end/in

@@ -0,0 +1,4 @@
+%(a)
+b
+
+c

test/normal/object/end/paragraph/to-buffer-end/kak_quoted_selections

@@ -0,0 +1,5 @@
+'a
+b
+
+c
+'

test/normal/object/start-extending/paragraph/count/cmd

@@ -0,0 +1 @@
+<a-;>2{p

test/normal/object/start-extending/paragraph/count/in

@@ -0,0 +1,7 @@
+a
+
+b
+
+c
+%(d
+e)

test/normal/object/start-extending/paragraph/count/kak_quoted_selections

@@ -0,0 +1,5 @@
+'b
+
+c
+d
+e'

test/normal/object/start/paragraph/count/cmd

@@ -0,0 +1 @@
+2[p

test/normal/object/start/paragraph/count/in

@@ -0,0 +1,8 @@
+a
+
+b
+c
+
+d
+%(e)
+f

test/normal/object/start/paragraph/count/kak_quoted_selections

@@ -0,0 +1,5 @@
+'b
+c
+
+d
+e'