91 lines
1.6 KiB
C++
91 lines
1.6 KiB
C++
//This is the software interrupt num
|
|
//we will use. See $LK,"Software Int's",A="MN:I_WAKE"$ for
|
|
//picking a num. Nums are subject to change.
|
|
|
|
#define I_F_UNARY_MINUS I_USER
|
|
|
|
asm {
|
|
|
|
//This changes the sign of the floating
|
|
//point val in RAX
|
|
F_UNARY_MINUS_INT::
|
|
PUSH RAX
|
|
FLD U64 [RSP]
|
|
FCHS
|
|
FSTP U64 [RSP]
|
|
POP RAX
|
|
IRET
|
|
|
|
//This does the same thing, but not as
|
|
//an interrupt.
|
|
F_UNARY_MINUS_CALL::
|
|
PUSH RAX
|
|
FLD U64 [RSP]
|
|
FCHS
|
|
FSTP U64 [RSP]
|
|
POP RAX
|
|
RET
|
|
|
|
//This invokes the interrupt version
|
|
//with a C callable function.
|
|
_F_UM_INT::
|
|
PUSH RBP
|
|
MOV RBP,RSP
|
|
MOV RAX,SF_ARG1[RBP]
|
|
INT I_F_UNARY_MINUS
|
|
POP RBP
|
|
RET1 8
|
|
|
|
//This invokes the call version
|
|
//with a C callable function.
|
|
_F_UM_CALL::
|
|
PUSH RBP
|
|
MOV RBP,RSP
|
|
MOV RAX,SF_ARG1[RBP]
|
|
CALL F_UNARY_MINUS_CALL
|
|
POP RBP
|
|
RET1 8
|
|
}
|
|
|
|
_extern _F_UM_INT F64 UnaryMinusInt(F64 d);
|
|
_extern _F_UM_CALL F64 UnaryMinusCall(F64 d);
|
|
|
|
|
|
#define SAMPLE_SIZE 1000000
|
|
U0 TimeIns()
|
|
{
|
|
I64 start,end;
|
|
I64 i,old_irq;
|
|
Bool old_preempt=Preempt(OFF);
|
|
|
|
CPURep;
|
|
old_irq=IntEntrySet(I_F_UNARY_MINUS,F_UNARY_MINUS_INT,IDTET_TRAP);
|
|
|
|
//Measure interrupt time
|
|
start=GetTSC;
|
|
for (i=0;i<SAMPLE_SIZE;i++)
|
|
UnaryMinusInt(ã);
|
|
end=GetTSC;
|
|
"Interrupt Cycles: %10.5f\n",ToF64(end-start)/SAMPLE_SIZE;
|
|
|
|
//Measure call time
|
|
start=GetTSC;
|
|
for (i=0;i<SAMPLE_SIZE;i++)
|
|
UnaryMinusCall(ã);
|
|
end=GetTSC;
|
|
"Call Cycles: %10.5f\n",ToF64(end-start)/SAMPLE_SIZE;
|
|
|
|
Preempt(old_preempt);
|
|
IntEntrySet(I_F_UNARY_MINUS,old_irq,IDTET_IRQ);
|
|
}
|
|
|
|
TimeIns;
|
|
|
|
/* Program Output$HL,0$$WW+H,1$$FD,1$
|
|
|
|
$PT$$FG$$BG$6 Cores 3.395GHz
|
|
Interrupt Cycles: 573.98543
|
|
Call Cycles: 9.74349
|
|
|
|
$HL,1$*/
|