From 16fa8d7cc8c92f5ab879e4cf9c6c0bbb3567860f Mon Sep 17 00:00:00 2001 From: Gabe Black Date: Thu, 24 May 2018 01:37:55 -0700 Subject: systemc: Import tests from the Accellera systemc distribution. Change-Id: Iad76b398949a55d768a34d027a2d8e3739953da6 Reviewed-on: https://gem5-review.googlesource.com/10845 Reviewed-by: Giacomo Travaglini Maintainer: Gabe Black --- .../systemc/compliance_1666/test207/test207.cpp | 67 ++++++++++++++++++++++ 1 file changed, 67 insertions(+) create mode 100644 src/systemc/tests/systemc/compliance_1666/test207/test207.cpp (limited to 'src/systemc/tests/systemc/compliance_1666/test207/test207.cpp') diff --git a/src/systemc/tests/systemc/compliance_1666/test207/test207.cpp b/src/systemc/tests/systemc/compliance_1666/test207/test207.cpp new file mode 100644 index 000000000..76910ef84 --- /dev/null +++ b/src/systemc/tests/systemc/compliance_1666/test207/test207.cpp @@ -0,0 +1,67 @@ +#include +using namespace sc_core; +using namespace sc_dt; +using std::cout; +using std::endl; + +// 7) "event_queue" + +void check_form_of_suffix(std::string s) +{ + std::string charset = "0123456789"; + while (!s.empty()) + { + sc_assert(s[0] == '_'); + s = s.substr(1); + sc_assert(!s.empty()); + do + { + sc_assert(charset.find(s[0]) < charset.size()); + s = s.substr(1); + } while (!s.empty() && (s[0] != '_')); + } +} + +SC_MODULE(M) +{ + SC_CTOR(M) + { + SC_THREAD(T); + } + void T() + { + } +}; + +struct Top: sc_module +{ + sc_event_queue eq; + M *m; + Top(sc_module_name) + { + m = new M("m"); + + std::string s = eq.basename(); + sc_assert (s.substr(0,11) == "event_queue"); + sc_assert (s.size() > 11); + check_form_of_suffix(s.substr(11)); + + s = eq.name(); + sc_assert (s.substr(0,15) == "top.event_queue"); + sc_assert (s.size() > 15); + check_form_of_suffix(s.substr(15)); + + sc_assert (std::string(eq.kind()) == "sc_event_queue"); + } +}; + +int sc_main(int argc, char* argv[]) +{ + cout << "Should be silent..." << endl; + + Top top("top"); + sc_start(); + + cout << endl << "Success" << endl; + return 0; +} -- cgit v1.2.3