Implemented vm routines for OP_AND_*
This commit is contained in:
@@ -396,3 +396,33 @@ void vm_or_word(vm_t *vm)
|
||||
vm_push_word(vm, DWORD(a | b));
|
||||
}
|
||||
|
||||
void vm_and_byte(vm_t *vm)
|
||||
{
|
||||
if (vm->stack.ptr < 2)
|
||||
// TODO: Error STACK_UNDERFLOW
|
||||
return;
|
||||
byte a = vm_pop_byte(vm).as_byte;
|
||||
byte b = vm_pop_byte(vm).as_byte;
|
||||
vm_push_byte(vm, DBYTE(a & b));
|
||||
}
|
||||
|
||||
void vm_and_hword(vm_t *vm)
|
||||
{
|
||||
if (vm->stack.ptr < (HWORD_SIZE * 2))
|
||||
// TODO: Error STACK_UNDERFLOW
|
||||
return;
|
||||
hword a = vm_pop_hword(vm).as_hword;
|
||||
hword b = vm_pop_hword(vm).as_hword;
|
||||
vm_push_hword(vm, DHWORD(a & b));
|
||||
}
|
||||
|
||||
void vm_and_word(vm_t *vm)
|
||||
{
|
||||
if (vm->stack.ptr < (WORD_SIZE * 2))
|
||||
// TODO: Error STACK_UNDERFLOW
|
||||
return;
|
||||
word a = vm_pop_word(vm).as_word;
|
||||
word b = vm_pop_word(vm).as_word;
|
||||
vm_push_word(vm, DWORD(a & b));
|
||||
}
|
||||
|
||||
|
||||
@@ -121,4 +121,14 @@ static const or_f OR_ROUTINES[] = {
|
||||
[OP_OR_WORD] = vm_or_word,
|
||||
};
|
||||
|
||||
void vm_and_byte(vm_t *);
|
||||
void vm_and_hword(vm_t *);
|
||||
void vm_and_word(vm_t *);
|
||||
typedef void (*and_f)(vm_t *);
|
||||
static const and_f AND_ROUTINES[] = {
|
||||
[OP_AND_BYTE] = vm_and_byte,
|
||||
[OP_AND_HWORD] = vm_and_hword,
|
||||
[OP_AND_WORD] = vm_and_word,
|
||||
};
|
||||
|
||||
#endif
|
||||
|
||||
Reference in New Issue
Block a user