mirror of
https://github.com/elliotnunn/BuildCubeE.git
synced 2024-06-28 16:29:30 +00:00
76 lines
1.4 KiB
C
76 lines
1.4 KiB
C
/************************************************************
|
|
|
|
Created: Thursday, September 7, 1989 at 8:55 PM
|
|
FixMath.h
|
|
C Interface to the Macintosh Libraries
|
|
|
|
|
|
Copyright Apple Computer, Inc. 1985-1990
|
|
All rights reserved
|
|
|
|
CHANGE LOG:
|
|
19 Oct 90 JPO Made Frac2x, Fix2x, X2Fix, and X2Frac
|
|
in-line trap calls in non-mc68881 mode.
|
|
|
|
************************************************************/
|
|
|
|
|
|
#ifndef __FIXMATH__
|
|
#define __FIXMATH__
|
|
|
|
#ifndef __TYPES__
|
|
#include <Types.h>
|
|
#endif
|
|
|
|
#ifdef __cplusplus
|
|
extern "C" {
|
|
#endif
|
|
pascal Fract Fix2Frac(Fixed x)
|
|
= 0xA841;
|
|
pascal long Fix2Long(Fixed x)
|
|
= 0xA840;
|
|
pascal Fixed FixATan2(long x,long y)
|
|
= 0xA818;
|
|
pascal Fixed Long2Fix(long x)
|
|
= 0xA83F;
|
|
pascal Fixed Frac2Fix(Fract x)
|
|
= 0xA842;
|
|
|
|
#ifdef mc68881
|
|
|
|
pascal extended Frac2X(Fract x);
|
|
pascal extended Fix2X(Fixed x);
|
|
pascal Fixed X2Fix(extended x);
|
|
pascal Fract X2Frac(extended x);
|
|
|
|
#else
|
|
|
|
pascal extended Frac2X(Fract x)
|
|
= 0xA845;
|
|
pascal extended Fix2X(Fixed x)
|
|
= 0xA843;
|
|
pascal Fixed X2Fix(extended x)
|
|
= 0xA844;
|
|
pascal Fract X2Frac(extended x)
|
|
= 0xA846;
|
|
|
|
#endif
|
|
|
|
pascal Fract FracMul(Fract x,Fract y)
|
|
= 0xA84A;
|
|
pascal Fixed FixDiv(Fixed x,Fixed y)
|
|
= 0xA84D;
|
|
pascal Fract FracDiv(Fract x,Fract y)
|
|
= 0xA84B;
|
|
pascal Fract FracSqrt(Fract x)
|
|
= 0xA849;
|
|
pascal Fract FracSin(Fixed x)
|
|
= 0xA848;
|
|
pascal Fract FracCos(Fixed x)
|
|
= 0xA847;
|
|
#ifdef __cplusplus
|
|
}
|
|
#endif
|
|
|
|
#endif
|