From 66c0403ffd55a8ad23f6479fd291c2baf34acc1b Mon Sep 17 00:00:00 2001
From: Mike J Innes <mike.j.innes@gmail.com>
Date: Tue, 6 Jun 2017 17:15:29 +0100
Subject: [PATCH] seq rpad

---
 src/Batches/batch.jl | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/src/Batches/batch.jl b/src/Batches/batch.jl
index 95552786..8fad62a6 100644
--- a/src/Batches/batch.jl
+++ b/src/Batches/batch.jl
@@ -35,3 +35,6 @@ Seq(xs) = Seq(Storage(xs))
 Seq{T,S}(xs) where {T,S} = Seq{T,S}(Storage{T,S}(xs))
 
 storage(s::Seq) = s.data
+
+Base.rpad{T}(xs::Seq{T}, n::Integer, x::T) =
+  n-length(xs) ≤ 0 ? xs : vcat(xs, typeof(xs)(repeated(x, n-length(xs))))