1 files changed, 120 insertions, 0 deletions
diff --git a/src/systemc/tests/systemc/compliance_1666/test210/test210.cpp b/src/systemc/tests/systemc/compliance_1666/test210/test210.cpp
new file mode 100644
index 000000000..d328fbefb
--- /dev/null
+++ b/src/systemc/tests/systemc/compliance_1666/test210/test210.cpp
@@ -0,0 +1,120 @@
+#include <systemc>
+#include <cstring>
+using namespace sc_core;
+using namespace sc_dt;
+using std::cout;
+using std::endl;
+
+// 10) sc_find_object, sc_get_top_level_objects
+
+static int object_count = 0;
+
+void recurse_hierarchy(sc_object* obj)
+{
+  ++ object_count;
+  std::vector<sc_object*> children = obj->get_child_objects();
+  for (std::vector<sc_object*>::iterator i = children.begin(); i != children.end(); i++)
+    recurse_hierarchy(*i);
+}
+
+SC_MODULE(M)
+{
+  SC_CTOR(M)
+    : sig("sig")
+  {
+    SC_THREAD(T);
+  }
+  void T()
+  {
+  }
+  sc_signal<int> sig;
+};
+
+SC_MODULE(Top)
+{
+  M *m;
+  SC_CTOR(Top)
+  {
+    m = new M("m");
+
+    sc_object* obj;
+    obj = sc_find_object("");
+    sc_assert(obj == 0);
+    obj = sc_find_object("foo");
+    sc_assert(obj == 0);
+    obj = sc_find_object("top.m.foo");
+    sc_assert(obj == 0);
+    obj = sc_find_object("top");
+    sc_assert(strcmp(obj->kind(), "sc_module") == 0);
+    obj = sc_find_object("top.m");
+    sc_assert(strcmp(obj->kind(), "sc_module") == 0);
+    obj = sc_find_object("top.m.sig");
+    sc_assert(strcmp(obj->kind(), "sc_signal") == 0);
+    obj = sc_find_object("top.m.T");
+    sc_assert(sc_process_handle(obj).valid());
+    sc_assert(strcmp(sc_process_handle(obj).name(), "top.m.T") == 0);
+
+    object_count = 0;
+    recurse_hierarchy(m);
+    sc_assert(object_count == 3);
+  }
+};
+
+int sc_main(int argc, char* argv[])
+{
+  cout << "Should be silent..." << endl;
+
+  std::vector<sc_object*> tops = sc_get_top_level_objects();
+  sc_assert(tops.size() == 0);
+
+  Top top("top");
+
+  tops = sc_get_top_level_objects();
+  sc_assert(tops.size() == 1);
+  sc_assert(strcmp(tops[0]->name(), "top") == 0);
+
+  M m2("m2");
+
+  tops = sc_get_top_level_objects();
+  sc_assert(tops.size() == 2);
+  sc_assert(strcmp(tops[0]->name(), "top") == 0);
+  sc_assert(strcmp(tops[1]->name(), "m2") == 0);
+
+  sc_signal<int> sig("sig2");
+
+  tops = sc_get_top_level_objects();
+  sc_assert(tops.size() == 3);
+  sc_assert(strcmp(tops[0]->name(), "top") == 0);
+  sc_assert(strcmp(tops[1]->name(), "m2") == 0);
+  sc_assert(strcmp(tops[2]->name(), "sig2") == 0);
+
+  sc_object* obj;
+  obj = sc_find_object("");
+  sc_assert(obj == 0);
+  obj = sc_find_object("foo");
+  sc_assert(obj == 0);
+  obj = sc_find_object("top.m.foo");
+  sc_assert(obj == 0);
+  obj = sc_find_object("top");
+  sc_assert(strcmp(obj->kind(), "sc_module") == 0);
+  obj = sc_find_object("sig2");
+  sc_assert(strcmp(obj->kind(), "sc_signal") == 0);
+  obj = sc_find_object("m2");
+  sc_assert(strcmp(obj->kind(), "sc_module") == 0);
+  obj = sc_find_object("top.m");
+  sc_assert(strcmp(obj->kind(), "sc_module") == 0);
+  obj = sc_find_object("top.m.sig");
+  sc_assert(strcmp(obj->kind(), "sc_signal") == 0);
+  obj = sc_find_object("top.m.T");
+  sc_assert(sc_process_handle(obj).valid());
+  sc_assert(strcmp(sc_process_handle(obj).name(), "top.m.T") == 0);
+
+  object_count = 0;
+  recurse_hierarchy(tops[0]);
+  sc_assert(object_count == 4);
+
+  sc_start();
+
+  cout << endl << "Success" << endl;
+  return 0;
+}