diff --git a/src/vmm_ring.ml b/src/vmm_ring.ml
index f780e29..ac7efa9 100644
--- a/src/vmm_ring.ml
+++ b/src/vmm_ring.ml
@@ -9,7 +9,7 @@ type 'a t = {
 }
 
 let create ?(size = 1024) neutral () =
-  { data = Array.make 1024 (Ptime.min, neutral)  ; write = 0 ; size }
+  { data = Array.make size (Ptime.min, neutral) ; write = 0 ; size }
 
 let inc t = (succ t.write) mod t.size