hc
2025-02-14 bbb9540dc49f70f6b703d1c8d1b85fa5f602d86e
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
/* SPDX-License-Identifier: GPL-2.0 */
/*---------------------------------------------------------------------------+
 |  status_w.h                                                               |
 |                                                                           |
 | Copyright (C) 1992,1993                                                   |
 |                       W. Metzenthen, 22 Parker St, Ormond, Vic 3163,      |
 |                       Australia.  E-mail   billm@vaxc.cc.monash.edu.au    |
 |                                                                           |
 +---------------------------------------------------------------------------*/
 
#ifndef _STATUS_H_
#define _STATUS_H_
 
#include "fpu_emu.h"        /* for definition of PECULIAR_486 */
 
#ifdef __ASSEMBLY__
#define    Const__(x)    $##x
#else
#define    Const__(x)    x
#endif
 
#define SW_Backward        Const__(0x8000)    /* backward compatibility */
#define SW_C3        Const__(0x4000)    /* condition bit 3 */
#define SW_Top        Const__(0x3800)    /* top of stack */
#define SW_Top_Shift     Const__(11)    /* shift for top of stack bits */
#define SW_C2        Const__(0x0400)    /* condition bit 2 */
#define SW_C1        Const__(0x0200)    /* condition bit 1 */
#define SW_C0        Const__(0x0100)    /* condition bit 0 */
#define SW_Summary         Const__(0x0080)    /* exception summary */
#define SW_Stack_Fault    Const__(0x0040)    /* stack fault */
#define SW_Precision       Const__(0x0020)    /* loss of precision */
#define SW_Underflow       Const__(0x0010)    /* underflow */
#define SW_Overflow        Const__(0x0008)    /* overflow */
#define SW_Zero_Div        Const__(0x0004)    /* divide by zero */
#define SW_Denorm_Op       Const__(0x0002)    /* denormalized operand */
#define SW_Invalid         Const__(0x0001)    /* invalid operation */
 
#define SW_Exc_Mask     Const__(0x27f)    /* Status word exception bit mask */
 
#ifndef __ASSEMBLY__
 
#define COMP_A_gt_B    1
#define COMP_A_eq_B    2
#define COMP_A_lt_B    3
#define COMP_No_Comp    4
#define COMP_Denormal   0x20
#define COMP_NaN    0x40
#define COMP_SNaN    0x80
 
#define status_word() \
  ((partial_status & ~SW_Top & 0xffff) | ((top << SW_Top_Shift) & SW_Top))
static inline void setcc(int cc)
{
   partial_status &= ~(SW_C0 | SW_C1 | SW_C2 | SW_C3);
   partial_status |= (cc) & (SW_C0 | SW_C1 | SW_C2 | SW_C3);
}
 
#ifdef PECULIAR_486
   /* Default, this conveys no information, but an 80486 does it. */
   /* Clear the SW_C1 bit, "other bits undefined". */
#  define clear_C1()  { partial_status &= ~SW_C1; }
# else
#  define clear_C1()
#endif /* PECULIAR_486 */
 
#endif /* __ASSEMBLY__ */
 
#endif /* _STATUS_H_ */