Ejemplo n.º 1
0
        public void PairsAreEquatable()
        {
            var a = new PairObject(new FixnumObject(42), new FixnumObject(5));

            Assert.IsTrue(a.Equals(a));
            Assert.IsTrue(a.Equals((object)a));

            var b = new PairObject(new FixnumObject(42), new FixnumObject(5));

            Assert.IsTrue(a.Equals(b));
            Assert.IsTrue(a.Equals((object)b));

            var c = new PairObject(new FixnumObject(42), new FixnumObject(4));

            Assert.IsFalse(a.Equals(c));
            Assert.IsFalse(a.Equals((object)c));

            var d = new PairObject(new FixnumObject(-42), new FixnumObject(5));

            Assert.IsFalse(a.Equals(d));
            Assert.IsFalse(a.Equals((object)d));

            var e = new PairObject(new FixnumObject(0), new FixnumObject(0));

            Assert.IsFalse(a.Equals(e));
            Assert.IsFalse(a.Equals((object)e));
        }
Ejemplo n.º 2
0
        public void PairsValuesAreSet()
        {
            var first  = new FixnumObject(42);
            var second = new FixnumObject(5);
            var pair   = new PairObject(first, second);

            Assert.AreSame(first, pair.Car);
            Assert.AreSame(second, pair.Cdr);
        }
Ejemplo n.º 3
0
        public void CanChangeCarAndCdrToNonNullValues()
        {
            var a = new PairObject(new FixnumObject(42), new FixnumObject(5));

            a.Car = new CharacterObject('y');
            a.Cdr = new CharacterObject('x');

            Assert.AreEqual('y', ((CharacterObject)a.Car).Value);
            Assert.AreEqual('x', ((CharacterObject)a.Cdr).Value);
        }
Ejemplo n.º 4
0
        public void PairsPrintAsExpected()
        {
            var a = new PairObject(new EmptyListObject(), new EmptyListObject());

            Assert.AreEqual("(())", a.ToString());

            a = new PairObject(new FixnumObject(42), new EmptyListObject());
            Assert.AreEqual("(42)", a.ToString());

            a = new PairObject(new FixnumObject(42), new FixnumObject(5));
            Assert.AreEqual("(42 . 5)", a.ToString());

            a = new PairObject(new EmptyListObject(), new FixnumObject(5));
            Assert.AreEqual("(() . 5)", a.ToString());
        }
Ejemplo n.º 5
0
    private bool IsWallsGone(PairObject pairWall)
    {
        Vector3 screenTop = mainCamera.ViewportToWorldPoint(new Vector3(0.5F, 1.0F, -mainCamera.transform.position.z));

        return(screenTop.y < pairWall.first.transform.position.y - wallSize.y / 2);
    }
Ejemplo n.º 6
0
        public void CannotSetNullCdr()
        {
            var a = new PairObject(new FixnumObject(42), new FixnumObject(5));

            a.Cdr = null;
        }