From 0859667a8c884cbb1e3c9444136376af45d7610d Mon Sep 17 00:00:00 2001
From: Badlop <badlop@process-one.net>
Date: Tue, 21 Dec 2010 01:04:52 +0100
Subject: [PATCH] Fix Type definition

---
 src/gen_storage.erl | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/src/gen_storage.erl b/src/gen_storage.erl
index 541bcd776..0d6b1a58c 100644
--- a/src/gen_storage.erl
+++ b/src/gen_storage.erl
@@ -200,9 +200,11 @@ dirty_read(Host, Tab, Key) ->
 
 %% select/3
 
+%% If Matchvalue is a tuple, then its size must be == length(string:tokens(Matchrule, "_"))
 -type(matchvalue() :: '_'
 		      | integer()
-		      | string()).
+		      | string()
+		      | tuple()).
 %%                    | {matchvalue(), matchrule()}.
 -type(matchrule() :: {'and', matchrule(), matchrule()}
 		     | {'andalso', matchrule(), matchrule()}