Cosmos/source/Cosmos.IL2CPU/IL/Sub.cs

using System;

using XSharp.Compiler;
using static XSharp.Compiler.XSRegisters;

namespace Cosmos.IL2CPU.X86.IL
{
    [Cosmos.IL2CPU.OpCode(ILOpCode.Code.Sub)]
    public class Sub: ILOp
    {
        public Sub(Cosmos.Assembler.Assembler aAsmblr)
            : base(aAsmblr)
        {
        }

        public override void Execute(MethodInfo aMethod, ILOpCode aOpCode)
        {
            var xStackTop = aOpCode.StackPopTypes[0];
            var xStackTop2 = aOpCode.StackPopTypes[0];
            var xStackTopSize = SizeOfType(xStackTop);
            var xStackTop2Size = SizeOfType(xStackTop2);
            if (xStackTopSize != xStackTop2Size)
            {
                throw new Exception("Different size for substract: " + aMethod.MethodBase + "!");
            }

            var xStackTopIsFloat = TypeIsFloat(xStackTop);

            switch (xStackTopSize)
            {
                case 1:
                case 2:
                case 4:
                    if (xStackTopIsFloat)
                    {
                        XS.SSE.MoveSS(XMM0, ESP, sourceIsIndirect: true);
                        XS.Add(ESP, 4);
                        XS.SSE.MoveSS(XMM1, ESP, sourceIsIndirect: true);
                        //XS.LiteralCode("movss XMM1, [ESP + 4]");
                        XS.SSE.SubSS(XMM1, XMM0);
                        XS.SSE.MoveSS(ESP, XMM1, destinationIsIndirect: true);
                    }
                    else
                    {
                        XS.Pop(ECX);
                        XS.Pop(EAX);
                        XS.Sub(EAX, ECX);
                        XS.Push(EAX);
                    }
                    break;
                case 8:
                    if (xStackTopIsFloat)
                    {
                        XS.SSE2.MoveSD(XMM0, ESP, sourceIsIndirect: true);
                        XS.Add(ESP, 8);
                        XS.SSE2.MoveSD(XMM1, ESP, sourceIsIndirect: true);
                        XS.SSE2.SubSD(XMM1, XMM0);
                        XS.SSE2.MoveSD(ESP, XMM1, destinationIsIndirect: true);
                    }
                    else
                    {
                        XS.Pop(EAX);
                        XS.Pop(EDX);
                        XS.Sub(ESP, EAX, destinationIsIndirect: true);
                        XS.SubWithCarry(ESP, EDX, destinationDisplacement: 4);
                    }
                    break;
                default:
                    throw new NotImplementedException("not implemented");
            }
        }
    }
}