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

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

            _p = new FreePredicate();

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

            X0.Assign(new ConstantTerm("ali"));

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

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

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