X-Git-Url: https://git.pterodactylus.net/?a=blobdiff_plain;f=ETL%2Ftest%2Fvalue.cpp;fp=ETL%2Ftest%2Fvalue.cpp;h=bf01490c369c0b637ef0641b5674cb9233ce0087;hb=a095981e18cc37a8ecc7cd237cc22b9c10329264;hp=0000000000000000000000000000000000000000;hpb=9459638ad6797b8139f1e9f0715c96076dbf0890;p=synfig.git

diff --git a/ETL/test/value.cpp b/ETL/test/value.cpp
new file mode 100644
index 0000000..bf01490
--- /dev/null
+++ b/ETL/test/value.cpp
@@ -0,0 +1,119 @@
+/*! ========================================================================
+** Extended Template and Library Test Suite
+** Generic Value Test
+** $Id$
+**
+** Copyright (c) 2002 Adrian Bentley
+**
+** This package is free software; you can redistribute it and/or
+** modify it under the terms of the GNU General Public License as
+** published by the Free Software Foundation; either version 2 of
+** the License, or (at your option) any later version.
+**
+** This package is distributed in the hope that it will be useful,
+** but WITHOUT ANY WARRANTY; without even the implied warranty of
+** MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+** General Public License for more details.
+**
+** === N O T E S ===========================================================
+**
+** ========================================================================= */
+
+/* === H E A D E R S ======================================================= */
+
+#include <ETL/value>
+#include <stdio.h>
+
+/* === M A C R O S ========================================================= */
+
+using namespace etl;
+
+/* === C L A S S E S ======================================================= */
+
+/* === P R O C E D U R E S ================================================= */
+
+/* === E N T R Y P O I N T ================================================= */
+
+struct stupidv
+{
+	float x,y;
+
+	stupidv(float xin=0, float yin=0) :x(xin),y(yin) {}
+	void print() const
+	{
+		printf("(x=%f,y=%f)\n",x,y);
+	}
+};
+
+struct stupidp
+{
+	float z,w;
+
+	stupidp(float zin=0, float win=0) :z(zin),w(win) {}
+
+	void print() const
+	{
+		printf("(z=%f,w=%f)\n",z,w);
+	}
+};
+
+template <>
+class etl::value_store_type<stupidp>
+{
+	typedef stupidv	value_type;
+};
+
+int main()
+{
+	try
+	{
+	value	v(10.0); //construction
+	value	v2;		 //default construct...
+
+	//get type...
+	printf("type of 10.0: %s\n", v.type().name());
+
+	v2 = 1; //assignment
+	printf("type of 1: %s\n", v2.type().name());
+
+	//extract int test
+
+	int *pi = value_cast<int>(&v2);
+	printf("v2 is an int(%p)\n", pi);
+	printf("	%d\n", value_cast<int>(v2));
+
+	printf("	const version: %d\n", value_cast<int>(value(5)));
+
+	v = 'c'; //assignment again...
+	printf("type of c: %s\n", v.type().name());
+
+	v2 = v; //value assignment
+	printf("type of v2 , v: %s , %s\n", v2.type().name(), v.type().name());
+
+	//random type test
+	v = stupidv(0,1);
+	printf("type of vec: %s\n", v.type().name());
+
+	//type cast with binary change test
+	value_cast<stupidp>(&v)->print();
+	value_cast<stupidv>(stupidp(5,10)).print(); //copy test
+
+	printf("type of v: %s\n", v.type().name());
+	printf("type of v2: %s\n", v2.type().name());
+	v.swap(v2);
+	printf("type of v: %s\n", v.type().name());
+	printf("type of v2: %s\n", v2.type().name());
+
+	// test the exception throwing...
+	value_cast<int>(stupidp(6,66));
+
+	}catch(const etl::bad_value_cast &e)
+	{
+		printf("	Exploded: %s\n",e.what());
+	}catch(...)
+	{
+		printf("	Exploded\n");
+	}
+
+	return 0;
+}