mirror of
https://gitlab.os-k.eu/os-k-team/kvisc.git
synced 2023-08-25 14:05:46 +02:00
52 lines
1.8 KiB
C
52 lines
1.8 KiB
C
// The OS/K Team licenses this file to you under the MIT license.
|
|
// See the LICENSE file in the project root for more information.
|
|
|
|
#include <in/instrs.h>
|
|
|
|
//----------------------------------------------------------------------------//
|
|
|
|
IMPL_START(jmp, 1) { R(EIP) = p1->val; return 0; }
|
|
|
|
IMPL_START(jeaxz, 1) { if (!R(EAX)) R(EIP) = p1->val; return 0; }
|
|
IMPL_START(jecxz, 1) { if (!R(ECX)) R(EIP) = p1->val; return 0; }
|
|
|
|
IMPL_START(jeaxnz, 1) { if (R(EAX)) R(EIP) = p1->val; return 0; }
|
|
IMPL_START(jecxnz, 1) { if (R(ECX)) R(EIP) = p1->val; return 0; }
|
|
|
|
//----------------------------------------------------------------------------//
|
|
|
|
IMPL_START(loop, 1) {
|
|
if (R(ECX) > 0) {
|
|
R(ECX)--;
|
|
R(EIP) = p1->val;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
IMPL_START(loop, 2) {
|
|
SRCP(p1);
|
|
if (p1->val > 0) {
|
|
*r1 = p1->val-1;
|
|
R(EIP) = p2->val;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
//----------------------------------------------------------------------------//
|
|
|
|
IMPL_START(bzr, 2) { SRCP(p1); if (p1->val == 0) R(EIP) = p2->val; return 0; }
|
|
IMPL_START(bnz, 2) { SRCP(p1); if (p1->val != 0) R(EIP) = p2->val; return 0; }
|
|
IMPL_START(bltz, 2) { SRCP(p1); if ((long)p1->val < 0) R(EIP) = p2->val; return 0; }
|
|
|
|
IMPL_START(beq, 3) { SRCP(p1); if (p1->val == p2->val) R(EIP) = p3->val; return 0; }
|
|
IMPL_START(bne, 3) { SRCP(p1); if (p1->val != p2->val) R(EIP) = p3->val; return 0; }
|
|
|
|
IMPL_START(blt, 3) { SRCP(p1); if ((long)p1->val < (long)p2->val) R(EIP) = p3->val; return 0; }
|
|
IMPL_START(bltu, 3) { SRCP(p1); if (p1->val < p2->val) R(EIP) = p3->val; return 0; }
|
|
|
|
IMPL_START(blte, 3) { SRCP(p1); if ((long)p1->val <= (long)p2->val) R(EIP) = p3->val; return 0; }
|
|
IMPL_START(blteu, 3) { SRCP(p1); if (p1->val <= p2->val) R(EIP) = p3->val; return 0; }
|
|
|
|
//----------------------------------------------------------------------------//
|
|
|