Inheritance: kOS.Suffixed.SpecialValue
Ejemplo n.º 1
0
        public override void Execute(SharedObjects shared)
        {
            var when = GetTimeSpan(PopValueAssert(shared));
            var what = GetOrbitable(PopValueAssert(shared));
            AssertArgBottomAndConsume(shared);

            ReturnValue = new OrbitInfo( what.GetOrbitAtUT(when.ToUnixStyleTime()), shared );
        }
Ejemplo n.º 2
0
        public override void Execute(SharedObjects shared)
        {
            var when = GetTimeSpan(shared.Cpu.PopValue());
            var what = GetOrbitable(shared.Cpu.PopValue());

            var orb = new OrbitInfo( what.GetOrbitAtUT(when.ToUnixStyleTime()), shared );

            shared.Cpu.PushStack(orb);
        }