| 1 |
|
/* |
| 2 |
< |
* UAE - The Un*x Amiga Emulator |
| 2 |
> |
* compiler/gencomp.c - MC680x0 compilation generator |
| 3 |
|
* |
| 4 |
< |
* MC68000 compilation generator |
| 4 |
> |
* Based on work Copyright 1995, 1996 Bernd Schmidt |
| 5 |
> |
* Changes for UAE-JIT Copyright 2000 Bernd Meyer |
| 6 |
|
* |
| 7 |
< |
* Based on work Copyright 1995, 1996 Bernd Schmidt. Changes Copyright 2000 |
| 8 |
< |
* Bernd Meyer |
| 7 |
> |
* Adaptation for Basilisk II and improvements, copyright 2000-2002 |
| 8 |
> |
* Gwenole Beauchesne |
| 9 |
> |
* |
| 10 |
> |
* Basilisk II (C) 1997-2002 Christian Bauer |
| 11 |
> |
* |
| 12 |
> |
* This program is free software; you can redistribute it and/or modify |
| 13 |
> |
* it under the terms of the GNU General Public License as published by |
| 14 |
> |
* the Free Software Foundation; either version 2 of the License, or |
| 15 |
> |
* (at your option) any later version. |
| 16 |
> |
* |
| 17 |
> |
* This program is distributed in the hope that it will be useful, |
| 18 |
> |
* but WITHOUT ANY WARRANTY; without even the implied warranty of |
| 19 |
> |
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
| 20 |
> |
* GNU General Public License for more details. |
| 21 |
> |
* |
| 22 |
> |
* You should have received a copy of the GNU General Public License |
| 23 |
> |
* along with this program; if not, write to the Free Software |
| 24 |
> |
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA |
| 25 |
|
*/ |
| 26 |
|
|
| 10 |
– |
|
| 27 |
|
#include <stdio.h> |
| 28 |
|
#include <stdlib.h> |
| 29 |
|
#include <stdarg.h> |
| 41 |
|
#define uses_cmov global_cmov=1 |
| 42 |
|
#define mayfail global_mayfail=1 |
| 43 |
|
#define uses_fpu global_fpu=1 |
| 44 |
+ |
#define uses_setzflg global_setzflg=1 |
| 45 |
|
|
| 46 |
|
int hack_opcode; |
| 47 |
|
|
| 53 |
|
static int long_opcode; |
| 54 |
|
static int global_mayfail; |
| 55 |
|
static int global_fpu; |
| 56 |
+ |
static int global_setzflg; |
| 57 |
|
|
| 58 |
|
static char endstr[1000]; |
| 59 |
|
static char lines[100000]; |
| 1088 |
|
|
| 1089 |
|
case flag_addx: |
| 1090 |
|
case flag_subx: |
| 1091 |
+ |
uses_setzflg; |
| 1092 |
|
uses_cmov; |
| 1093 |
|
comprintf("\tdont_care_flags();\n"); |
| 1094 |
|
{ |
| 1125 |
|
} |
| 1126 |
|
comprintf("\tif (needed_flags&FLAG_Z) {\n" |
| 1127 |
|
"\tcmov_l_rr(zero,one,5);\n" |
| 1128 |
< |
"\tbsf_l_rr(zero,zero);\n" |
| 1128 |
> |
"\tsetzflg_l(zero);\n" |
| 1129 |
|
"\t}\n"); |
| 1130 |
|
comprintf("\tlive_flags();\n"); |
| 1131 |
|
comprintf("\tend_needflags();\n"); |
| 1384 |
|
case i_BTST: op="bt"; need_write=0; break; |
| 1385 |
|
} |
| 1386 |
|
comprintf("\t%s_l_rr(dst,s);\n" /* Answer now in C */ |
| 1387 |
< |
"\tsbb_l(s,s);\n" /* s is 0 if bit was 0, |
| 1388 |
< |
-1 otherwise */ |
| 1389 |
< |
"\tmake_flags_live();\n" /* Get the flags back */ |
| 1390 |
< |
"\tdont_care_flags();\n" |
| 1391 |
< |
"\tstart_needflags();\n" |
| 1392 |
< |
"\tbsf_l_rr(s,s);\n" |
| 1393 |
< |
"\tlive_flags();\n" |
| 1394 |
< |
"\tend_needflags();\n",op); |
| 1387 |
> |
"\tsbb_l(s,s);\n" /* s is 0 if bit was 0, -1 otherwise */ |
| 1388 |
> |
"\tmake_flags_live();\n" /* Get the flags back */ |
| 1389 |
> |
"\tdont_care_flags();\n",op); |
| 1390 |
> |
if (!noflags) { |
| 1391 |
> |
uses_setzflg; |
| 1392 |
> |
comprintf("\tstart_needflags();\n" |
| 1393 |
> |
"\tsetzflg_l(s);\n" |
| 1394 |
> |
"\tlive_flags();\n" |
| 1395 |
> |
"\tend_needflags();\n"); |
| 1396 |
> |
} |
| 1397 |
|
if (need_write) |
| 1398 |
|
genastore ("dst", curi->dmode, "dstreg", curi->size, "dst"); |
| 1399 |
|
} |
| 2946 |
|
if (global_isaddx) flags|=8; |
| 2947 |
|
if (global_iscjump) flags|=16; |
| 2948 |
|
if (global_fpu) flags|=32; |
| 2949 |
+ |
if (global_setzflg) flags|=64; |
| 2950 |
|
|
| 2951 |
|
comprintf ("}\n"); |
| 2952 |
|
|
