Axiom.Runtime.UnitTests._Builtins.atom_1_string C# (CSharp) Метод

        public void atom_1_string()
        {
            AbstractMachineState state = SetupMachine();
            AMProgram program = (AMProgram)state.Program;

            _p = new AtomPredicate();

            AbstractTerm X0 = (AbstractTerm)state["X0"];

            X0.Assign(new ConstantTerm("'Hello, World!"));

            Choicepoint b = new Choicepoint();
            ProgramClause nextClause = new ProgramClause();
            state.B = new Choicepoint(0, null, null, b, nextClause, 2, null);

            Verify("atom", 1);
            _p.Execute(state);

            Assert.AreNotSame(nextClause, program.P);
        }