![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to m68k.h CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [UNIX Amiga Emulator] / uae / src / md-amd64-gcc|
Return to m68k.h CVS log | Up to [UNIX Amiga Emulator] / uae / src / md-amd64-gcc |
1.1 root 1: /*
2: * UAE - The Un*x Amiga Emulator
3: *
4: * MC68000 emulation - machine dependent bits
5: *
6: * Copyright 1996 Bernd Schmidt
7: */
8:
9: struct flag_struct {
10: unsigned int cznv;
11: unsigned int x;
12: };
13:
14: #define FLAGVAL_Z 0x40
15: #define FLAGVAL_N 0x80
16:
17: #define SET_ZFLG(y) (regflags.cznv = (regflags.cznv & ~0x40) | (((y) & 1) << 6))
18: #define SET_CFLG(y) (regflags.cznv = (regflags.cznv & ~1) | ((y) & 1))
19: #define SET_VFLG(y) (regflags.cznv = (regflags.cznv & ~0x800) | (((y) & 1) << 11))
20: #define SET_NFLG(y) (regflags.cznv = (regflags.cznv & ~0x80) | (((y) & 1) << 7))
21: #define SET_XFLG(y) (regflags.x = (y))
22:
23: #define GET_ZFLG ((regflags.cznv >> 6) & 1)
24: #define GET_CFLG (regflags.cznv & 1)
25: #define GET_VFLG ((regflags.cznv >> 11) & 1)
26: #define GET_NFLG ((regflags.cznv >> 7) & 1)
27: #define GET_XFLG (regflags.x & 1)
28:
29: #define CLEAR_CZNV (regflags.cznv = 0)
30: #define GET_CZNV (regflags.cznv)
31: #define IOR_CZNV(X) (regflags.cznv |= (X))
32: #define SET_CZNV(X) (regflags.cznv = (X))
33:
34: #define COPY_CARRY (regflags.x = regflags.cznv)
35:
36:
37: extern struct flag_struct regflags __asm__ ("regflags");
38:
39: static __inline__ int cctrue(int cc)
40: {
41: uae_u32 cznv = regflags.cznv;
42: switch(cc){
43: case 0: return 1; /* T */
44: case 1: return 0; /* F */
45: case 2: return (cznv & 0x41) == 0; /* !GET_CFLG && !GET_ZFLG; HI */
46: case 3: return (cznv & 0x41) != 0; /* GET_CFLG || GET_ZFLG; LS */
47: case 4: return (cznv & 1) == 0; /* !GET_CFLG; CC */
48: case 5: return (cznv & 1) != 0; /* GET_CFLG; CS */
49: case 6: return (cznv & 0x40) == 0; /* !GET_ZFLG; NE */
50: case 7: return (cznv & 0x40) != 0; /* GET_ZFLG; EQ */
51: case 8: return (cznv & 0x800) == 0;/* !GET_VFLG; VC */
52: case 9: return (cznv & 0x800) != 0;/* GET_VFLG; VS */
53: case 10:return (cznv & 0x80) == 0; /* !GET_NFLG; PL */
54: case 11:return (cznv & 0x80) != 0; /* GET_NFLG; MI */
55: case 12:return (((cznv << 4) ^ cznv) & 0x800) == 0; /* GET_NFLG == GET_VFLG; GE */
56: case 13:return (((cznv << 4) ^ cznv) & 0x800) != 0;/* GET_NFLG != GET_VFLG; LT */
57: case 14:
58: cznv &= 0x8c0;
59: return (((cznv << 4) ^ cznv) & 0x840) == 0; /* !GET_ZFLG && (GET_NFLG == GET_VFLG); GT */
60: case 15:
61: cznv &= 0x8c0;
62: return (((cznv << 4) ^ cznv) & 0x840) != 0; /* GET_ZFLG || (GET_NFLG != GET_VFLG); LE */
63: }
64: abort();
65: return 0;
66: }
67:
68: #define optflag_testl(v) \
69: __asm__ __volatile__ ("testl %1,%1\n\t" \
70: "pushfl\n\t" \
71: "popl %0\n\t" \
72: : "=r" (regflags.cznv) : "r" (v) : "cc")
73:
74: #define optflag_testw(v) \
75: __asm__ __volatile__ ("testw %w1,%w1\n\t" \
76: "pushfl\n\t" \
77: "popl %0\n\t" \
78: : "=r" (regflags.cznv) : "r" (v) : "cc")
79:
80: #define optflag_testb(v) \
81: __asm__ __volatile__ ("testb %b1,%b1\n\t" \
82: "pushfl\n\t" \
83: "popl %0\n\t" \
84: : "=r" (regflags.cznv) : "q" (v) : "cc")
85:
86: #define optflag_addl(v, s, d) do { \
87: __asm__ __volatile__ ("addl %k2,%k1\n\t" \
88: "pushfl\n\t" \
89: "popl %0\n\t" \
90: : "=r" (regflags.cznv), "=r" (v) : "rmi" (s), "1" (d) : "cc"); \
91: COPY_CARRY; \
92: } while (0)
93: #define optflag_addw(v, s, d) do { \
94: __asm__ __volatile__ ("addw %w2,%w1\n\t" \
95: "pushfl\n\t" \
96: "popl %0\n\t" \
97: : "=r" (regflags.cznv), "=r" (v) : "rmi" (s), "1" (d) : "cc"); \
98: COPY_CARRY; \
99: } while (0)
100:
101: #define optflag_addb(v, s, d) do { \
102: __asm__ __volatile__ ("addb %b2,%b1\n\t" \
103: "pushfl\n\t" \
104: "popl %0\n\t" \
105: : "=r" (regflags.cznv), "=q" (v) : "qmi" (s), "1" (d) : "cc"); \
106: COPY_CARRY; \
107: } while (0)
108:
109: #define optflag_subl(v, s, d) do { \
110: __asm__ __volatile__ ("subl %k2,%k1\n\t" \
111: "pushfl\n\t" \
112: "popl %0\n\t" \
113: : "=r" (regflags.cznv), "=r" (v) : "rmi" (s), "1" (d) : "cc"); \
114: COPY_CARRY; \
115: } while (0)
116:
117: #define optflag_subw(v, s, d) do { \
118: __asm__ __volatile__ ("subw %w2,%w1\n\t" \
119: "pushfl\n\t" \
120: "popl %0\n\t" \
121: : "=r" (regflags.cznv), "=r" (v) : "rmi" (s), "1" (d) : "cc"); \
122: COPY_CARRY; \
123: } while (0)
124:
125: #define optflag_subb(v, s, d) do { \
126: __asm__ __volatile__ ("subb %b2,%b1\n\t" \
127: "pushfl\n\t" \
128: "popl %0\n\t" \
129: : "=r" (regflags.cznv), "=q" (v) : "qmi" (s), "1" (d) : "cc"); \
130: COPY_CARRY; \
131: } while (0)
132:
133: #define optflag_cmpl(s, d) \
134: __asm__ __volatile__ ("cmpl %k1,%k2\n\t" \
135: "pushfl\n\t" \
136: "popl %0\n\t" \
137: : "=r" (regflags.cznv) : "rmi" (s), "r" (d) : "cc")
138:
139: #define optflag_cmpw(s, d) \
140: __asm__ __volatile__ ("cmpw %w1,%w2\n\t" \
141: "pushfl\n\t" \
142: "popl %0\n\t" \
143: : "=r" (regflags.cznv) : "rmi" (s), "r" (d) : "cc")
144:
145: #define optflag_cmpb(s, d) \
146: __asm__ __volatile__ ("cmpb %b1,%b2\n\t" \
147: "pushfl\n\t" \
148: "popl %0\n\t" \
149: : "=r" (regflags.cznv) : "qmi" (s), "q" (d) : "cc")
150:
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.