- removed the angle_t type from the VM, now that nothing in the interface requires it anymore.
This commit is contained in:
parent
8b6b5e7b1c
commit
3a598d672e
9 changed files with 1 additions and 114 deletions
|
|
@ -220,16 +220,6 @@ begin:
|
|||
GETADDR(PB,RC,X_READ_NIL);
|
||||
reg.f[a] = *(VM_SWORD *)ptr / 65536.0;
|
||||
NEXTOP;
|
||||
OP(LANG):
|
||||
ASSERTF(a); ASSERTA(B); ASSERTKD(C);
|
||||
GETADDR(PB,KC,X_READ_NIL);
|
||||
reg.f[a] = (*(VM_UWORD *)ptr >> 1) * (180.0 / 0x40000000); // BAM -> deg
|
||||
NEXTOP;
|
||||
OP(LANG_R):
|
||||
ASSERTF(a); ASSERTA(B); ASSERTD(C);
|
||||
GETADDR(PB,RC,X_READ_NIL);
|
||||
reg.f[a] = (*(VM_UWORD *)ptr >> 1) * (180.0 / 0x40000000);
|
||||
NEXTOP;
|
||||
OP(LBIT):
|
||||
ASSERTD(a); ASSERTA(B);
|
||||
GETADDR(PB,0,X_READ_NIL);
|
||||
|
|
@ -336,16 +326,6 @@ begin:
|
|||
GETADDR(PA,RC,X_WRITE_NIL);
|
||||
*(VM_SWORD *)ptr = (VM_SWORD)(reg.f[B] * 65536.0);
|
||||
NEXTOP;
|
||||
OP(SANG):
|
||||
ASSERTA(a); ASSERTF(B); ASSERTKD(C);
|
||||
GETADDR(PA,KC,X_WRITE_NIL);
|
||||
*(VM_UWORD *)ptr = (VM_UWORD)(xs_CRoundToInt((reg.f[B]) * (0x40000000/90.))); // deg -> BAM
|
||||
NEXTOP;
|
||||
OP(SANG_R):
|
||||
ASSERTA(a); ASSERTF(B); ASSERTD(C);
|
||||
GETADDR(PA,RC,X_WRITE_NIL);
|
||||
*(VM_UWORD *)ptr = (VM_UWORD)(xs_CRoundToInt((reg.f[B]) * (0x40000000/90.)));
|
||||
NEXTOP;
|
||||
OP(SBIT):
|
||||
ASSERTA(a); ASSERTD(B);
|
||||
GETADDR(PA,0,X_WRITE_NIL);
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue