From 4caaeaef147f2a0f0dfa0287b8b398ff697aa10a Mon Sep 17 00:00:00 2001
From: Mark Olesen <Mark.Olesen@Germany>
Date: Thu, 9 Oct 2008 16:15:38 +0200
Subject: [PATCH] added test/xfer with lists

---
 applications/test/xfer/Make/files     |  4 ++
 applications/test/xfer/Make/options   |  0
 applications/test/xfer/xferListTest.C | 88 +++++++++++++++++++++++++++
 3 files changed, 92 insertions(+)
 create mode 100644 applications/test/xfer/Make/files
 create mode 100644 applications/test/xfer/Make/options
 create mode 100644 applications/test/xfer/xferListTest.C

diff --git a/applications/test/xfer/Make/files b/applications/test/xfer/Make/files
new file mode 100644
index 0000000000..92414c039e
--- /dev/null
+++ b/applications/test/xfer/Make/files
@@ -0,0 +1,4 @@
+xferListTest.C
+
+/* EXE = $(FOAM_USER_APPBIN)/xferListTest */
+EXE = ./xferListTest
diff --git a/applications/test/xfer/Make/options b/applications/test/xfer/Make/options
new file mode 100644
index 0000000000..e69de29bb2
diff --git a/applications/test/xfer/xferListTest.C b/applications/test/xfer/xferListTest.C
new file mode 100644
index 0000000000..6fce6b2bd0
--- /dev/null
+++ b/applications/test/xfer/xferListTest.C
@@ -0,0 +1,88 @@
+/*---------------------------------------------------------------------------*\
+  =========                 |
+  \\      /  F ield         | OpenFOAM: The Open Source CFD Toolbox
+   \\    /   O peration     |
+    \\  /    A nd           | Copyright (C) 1991-2008 OpenCFD Ltd.
+     \\/     M anipulation  |
+-------------------------------------------------------------------------------
+License
+    This file is part of OpenFOAM.
+
+    OpenFOAM 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.
+
+    OpenFOAM 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.
+
+    You should have received a copy of the GNU General Public License
+    along with OpenFOAM; if not, write to the Free Software Foundation,
+    Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
+
+Application
+
+Description
+
+\*---------------------------------------------------------------------------*/
+
+#include "OSspecific.H"
+
+#include "IOstreams.H"
+#include "IStringStream.H"
+#include "labelList.H"
+
+using namespace Foam;
+
+// * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
+//  Main program:
+
+int main(int argc, char *argv[])
+{
+    List<label> lstA(10);
+    List<label> lstC(IStringStream("(1 2 3 4)")());
+    
+    forAll(lstA, i)
+    {
+        lstA[i] = i;
+    }
+        
+    Info<< "lstA: " << lstA << endl;
+    Info<< "lstC: " << lstC << endl;
+
+    xfer<List<label> > xA(lstA, true);
+    xfer<List<label> > xB;
+
+//    List<label> lstB( xferTmp(List<label>, lstC) );
+//    List<label> lstB( xfer<List<label> >(lstC) );
+    List<label> lstB( xA );
+
+    Info<< "xA: " << *xA << endl;
+    Info<< "xB: " << *xB << endl;
+    Info<< "lstA: " << lstA << endl;
+    Info<< "lstB: " << lstB << endl;
+    Info<< "lstC: " << lstC << endl;
+
+    xA = lstB;
+
+    Info<< "xA: " << *xA << endl;
+    Info<< "xB: " << *xB << endl;
+    Info<< "lstA: " << lstA << endl;
+    Info<< "lstB: " << lstB << endl;
+    Info<< "lstC: " << lstC << endl;
+
+    xB = xA;
+
+    Info<< "xA: " << *xA << endl;
+    Info<< "xB: " << *xB << endl;
+    Info<< "lstA: " << lstA << endl;
+    Info<< "lstB: " << lstB << endl;
+    Info<< "lstC: " << lstC << endl;
+
+    return 0;
+}
+
+
+// ************************************************************************* //