AjTalk.Tests.Compiler.VmCompilerTests.ExecuteBasicInstVarAtPut C# (CSharp) Method

        public void ExecuteBasicInstVarAtPut()
        {
            Machine machine = new Machine();
            IClass cls = this.CompileClass(
                "Rectangle",
                new string[] { "x", "y" },
                new string[] { "x ^x", "x: newX x := newX", "y ^y", "y: newY y := newY" });

            IObject iobj = (IObject)cls.NewObject();

            machine.SetGlobalObject("aRectangle", iobj);

            Block block = this.compiler.CompileBlock("aRectangle basicInstVarAt: 1 put: 200");

            Assert.IsNotNull(block);

            block.Execute(machine, null);

            Assert.AreEqual(200, iobj[0]);
            Assert.IsNull(iobj[1]);
        }