From aeab9e40832dcfced9b011f5d07b06280ce83ca2 Mon Sep 17 00:00:00 2001
From: cxl <cxl@f0d560ea-af0d-0410-9eb7-867de7ffcac7>
Date: Thu, 13 Nov 2014 11:06:16 +0000
Subject: [PATCH] .reference

git-svn-id: svn://ultimatepp.org/upp/trunk@7887 f0d560ea-af0d-0410-9eb7-867de7ffcac7
---
 reference/Tuple/Tuple.cpp | 32 ++++++++++++++++++++++++++++++++
 reference/Tuple/Tuple.upp | 11 +++++++++++
 reference/Tuple/init      |  4 ++++
 3 files changed, 47 insertions(+)
 create mode 100644 reference/Tuple/Tuple.cpp
 create mode 100644 reference/Tuple/Tuple.upp
 create mode 100644 reference/Tuple/init

diff --git a/reference/Tuple/Tuple.cpp b/reference/Tuple/Tuple.cpp
new file mode 100644
index 000000000..9a2f89999
--- /dev/null
+++ b/reference/Tuple/Tuple.cpp
@@ -0,0 +1,32 @@
+#include <Core/Core.h>
+
+using namespace Upp;
+
+CONSOLE_APP_MAIN
+{
+	StdLogSetup(LOG_COUT|LOG_FILE);
+
+	Tuple2<int, String> x = Tuple(12, (const char *)"hello");
+	
+	DUMP(x.a);
+	DUMP(x.b);
+	DUMP(x);
+	
+	Tuple2<int, String> y = Tuple<int, String>(13, "hello");
+	
+	DUMP(x == y);
+	y.a = 13;
+	DUMP(x == y);
+	
+	int i; String s;
+	Tie(i, s) = x;
+	DUMP(i);
+	DUMP(s);
+	
+	Index< Tuple2<int, String> > ndx;
+	ndx.Add(x);
+	ndx.Add(y);
+	
+	DDUMP(ndx.Find(x));
+	DDUMP(ndx.Find(y));
+}
diff --git a/reference/Tuple/Tuple.upp b/reference/Tuple/Tuple.upp
new file mode 100644
index 000000000..f59af48fe
--- /dev/null
+++ b/reference/Tuple/Tuple.upp
@@ -0,0 +1,11 @@
+description "Demonstrates Tuple and Tie\377";
+
+uses
+	Core;
+
+file
+	Tuple.cpp;
+
+mainconfig
+	"" = "SSE2";
+
diff --git a/reference/Tuple/init b/reference/Tuple/init
new file mode 100644
index 000000000..906e2783e
--- /dev/null
+++ b/reference/Tuple/init
@@ -0,0 +1,4 @@
+#ifndef _Tuple_icpp_init_stub
+#define _Tuple_icpp_init_stub
+#include "Core/init"
+#endif