From cacb200eff810483aba9ae055bdefe751e124a53 Mon Sep 17 00:00:00 2001
From: Araq <rumpf_a@web.de>
Date: Wed, 2 Nov 2011 02:47:34 +0100
Subject: [PATCH] fixes #2

---
 compiler/sigmatch.nim              | 4 +++-
 tests/accept/compile/trectuple.nim | 3 ---
 2 files changed, 3 insertions(+), 4 deletions(-)

diff --git a/compiler/sigmatch.nim b/compiler/sigmatch.nim
index fac7815d10..16a93f47fe 100755
--- a/compiler/sigmatch.nim
+++ b/compiler/sigmatch.nim
@@ -172,7 +172,9 @@ proc minRel(a, b: TTypeRelation): TTypeRelation =
   
 proc tupleRel(mapping: var TIdTable, f, a: PType): TTypeRelation = 
   result = isNone
-  if sonsLen(a) == sonsLen(f): 
+  if sameType(f, a):
+    result = isEqual
+  elif sonsLen(a) == sonsLen(f): 
     result = isEqual
     for i in countup(0, sonsLen(f) - 1): 
       var m = typeRel(mapping, f.sons[i], a.sons[i])
diff --git a/tests/accept/compile/trectuple.nim b/tests/accept/compile/trectuple.nim
index f60fe28413..4d5febbfad 100755
--- a/tests/accept/compile/trectuple.nim
+++ b/tests/accept/compile/trectuple.nim
@@ -1,6 +1,3 @@
-discard """
-  disabled: true
-"""
 
 type
     PNode = ref TNode