home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Shareware Overload
/
ShartewareOverload.cdr
/
database
/
rettig.zip
/
TRSOURCE.EXE
/
_TR_DTOL.C
< prev
next >
Wrap
C/C++ Source or Header
|
1990-10-22
|
711b
|
39 lines
/*********
* _TR_DTOL.C
*
* by Ralph Davis
*
* Placed in the public domain by Tom Rettig Associates, 10/22/1990.
*
* Syntax: _tr_dtol(<expN>) <expN> = double precision number
* Return: <expN> as a 32-bit long integer
*
* C Syntax:
* long _tr_dtol(n)
* double n;
*
* Assembler Usage:
*
* MOV AX,<high byte>
* MOV BX,<next byte>
* MOV CX,<next byte>
* MOV DX,<low byte>
* PUSH AX
* PUSH BX
* PUSH CX
* PUSH DX
* CALL _TR_DTOL
* ADD SP,8
*
* Returns 32-bit integer in AX:BX
*
*********/
#include "trlib.h"
long _tr_dtol(n)
double n;
{
return ((long) n);
}