From 34df1a6ec232291fbe6cb572e9b110795db7d45c Mon Sep 17 00:00:00 2001
From: minima <minima>
Date: Sun, 15 Jan 2006 20:19:50 +0000
Subject: [PATCH] comment up the array slots

---
 perl/RingBuf.pm | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/perl/RingBuf.pm b/perl/RingBuf.pm
index 82b534e4..e9b1052a 100644
--- a/perl/RingBuf.pm
+++ b/perl/RingBuf.pm
@@ -21,6 +21,13 @@ sub new
 {
 	my $pkg = shift;
 	my $size = shift;
+
+	# 0 - size
+	# 1 - lth
+	# 2 - end
+	# 3 - start
+	# 4 - pos
+	# 5 - buffer []
 	return bless [$size, 0, 0, 0, 0, []], (ref $pkg || $pkg);
 }
 
-- 
2.34.1