From 7905926c413e843d9497948cb824059f2c017f6a Mon Sep 17 00:00:00 2001
From: jsdelfino <jsdelfino@13f79535-47bb-0310-9956-ffa450edef68>
Date: Mon, 26 Aug 2013 03:04:23 +0000
Subject: Support sorting database search results by rank, and add a rank
 attribute to ATOM entries.

git-svn-id: http://svn.us.apache.org/repos/asf/tuscany@1517412 13f79535-47bb-0310-9956-ffa450edef68
---
 sca-cpp/trunk/kernel/kernel-test.cpp | 16 +++++++++++++++-
 1 file changed, 15 insertions(+), 1 deletion(-)

(limited to 'sca-cpp/trunk/kernel/kernel-test.cpp')

diff --git a/sca-cpp/trunk/kernel/kernel-test.cpp b/sca-cpp/trunk/kernel/kernel-test.cpp
index 5d8b8039b4..a880320ca1 100644
--- a/sca-cpp/trunk/kernel/kernel-test.cpp
+++ b/sca-cpp/trunk/kernel/kernel-test.cpp
@@ -477,6 +477,19 @@ const bool testAppend() {
     return true;
 }
 
+const bool testSublist() {
+    assert(listHead(mklist(1, 2), 0) == list<int>());
+    assert(listHead(mklist(1, 2), 1) == mklist(1));
+    assert(listHead(mklist(1, 2), 2) == mklist(1, 2));
+    assert(listHead(mklist(1, 2), 3) == mklist(1, 2));
+
+    assert(listTail(mklist(1, 2), 0) == mklist(1, 2));
+    assert(listTail(mklist(1, 2), 1) == mklist(2));
+    assert(listTail(mklist(1, 2), 2) == list<int>());
+    assert(listTail(mklist(1, 2), 3) == list<int>());
+    return true;
+}
+
 class Complex {
 public:
     Complex() : x(0), y(0) {
@@ -675,7 +688,7 @@ const double testSeqMap(const double x) {
     return x;
 }
 
-double testSeqReduce(unused const double v, const double accum) {
+double testSeqReduce(const double accum, unused const double v) {
     return accum + 1.0;
 }
 
@@ -956,6 +969,7 @@ int main() {
     tuscany::testEquals();
     tuscany::testLength();
     tuscany::testAppend();
+    tuscany::testSublist();
     tuscany::testComplex();
     tuscany::testMap();
     tuscany::testReduce();
-- 
cgit v1.2.3