/** @file VirtualSchematikaMachine.test.cpp * * @author Roland Conybeare, Jan 2026 **/ #include #ifdef NOT_YET #include #include #include #include #include #endif #include #ifdef NOT_YET #include #endif #include namespace xo { using xo::scm::VirtualSchematikaMachine; using xo::scm::VsmConfig; #ifdef NOT_YET using xo::scm::SchematikaParser; using xo::scm::ASyntaxStateMachine; using xo::scm::syntaxstatetype; // using xo::scm::DDefineSsm; using xo::scm::DExpectExprSsm; // using xo::scm::defexprstatetype; //using xo::scm::ParserResult; //using xo::scm::parser_result_type; using xo::scm::Token; using xo::scm::DString; using xo::mm::ArenaConfig; using xo::mm::AAllocator; using xo::mm::DArena; using xo::facet::with_facet; #endif static InitEvidence s_init = (InitSubsys::require()); namespace ut { TEST_CASE("VirtualSchematikaMachine-ctor", "[interpreter2][VSM]") { VirtualSchematikaMachine vsm(VsmConfig); #ifdef NOT_YET ArenaConfig config; config.name_ = "test-arena"; config.size_ = 16 * 1024; DArena expr_arena = DArena::map(config); obj expr_alloc = with_facet::mkobj(&expr_arena); SchematikaParser parser(config, 4096, expr_alloc, false /*debug_flag*/); REQUIRE(parser.debug_flag() == false); REQUIRE(parser.is_at_toplevel() == true); #endif } } /*namespace ut*/ } /*namespace xo*/ /* end SchematikaParser.test.cpp */