.upptst

git-svn-id: svn://ultimatepp.org/upp/trunk@6338 f0d560ea-af0d-0410-9eb7-867de7ffcac7

upptst/ScalarDate/ScalarDate.cpp

@@ -0,0 +1,21 @@
+#include <Core/Core.h>
+
+using namespace Upp;
+
+CONSOLE_APP_MAIN
+{
+	Date d;
+	
+	d.Set(Null);
+	ASSERT(IsNull(d));
+	
+	d.Set(0);
+	ASSERT(d == Date(0, 1, 1));
+	
+	for(int i = 0; i < 800000; i++) {
+		d.Set(i);
+		Date d1 = d;
+		d.Set(d.Get());
+		ASSERT(d1 == d);
+	}
+}

upptst/ScalarDate/ScalarDate.upp

@@ -0,0 +1,9 @@
+uses
+	Core;
+
+file
+	ScalarDate.cpp;
+
+mainconfig
+	"" = "SSE2";
+

upptst/ScalarDate/init

@@ -0,0 +1,4 @@
+#ifndef _ScalarDate_icpp_init_stub
+#define _ScalarDate_icpp_init_stub
+#include "Core/init"
+#endif