From: minima <minima>
Date: Sun, 15 Jan 2006 20:19:50 +0000 (+0000)
Subject: comment up the array slots
X-Git-Tag: R_1_52~20
X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=commitdiff_plain;h=04558e33b866262fe7a7f4dbb26d5f98650cc8c4;p=spider.git

comment up the array slots
---

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);
 }