1 files changed, 60 insertions, 0 deletions
diff --git a/test/src/test-predicates.cpp b/test/src/test-predicates.cpp
new file mode 100644
index 0000000..73c37dc
--- /dev/null
+++ b/test/src/test-predicates.cpp
@@ -0,0 +1,60 @@
+#define protected public
+#include "uscxml/Interpreter.h"
+#undef protected
+
+int main(int argc, char** argv) {
+  if (argc != 2) {
+    std::cerr << "Expected path to test-predicates.scxml" << std::endl;
+    exit(EXIT_FAILURE);
+  }
+  
+  using namespace uscxml;
+  using namespace Arabica::DOM;
+  using namespace Arabica::XPath;
+  
+  Interpreter* interpreter = new Interpreter(argv[1]);
+
+  Node<std::string> atomicState = interpreter->getState("atomic");
+  assert(Interpreter::isAtomic(atomicState));
+  assert(!Interpreter::isParallel(atomicState));
+  assert(!Interpreter::isCompound(atomicState));
+
+  Node<std::string> compoundState = interpreter->getState("compound");
+  assert(!Interpreter::isAtomic(compoundState));
+  assert(!Interpreter::isParallel(compoundState));
+  assert(Interpreter::isCompound(compoundState));
+
+  Node<std::string> parallelState = interpreter->getState("parallel");
+  assert(!Interpreter::isAtomic(parallelState));
+  assert(Interpreter::isParallel(parallelState));
+  assert(!Interpreter::isCompound(parallelState)); // parallel states are not compound!
+
+  Node<std::string> initialState = interpreter->getInitialState();
+  assert(initialState == atomicState);
+
+  NodeSet<std::string> childs = interpreter->getChildStates(compoundState);
+  Node<std::string> compundChild1 = interpreter->getState("compundChild1");
+  Node<std::string> compundChild2 = interpreter->getState("compundChild2");  
+  assert(childs.size() > 0);
+  assert(Interpreter::isMember(compundChild1, childs));
+  assert(Interpreter::isMember(compundChild2, childs));
+  assert(!Interpreter::isMember(compoundState, childs));
+
+  assert(Interpreter::isDescendant(compundChild1, compoundState));
+  
+  std::string transEvents;
+  transEvents = "error";
+  assert(Interpreter::nameMatch(transEvents, "error"));
+  assert(!Interpreter::nameMatch(transEvents, "foo"));
+
+  transEvents = "error foo";
+  assert(Interpreter::nameMatch(transEvents, "error"));
+  assert(Interpreter::nameMatch(transEvents, "error.send"));
+  assert(Interpreter::nameMatch(transEvents, "error.send.failed"));
+  assert(Interpreter::nameMatch(transEvents, "foo"));
+  assert(Interpreter::nameMatch(transEvents, "foo.bar"));
+  assert(!Interpreter::nameMatch(transEvents, "errors.my.custom"));
+  assert(!Interpreter::nameMatch(transEvents, "errorhandler.mistake"));
+  assert(!Interpreter::nameMatch(transEvents, "errOr.send"));
+  assert(!Interpreter::nameMatch(transEvents, "foobar"));
+}
+\ No newline at end of file