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

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

            _p = new NonVarPredicate();

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

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

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

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