97 lines
3.2 KiB
C
97 lines
3.2 KiB
C
|
/*
|
||
|
|
* This file is part of the UCB release of Plan 9. It is subject to the license
|
||
|
|
* terms in the LICENSE file found in the top-level directory of this
|
||
|
|
* distribution and at http://akaros.cs.berkeley.edu/files/Plan9License. No
|
||
|
|
* part of the UCB release of Plan 9, including this file, may be copied,
|
||
|
|
* modified, propagated, or distributed except according to the terms contained
|
||
|
|
* in the LICENSE file.
|
||
|
|
*/
|
||
|
|
|
||
|
|
#define nil ((void*)0)
|
||
|
|
typedef unsigned short ushort;
|
||
|
|
typedef unsigned char uchar;
|
||
|
|
typedef unsigned long ulong;
|
||
|
|
typedef unsigned int uint;
|
||
|
|
typedef signed char schar;
|
||
|
|
typedef long long vlong;
|
||
|
|
typedef unsigned long long uvlong;
|
||
|
|
typedef unsigned long long uintptr;
|
||
|
|
typedef unsigned long usize;
|
||
|
|
typedef uint Rune;
|
||
|
|
typedef union FPdbleword FPdbleword;
|
||
|
|
typedef uintptr jmp_buf[2];
|
||
|
|
#define JMPBUFSP 0
|
||
|
|
#define JMPBUFPC 1
|
||
|
|
#define JMPBUFDPC 0
|
||
|
|
typedef unsigned int mpdigit; /* for /sys/include/mp.h */
|
||
|
|
typedef unsigned char u8int;
|
||
|
|
typedef unsigned short u16int;
|
||
|
|
typedef unsigned int u32int;
|
||
|
|
typedef unsigned long long u64int;
|
||
|
|
|
||
|
|
/* FPSCR */
|
||
|
|
#define FPSFX (1<<31) /* exception summary (sticky) */
|
||
|
|
#define FPSEX (1<<30) /* enabled exception summary */
|
||
|
|
#define FPSVX (1<<29) /* invalid operation exception summary */
|
||
|
|
#define FPSOX (1<<28) /* overflow exception OX (sticky) */
|
||
|
|
#define FPSUX (1<<27) /* underflow exception UX (sticky) */
|
||
|
|
#define FPSZX (1<<26) /* zero divide exception ZX (sticky) */
|
||
|
|
#define FPSXX (1<<25) /* inexact exception XX (sticky) */
|
||
|
|
#define FPSVXSNAN (1<<24) /* invalid operation exception for SNaN (sticky) */
|
||
|
|
#define FPSVXISI (1<<23) /* invalid operation exception for ∞-∞ (sticky) */
|
||
|
|
#define FPSVXIDI (1<<22) /* invalid operation exception for ∞/∞ (sticky) */
|
||
|
|
#define FPSVXZDZ (1<<21) /* invalid operation exception for 0/0 (sticky) */
|
||
|
|
#define FPSVXIMZ (1<<20) /* invalid operation exception for ∞*0 (sticky) */
|
||
|
|
#define FPSVXVC (1<<19) /* invalid operation exception for invalid compare (sticky) */
|
||
|
|
#define FPSFR (1<<18) /* fraction rounded */
|
||
|
|
#define FPSFI (1<<17) /* fraction inexact */
|
||
|
|
#define FPSFPRF (1<<16) /* floating point result class */
|
||
|
|
#define FPSFPCC (0xF<<12) /* <, >, =, unordered */
|
||
|
|
#define FPVXCVI (1<<8) /* enable exception for invalid integer convert (sticky) */
|
||
|
|
#define FPVE (1<<7) /* invalid operation exception enable */
|
||
|
|
#define FPOVFL (1<<6) /* enable overflow exceptions */
|
||
|
|
#define FPUNFL (1<<5) /* enable underflow */
|
||
|
|
#define FPZDIV (1<<4) /* enable zero divide */
|
||
|
|
#define FPINEX (1<<3) /* enable inexact exceptions */
|
||
|
|
#define FPRMASK (3<<0) /* rounding mode */
|
||
|
|
#define FPRNR (0<<0)
|
||
|
|
#define FPRZ (1<<0)
|
||
|
|
#define FPRPINF (2<<0)
|
||
|
|
#define FPRNINF (3<<0)
|
||
|
|
#define FPPEXT 0
|
||
|
|
#define FPPSGL 0
|
||
|
|
#define FPPDBL 0
|
||
|
|
#define FPPMASK 0
|
||
|
|
#define FPINVAL FPVE
|
||
|
|
|
||
|
|
#define FPAOVFL FPSOX
|
||
|
|
#define FPAINEX FPSXX
|
||
|
|
#define FPAUNFL FPSUX
|
||
|
|
#define FPAZDIV FPSZX
|
||
|
|
#define FPAINVAL FPSVX
|
||
|
|
|
||
|
|
union FPdbleword
|
||
|
|
{
|
||
|
|
double x;
|
||
|
|
struct { /* big endian */
|
||
|
|
ulong hi;
|
||
|
|
ulong lo;
|
||
|
|
};
|
||
|
|
};
|
||
|
|
|
||
|
|
typedef char* va_list;
|
||
|
|
#define va_start(list, start) list =\
|
||
|
|
(sizeof(start) < 8?\
|
||
|
|
(char*)((vlong*)&(start)+1):\
|
||
|
|
(char*)(&(start)+1))
|
||
|
|
#define va_end(list)\
|
||
|
|
USED(list)
|
||
|
|
#define va_arg(list, mode)\
|
||
|
|
((sizeof(mode) == 1)?\
|
||
|
|
((mode*)(list += 8))[-1]:\
|
||
|
|
(sizeof(mode) == 2)?\
|
||
|
|
((mode*)(list += 8))[-1]:\
|
||
|
|
(sizeof(mode) == 4)?\
|
||
|
|
((mode*)(list += 8))[-1]:\
|
||
|
|
((mode*)(list += sizeof(mode)))[-1])
|