WinUAE/jit/gencomp_arm.c

/*
 *  compiler/gencomp_arm2.c - MC680x0 compilation generator (ARM Adaption JIT v1 & JIT v2)
 *
 *  Based on work Copyright 1995, 1996 Bernd Schmidt
 *  Changes for UAE-JIT Copyright 2000 Bernd Meyer
 *
 *  Adaptation for ARAnyM/ARM, copyright 2001-2015
 *    Milan Jurik, Jens Heitmann
 * 
 *  Basilisk II (C) 1997-2005 Christian Bauer
 *
 *  This program is free software; you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation; either version 2 of the License, or
 *  (at your option) any later version.
 *
 *  This program is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with this program; if not, write to the Free Software
 *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 *
 *  Notes
 *  =====
 *
 *  Advantages of JIT v2
 *  	- Processor independent style
 *  	- Reduced overhead
 *  	- Easier to understand / read
 *  	- Easier to optimize
 *  	- More precise flag handling
 *  	- Better optimization for different CPU version ARM, ARMv6 etc..
 *
 *  Disadvantages of JIT v2
 *  	- Less generated
 *  	- Requires more code implementation by hand (MidFunc)
 *  	- MIDFUNCS are more CPU minded (closer to raw)
 *  	- Separate code for each instruction (but this could be also an advantage, because you can concentrate on it)
 *
 * Additional note:
 *  	- current using jnf_xxx calls for non-flag operations and
 *  	  jff_xxx for flag operations
 *
 * Still todo:
 * 		- Optimize genamode, genastore, gen_writeXXX, gen_readXXX, genmovemXXX
 *
 */

#define CC_FOR_BUILD 1
#include "sysconfig.h"

#include "sysdeps.h"
#include "readcpu.h"

#include <assert.h>
#include <stdio.h>
#include <stdlib.h>
#include <stdarg.h>
#include <string.h>
#include <ctype.h>
#undef abort

#define BOOL_TYPE		"int"
#define failure			global_failure=1
#define FAILURE			global_failure=1
#define isjump			global_isjump=1
#define is_const_jump	global_iscjump=1
#define isaddx			global_isaddx=1
#define uses_cmov		global_cmov=1
#define mayfail			global_mayfail=1
#define uses_fpu		global_fpu=1

int hack_opcode;

static int global_failure;
static int global_isjump;
static int global_iscjump;
static int global_isaddx;
static int global_cmov;
static int long_opcode;
static int global_mayfail;
static int global_fpu;

static char endstr[1000];
static char lines[100000];
static int comp_index = 0;

#include "flags_arm.h"

#ifndef __attribute__
#  ifndef __GNUC__
#    define __attribute__(x)
#  endif
#endif


static int cond_codes[] = { //
		NATIVE_CC_AL, -1, //
				NATIVE_CC_HI, NATIVE_CC_LS, //
				NATIVE_CC_CC, NATIVE_CC_CS, //
				NATIVE_CC_NE, NATIVE_CC_EQ, //
				NATIVE_CC_VC, NATIVE_CC_VS, //
				NATIVE_CC_PL, NATIVE_CC_MI, //
				NATIVE_CC_GE, NATIVE_CC_LT, //
				NATIVE_CC_GT, NATIVE_CC_LE //
		};

__attribute__((format(printf, 1, 2)))
static void comprintf(const char *format, ...)
{
	va_list args;

	va_start(args, format);
	comp_index += vsprintf(lines + comp_index, format, args);
	va_end(args);
}

static void com_discard(void)
{
	comp_index = 0;
}

static void com_flush(void)
{
	int i;
	for (i = 0; i < comp_index; i++)
		putchar(lines[i]);
	com_discard();
}


static FILE *headerfile;
static FILE *stblfile;

static int using_prefetch;
static int using_exception_3;
static int cpu_level;
static int noflags;

/* For the current opcode, the next lower level that will have different code.
 * Initialized to -1 for each opcode. If it remains unchanged, indicates we
 * are done with that opcode.  */
static int next_cpu_level;

static int *opcode_map;
static int *opcode_next_clev;
static int *opcode_last_postfix;
static unsigned long *counts;

static void read_counts(void)
{
	FILE *file;
	unsigned long opcode, count, total;
	char name[20];
	int nr = 0;
	memset(counts, 0, 65536 * sizeof *counts);

	file = fopen("frequent.68k", "r");
	if (file) {
		if (fscanf(file, "Total: %lu\n", &total) != 1)
		{
			assert(0);
		}
		while (fscanf(file, "%lx: %lu %s\n", &opcode, &count, name) == 3) {
			opcode_next_clev[nr] = 4;
			opcode_last_postfix[nr] = -1;
			opcode_map[nr++] = opcode;
			counts[opcode] = count;
		}
		fclose(file);
	}
	if (nr == nr_cpuop_funcs)
		return;
	for (opcode = 0; opcode < 0x10000; opcode++) {
		if (table68k[opcode].handler == -1 && table68k[opcode].mnemo != i_ILLG
				&& counts[opcode] == 0) {
			opcode_next_clev[nr] = 4;
			opcode_last_postfix[nr] = -1;
			opcode_map[nr++] = opcode;
			counts[opcode] = count;
		}
	}
    assert (nr == nr_cpuop_funcs);
}

static int n_braces = 0;
static int insn_n_cycles;

static void start_brace(void) {
	n_braces++;
	comprintf("{");
}

static void close_brace(void) {
	assert(n_braces > 0);
	n_braces--;
	comprintf("}");
}

static void finish_braces(void) {
	while (n_braces > 0)
		close_brace();
}

static inline void gen_update_next_handler(void) {
	return; /* Can anything clever be done here? */
}

static void gen_writebyte(const char *address, const char *source)
{
	comprintf("\twritebyte(%s, %s, scratchie);\n", address, source);
}

static void gen_writeword(const char *address, const char *source)
{
	comprintf("\twriteword(%s, %s, scratchie);\n", address, source);
}

static void gen_writelong(const char *address, const char *source)
{
	comprintf("\twritelong(%s, %s, scratchie);\n", address, source);
}

static void gen_readbyte(const char *address, const char* dest)
{
	comprintf("\treadbyte(%s, %s, scratchie);\n", address, dest);
}

static void gen_readword(const char *address, const char *dest)
{
	comprintf("\treadword(%s,%s,scratchie);\n", address, dest);
}

static void gen_readlong(const char *address, const char *dest)
{
	comprintf("\treadlong(%s, %s, scratchie);\n", address, dest);
}

static const char *
gen_nextilong(void) {
	static char buffer[80];

	sprintf(buffer, "comp_get_ilong((m68k_pc_offset+=4)-4)");
	insn_n_cycles += 4;

	long_opcode = 1;
	return buffer;
}

static const char *
gen_nextiword(void) {
	static char buffer[80];

	sprintf(buffer, "comp_get_iword((m68k_pc_offset+=2)-2)");
	insn_n_cycles += 2;

	long_opcode = 1;
	return buffer;
}

static const char *
gen_nextibyte(void) {
	static char buffer[80];

	sprintf(buffer, "comp_get_ibyte((m68k_pc_offset+=2)-2)");
	insn_n_cycles += 2;

	long_opcode = 1;
	return buffer;
}

#if defined(USE_JIT_FPU)
// Only used by FPU (future), get rid of unused warning
static void
swap_opcode (void)
{
	comprintf("#if defined(HAVE_GET_WORD_UNSWAPPED) && !defined(FULLMMU)\n");
	comprintf("\topcode = do_byteswap_16(opcode);\n");
	comprintf("#endif\n");
}
#endif

static void sync_m68k_pc(void) {
	comprintf("\t if (m68k_pc_offset>SYNC_PC_OFFSET) sync_m68k_pc();\n");
}

/* getv == 1: fetch data; getv != 0: check for odd address. If movem != 0,
 * the calling routine handles Apdi and Aipi modes.
 * gb-- movem == 2 means the same thing but for a MOVE16 instruction */
static void genamode(amodes mode, const char *reg, wordsizes size, const char *name, int getv, int movem)
{
	start_brace();
	switch (mode)
	{
	case Dreg: /* Do we need to check dodgy here? */
		assert (!movem);
		if (getv == 1 || getv == 2)
		{
			/* We generate the variable even for getv==2, so we can use
			 it as a destination for MOVE */
			comprintf("\tint %s = %s;\n", name, reg);
		}
		return;

	case Areg:
		assert (!movem);
		if (getv == 1 || getv == 2)
		{
			/* see above */
			comprintf("\tint %s = dodgy ? scratchie++ : %s + 8;\n", name, reg);
			if (getv == 1)
			{
				comprintf("\tif (dodgy) \n");
				comprintf("\t\tmov_l_rr(%s, %s + 8);\n", name, reg);
			}
		}
		return;

	case Aind:
		comprintf("\tint %sa = dodgy ? scratchie++ : %s + 8;\n", name, reg);
		comprintf("\tif (dodgy)\n");
		comprintf("\t\tmov_l_rr(%sa, %s + 8);\n", name, reg);
		break;
	case Aipi:
		comprintf("\tint %sa = scratchie++;\n", name);
		comprintf("\tmov_l_rr(%sa, %s + 8);\n", name, reg);
		break;
	case Apdi:
		switch (size)
		{
		case sz_byte:
			if (movem)
			{
				comprintf("\tint %sa = dodgy ? scratchie++ : %s + 8;\n", name, reg);
				comprintf("\tif (dodgy)\n");
				comprintf("\t\tmov_l_rr(%sa, 8 + %s);\n", name, reg);
			} else
			{
				start_brace();
				comprintf("\tint %sa = dodgy ? scratchie++ : %s + 8;\n", name, reg);
				comprintf("\tlea_l_brr(%s + 8, %s + 8, (uae_s32)-areg_byteinc[%s]);\n", reg, reg, reg);
				comprintf("\tif (dodgy)\n");
				comprintf("\t\tmov_l_rr(%sa, 8 + %s);\n", name, reg);
			}
			break;
		case sz_word:
			if (movem)
			{
				comprintf("\tint %sa=dodgy?scratchie++:%s+8;\n", name, reg);
				comprintf("\tif (dodgy) \n");
				comprintf("\tmov_l_rr(%sa,8+%s);\n", name, reg);
			} else
			{
				start_brace();
				comprintf("\tint %sa = dodgy ? scratchie++ : %s + 8;\n", name, reg);
				comprintf("\tlea_l_brr(%s + 8, %s + 8, -2);\n", reg, reg);
				comprintf("\tif (dodgy)\n");
				comprintf("\t\tmov_l_rr(%sa, 8 + %s);\n", name, reg);
			}
			break;
		case sz_long:
			if (movem)
			{
				comprintf("\tint %sa = dodgy ? scratchie++ : %s + 8;\n", name, reg);
				comprintf("\tif (dodgy)\n");
				comprintf("\t\tmov_l_rr(%sa, 8 + %s);\n", name, reg);
			} else
			{
				start_brace();
				comprintf("\tint %sa = dodgy ? scratchie++ : %s + 8;\n", name, reg);
				comprintf("\tlea_l_brr(%s + 8, %s + 8, -4);\n", reg, reg);
				comprintf("\tif (dodgy)\n");
				comprintf("\t\tmov_l_rr(%sa, 8 + %s);\n", name, reg);
			}
			break;
		default:
			assert(0);
			break;
		}
		break;
	case Ad16:
		comprintf("\tint %sa = scratchie++;\n", name);
		comprintf("\tmov_l_rr(%sa, 8 + %s);\n", name, reg);
		comprintf("\tlea_l_brr(%sa, %sa, (uae_s32)(uae_s16)%s);\n", name, name, gen_nextiword());
		break;
	case Ad8r:
		comprintf("\tint %sa = scratchie++;\n", name);
		comprintf("\tcalc_disp_ea_020(%s + 8, %s, %sa, scratchie);\n", reg, gen_nextiword(), name);
		break;

	case PC16:
		comprintf("\tint %sa = scratchie++;\n", name);
		comprintf("\tuae_u32 address = start_pc + ((char *)comp_pc_p - (char *)start_pc_p) + m68k_pc_offset;\n");
		comprintf("\tuae_s32 PC16off = (uae_s32)(uae_s16)%s;\n", gen_nextiword());
		comprintf("\tmov_l_ri(%sa, address + PC16off);\n", name);
		break;

	case PC8r:
		comprintf("\tint pctmp = scratchie++;\n");
		comprintf("\tint %sa = scratchie++;\n", name);
		comprintf("\tuae_u32 address = start_pc + ((char *)comp_pc_p - (char *)start_pc_p) + m68k_pc_offset;\n");
		start_brace();
		comprintf("\tmov_l_ri(pctmp,address);\n");

		comprintf("\tcalc_disp_ea_020(pctmp, %s, %sa, scratchie);\n", gen_nextiword(), name);
		break;
	case absw:
		comprintf("\tint %sa = scratchie++;\n", name);
		comprintf("\tmov_l_ri(%sa, (uae_s32)(uae_s16)%s);\n", name, gen_nextiword());
		break;
	case absl:
		comprintf("\tint %sa = scratchie++;\n", name);
		comprintf("\tmov_l_ri(%sa, %s); /* absl */\n", name, gen_nextilong());
		break;
	case imm:
		assert (getv == 1);
		switch (size)
		{
		case sz_byte:
			comprintf("\tint %s = scratchie++;\n", name);
			comprintf("\tmov_l_ri(%s, (uae_s32)(uae_s8)%s);\n", name, gen_nextibyte());
			break;
		case sz_word:
			comprintf("\tint %s = scratchie++;\n", name);
			comprintf("\tmov_l_ri(%s, (uae_s32)(uae_s16)%s);\n", name, gen_nextiword());
			break;
		case sz_long:
			comprintf("\tint %s = scratchie++;\n", name);
			comprintf("\tmov_l_ri(%s, %s);\n", name, gen_nextilong());
			break;
		default:
			assert(0);
			break;
		}
		return;
	case imm0:
		assert (getv == 1);
		comprintf("\tint %s = scratchie++;\n", name);
		comprintf("\tmov_l_ri(%s, (uae_s32)(uae_s8)%s);\n", name, gen_nextibyte());
		return;
	case imm1:
		assert (getv == 1);
		comprintf("\tint %s = scratchie++;\n", name);
		comprintf("\tmov_l_ri(%s, (uae_s32)(uae_s16)%s);\n", name, gen_nextiword());
		return;
	case imm2:
		assert (getv == 1);
		comprintf("\tint %s = scratchie++;\n", name);
		comprintf("\tmov_l_ri(%s, %s);\n", name, gen_nextilong());
		return;
	case immi:
		assert (getv == 1);
		comprintf("\tint %s = scratchie++;\n", name);
		comprintf("\tmov_l_ri(%s, %s);\n", name, reg);
		return;
	default:
		assert(0);
		break;
	}

	/* We get here for all non-reg non-immediate addressing modes to
	 * actually fetch the value. */
	if (getv == 1)
	{
		char astring[80];
		sprintf(astring, "%sa", name);
		switch (size)
		{
		case sz_byte:
			insn_n_cycles += 2;
			break;
		case sz_word:
			insn_n_cycles += 2;
			break;
		case sz_long:
			insn_n_cycles += 4;
			break;
		default:
			assert(0);
			break;
		}
		start_brace();
		comprintf("\tint %s = scratchie++;\n", name);
		switch (size)
		{
		case sz_byte:
			gen_readbyte(astring, name);
			break;
		case sz_word:
			gen_readword(astring, name);
			break;
		case sz_long:
			gen_readlong(astring, name);
			break;
		default:
			assert(0);
			break;
		}
	}

	/* We now might have to fix up the register for pre-dec or post-inc
	 * addressing modes. */
	if (!movem)
	{
		switch (mode)
		{
		case Aipi:
			switch (size)
			{
			case sz_byte:
				comprintf("\tlea_l_brr(%s + 8,%s + 8, areg_byteinc[%s]);\n", reg, reg, reg);
				break;
			case sz_word:
				comprintf("\tlea_l_brr(%s + 8, %s + 8, 2);\n", reg, reg);
				break;
			case sz_long:
				comprintf("\tlea_l_brr(%s + 8, %s + 8, 4);\n", reg, reg);
				break;
			default:
				assert(0);
				break;
			}
			break;
		case Apdi:
			break;
		default:
			break;
		}
	}
}

static void genastore(const char *from, amodes mode, const char *reg, wordsizes size, const char *to)
{
	switch (mode)
	{
	case Dreg:
		switch (size)
		{
		case sz_byte:
			comprintf("\tif(%s != %s)\n", reg, from);
			comprintf("\t\tmov_b_rr(%s, %s);\n", reg, from);
			break;
		case sz_word:
			comprintf("\tif(%s != %s)\n", reg, from);
			comprintf("\t\tmov_w_rr(%s, %s);\n", reg, from);
			break;
		case sz_long:
			comprintf("\tif(%s != %s)\n", reg, from);
			comprintf("\t\tmov_l_rr(%s, %s);\n", reg, from);
			break;
		default:
			assert(0);
			break;
		}
		break;
	case Areg:
		switch (size)
		{
		case sz_word:
			comprintf("\tif(%s + 8 != %s)\n", reg, from);
			comprintf("\t\tmov_w_rr(%s + 8, %s);\n", reg, from);
			break;
		case sz_long:
			comprintf("\tif(%s + 8 != %s)\n", reg, from);
			comprintf("\t\tmov_l_rr(%s + 8, %s);\n", reg, from);
			break;
		default:
			assert(0);
			break;
		}
		break;

	case Apdi:
	case absw:
	case PC16:
	case PC8r:
	case Ad16:
	case Ad8r:
	case Aipi:
	case Aind:
	case absl:
	{
		char astring[80];
		sprintf(astring, "%sa", to);

		switch (size)
		{
		case sz_byte:
			insn_n_cycles += 2;
			gen_writebyte(astring, from);
			break;
		case sz_word:
			insn_n_cycles += 2;
			gen_writeword(astring, from);
			break;
		case sz_long:
			insn_n_cycles += 4;
			gen_writelong(astring, from);
			break;
		default:
			assert(0);
			break;
		}
	}
		break;
	case imm:
	case imm0:
	case imm1:
	case imm2:
	case immi:
		assert(0);
		break;
	default:
		assert(0);
		break;
	}
}

static void gen_move16(uae_u32 opcode, struct instr *curi) {
#if defined(USE_JIT2)
	comprintf("\tint src=scratchie++;\n");
	comprintf("\tint dst=scratchie++;\n");

	uae_u32 masked_op = (opcode & 0xfff8);
	if (masked_op == 0xf620) {
		// POSTINCREMENT SOURCE AND DESTINATION version
		comprintf("\t uae_u16 dstreg = ((%s)>>12) & 0x07;\n", gen_nextiword());
		comprintf("\t jnf_MOVE(src, srcreg + 8);");
		comprintf("\t jnf_MOVE(dst, dstreg + 8);");
		comprintf("\t if (srcreg != dstreg)\n");
		comprintf("\t   jnf_ADD_imm(srcreg + 8, srcreg + 8, 16);");
		comprintf("\t jnf_ADD_imm(dstreg + 8, dstreg + 8, 16);");
	} else {
		/* Other variants */
		genamode(curi->smode, "srcreg", curi->size, "src", 0, 2);
		genamode(curi->dmode, "dstreg", curi->size, "dst", 0, 2);
		switch (masked_op) {
			case 0xf600:
			comprintf("\t jnf_ADD_imm(srcreg + 8, srcreg + 8, 16);");
			break;
			case 0xf608:
			comprintf("\t jnf_ADD_imm(dstreg + 8, dstreg + 8, 16);");
			break;
		}
	}
	comprintf("\t jnf_MOVE16(dst, src);");
#else
	comprintf("\tint src=scratchie++;\n");
	comprintf("\tint dst=scratchie++;\n");

	if ((opcode & 0xfff8) == 0xf620) {
		/* MOVE16 (Ax)+,(Ay)+ */
		comprintf("\tuae_u16 dstreg=((%s)>>12)&0x07;\n", gen_nextiword());
		comprintf("\tmov_l_rr(src,8+srcreg);\n");
		comprintf("\tmov_l_rr(dst,8+dstreg);\n");
	} else {
		/* Other variants */
		genamode(curi->smode, "srcreg", curi->size, "src", 0, 2);
		genamode(curi->dmode, "dstreg", curi->size, "dst", 0, 2);
		comprintf("\tmov_l_rr(src,srca);\n");
		comprintf("\tmov_l_rr(dst,dsta);\n");
	}

	/* Align on 16-byte boundaries */
	comprintf("\tand_l_ri(src,~15);\n");
	comprintf("\tand_l_ri(dst,~15);\n");

	if ((opcode & 0xfff8) == 0xf620) {
		comprintf("\tif (srcreg != dstreg)\n");
		comprintf("\tarm_ADD_l_ri8(srcreg+8,16);\n");
		comprintf("\tarm_ADD_l_ri8(dstreg+8,16);\n");
	} else if ((opcode & 0xfff8) == 0xf600)
		comprintf("\tarm_ADD_l_ri8(srcreg+8,16);\n");
	else if ((opcode & 0xfff8) == 0xf608)
		comprintf("\tarm_ADD_l_ri8(dstreg+8,16);\n");

	start_brace();
	comprintf("\tint tmp=scratchie;\n");
	comprintf("\tscratchie+=4;\n");

	comprintf("\tget_n_addr(src,src,scratchie);\n"
			"\tget_n_addr(dst,dst,scratchie);\n"
			"\tmov_l_rR(tmp+0,src,0);\n"
			"\tmov_l_rR(tmp+1,src,4);\n"
			"\tmov_l_rR(tmp+2,src,8);\n"
			"\tmov_l_rR(tmp+3,src,12);\n"
			"\tmov_l_Rr(dst,tmp+0,0);\n"
			"\tforget_about(tmp+0);\n"
			"\tmov_l_Rr(dst,tmp+1,4);\n"
			"\tforget_about(tmp+1);\n"
			"\tmov_l_Rr(dst,tmp+2,8);\n"
			"\tforget_about(tmp+2);\n"
			"\tmov_l_Rr(dst,tmp+3,12);\n");
	close_brace();
#endif
}

static void genmovemel(uae_u16 opcode) {
	comprintf("\tuae_u16 mask = %s;\n", gen_nextiword());
	comprintf("\tint native=scratchie++;\n");
	comprintf("\tint i;\n");
	comprintf("\tsigned char offset=0;\n");
	genamode(table68k[opcode].dmode, "dstreg", table68k[opcode].size, "src", 2,
			1);
	comprintf("\tget_n_addr(srca,native,scratchie);\n");

	comprintf("\tfor (i=0;i<16;i++) {\n"
			"\t\tif ((mask>>i)&1) {\n");
	switch (table68k[opcode].size) {
	case sz_long:
		comprintf("\t\t\tmov_l_rR(i,native,offset);\n"
				"\t\t\tmid_bswap_32(i);\n"
				"\t\t\toffset+=4;\n");
		break;
	case sz_word:
		comprintf("\t\t\tmov_w_rR(i,native,offset);\n"
				"\t\t\tmid_bswap_16(i);\n"
				"\t\t\tsign_extend_16_rr(i,i);\n"
				"\t\t\toffset+=2;\n");
		break;
	default:
		assert(0);
		break;
	}
	comprintf("\t\t}\n"
			"\t}");
	if (table68k[opcode].dmode == Aipi) {
		comprintf("\t\t\tlea_l_brr(8+dstreg,srca,offset);\n");
	}
}

static void genmovemle(uae_u16 opcode) {
	comprintf("\tuae_u16 mask = %s;\n", gen_nextiword());
	comprintf("\tint native=scratchie++;\n");
	comprintf("\tint i;\n");
	comprintf("\tint tmp=scratchie++;\n");
	comprintf("\tsigned char offset=0;\n");
	genamode(table68k[opcode].dmode, "dstreg", table68k[opcode].size, "src", 2,
			1);

	comprintf("\tget_n_addr(srca,native,scratchie);\n");

	if (table68k[opcode].dmode != Apdi) {
		comprintf("\tfor (i=0;i<16;i++) {\n"
				"\t\tif ((mask>>i)&1) {\n");
		switch (table68k[opcode].size) {
		case sz_long:
			comprintf("\t\t\tmov_l_rr(tmp,i);\n"
					"\t\t\tmid_bswap_32(tmp);\n"
					"\t\t\tmov_l_Rr(native,tmp,offset);\n"
					"\t\t\toffset+=4;\n");
			break;
		case sz_word:
			comprintf("\t\t\tmov_l_rr(tmp,i);\n"
					"\t\t\tmid_bswap_16(tmp);\n"
					"\t\t\tmov_w_Rr(native,tmp,offset);\n"
					"\t\t\toffset+=2;\n");
			break;
		default:
			assert(0);
			break;
		}
	} else { /* Pre-decrement */
		comprintf("\tfor (i=0;i<16;i++) {\n"
				"\t\tif ((mask>>i)&1) {\n");
		switch (table68k[opcode].size) {
		case sz_long:
			comprintf("\t\t\toffset-=4;\n"
					"\t\t\tmov_l_rr(tmp,15-i);\n"
					"\t\t\tmid_bswap_32(tmp);\n"
					"\t\t\tmov_l_Rr(native,tmp,offset);\n");
			break;
		case sz_word:
			comprintf("\t\t\toffset-=2;\n"
					"\t\t\tmov_l_rr(tmp,15-i);\n"
					"\t\t\tmid_bswap_16(tmp);\n"
					"\t\t\tmov_w_Rr(native,tmp,offset);\n");
			break;
		default:
			assert(0);
			break;
		}
	}

	comprintf("\t\t}\n"
			"\t}");
	if (table68k[opcode].dmode == Apdi) {
		comprintf("\t\t\tlea_l_brr(8+dstreg,srca,(uae_s32)offset);\n");
	}
}

static void duplicate_carry(void) {
	comprintf("\tif (needed_flags&FLAG_X) duplicate_carry();\n");
}

typedef enum {
	flag_logical_noclobber,
	flag_logical,
	flag_add,
	flag_sub,
	flag_cmp,
	flag_addx,
	flag_subx,
	flag_zn,
	flag_av,
	flag_sv,
	flag_and,
	flag_or,
	flag_eor,
	flag_mov
} flagtypes;

#if !defined(USE_JIT2)
static void genflags(flagtypes type, wordsizes size, const char *value, const char *src, const char *dst)
{
	if (noflags) {
		switch (type) {
		case flag_cmp:
			comprintf("\tdont_care_flags();\n");
			comprintf("/* Weird --- CMP with noflags ;-) */\n");
			return;
		case flag_add:
		case flag_sub:
			comprintf("\tdont_care_flags();\n");
			{
				const char* op;
				switch (type) {
				case flag_add:
					op = "add";
					break; // nf
				case flag_sub:
					op = "sub";
					break; // nf
				default:
					assert(0);
					break;
				}
				switch (size) {
				case sz_byte:
					comprintf("\t%s_b(%s,%s);\n", op, dst, src);
					break;
				case sz_word:
					comprintf("\t%s_w(%s,%s);\n", op, dst, src);
					break;
				case sz_long:
					comprintf("\t%s_l(%s,%s);\n", op, dst, src);
					break;
				}
				return;
			}
			break;

		case flag_and:
			comprintf("\tdont_care_flags();\n");
			switch (size) {
			case sz_byte:
				comprintf("if (kill_rodent(dst)) {\n");
				comprintf("\tzero_extend_8_rr(scratchie,%s);\n", src);
				comprintf("\tor_l_ri(scratchie,0xffffff00);\n"); // nf
				comprintf("\tarm_AND_l(%s,scratchie);\n", dst);
				comprintf("\tforget_about(scratchie);\n");
				comprintf("\t} else \n"
						"\tarm_AND_b(%s,%s);\n", dst, src);
				break;
			case sz_word:
				comprintf("if (kill_rodent(dst)) {\n");
				comprintf("\tzero_extend_16_rr(scratchie,%s);\n", src);
				comprintf("\tor_l_ri(scratchie,0xffff0000);\n"); // nf
				comprintf("\tarm_AND_l(%s,scratchie);\n", dst);
				comprintf("\tforget_about(scratchie);\n");
				comprintf("\t} else \n"
						"\tarm_AND_w(%s,%s);\n", dst, src);
				break;
			case sz_long:
				comprintf("\tarm_AND_l(%s,%s);\n", dst, src);
				break;
			}
			return;

		case flag_mov:
			comprintf("\tdont_care_flags();\n");
			switch (size) {
			case sz_byte:
				comprintf("if (kill_rodent(dst)) {\n");
				comprintf("\tzero_extend_8_rr(scratchie,%s);\n", src);
				comprintf("\tand_l_ri(%s,0xffffff00);\n", dst); // nf
				comprintf("\tarm_ORR_l(%s,scratchie);\n", dst);
				comprintf("\tforget_about(scratchie);\n");
				comprintf("\t} else \n"
						"\tmov_b_rr(%s,%s);\n", dst, src);
				break;
			case sz_word:
				comprintf("if (kill_rodent(dst)) {\n");
				comprintf("\tzero_extend_16_rr(scratchie,%s);\n", src);
				comprintf("\tand_l_ri(%s,0xffff0000);\n", dst); // nf
				comprintf("\tarm_ORR_l(%s,scratchie);\n", dst);
				comprintf("\tforget_about(scratchie);\n");
				comprintf("\t} else \n"
						"\tmov_w_rr(%s,%s);\n", dst, src);
				break;
			case sz_long:
				comprintf("\tmov_l_rr(%s,%s);\n", dst, src);
				break;
			}
			return;

		case flag_or:
		case flag_eor:
			comprintf("\tdont_care_flags();\n");
			start_brace();
			{
				const char* op;
				switch (type) {
				case flag_or:
					op = "ORR";
					break; // nf
				case flag_eor:
					op = "EOR";
					break; // nf
				default:
					assert(0);
					break;
				}
				switch (size) {
				case sz_byte:
					comprintf("if (kill_rodent(dst)) {\n");
					comprintf("\tzero_extend_8_rr(scratchie,%s);\n", src);
					comprintf("\tarm_%s_l(%s,scratchie);\n", op, dst);
					comprintf("\tforget_about(scratchie);\n");
					comprintf("\t} else \n"
							"\tarm_%s_b(%s,%s);\n", op, dst, src);
					break;
				case sz_word:
					comprintf("if (kill_rodent(dst)) {\n");
					comprintf("\tzero_extend_16_rr(scratchie,%s);\n", src);
					comprintf("\tarm_%s_l(%s,scratchie);\n", op, dst);
					comprintf("\tforget_about(scratchie);\n");
					comprintf("\t} else \n"
							"\tarm_%s_w(%s,%s);\n", op, dst, src);
					break;
				case sz_long:
					comprintf("\tarm_%s_l(%s,%s);\n", op, dst, src);
					break;
				}
				close_brace();
				return;
			}

		case flag_addx:
		case flag_subx:
			comprintf("\tdont_care_flags();\n");
			{
				const char* op;
				switch (type) {
				case flag_addx:
					op = "adc";
					break;
				case flag_subx:
					op = "sbb";
					break;
				default:
					assert(0);
					break;
				}
				comprintf("\trestore_carry();\n"); /* Reload the X flag into C */
				switch (size) {
				case sz_byte:
					comprintf("\t%s_b(%s,%s);\n", op, dst, src);
					break;
				case sz_word:
					comprintf("\t%s_w(%s,%s);\n", op, dst, src);
					break;
				case sz_long:
					comprintf("\t%s_l(%s,%s);\n", op, dst, src);
					break;
				}
				return;
			}
			break;
		default:
			return;
		}
	}

	/* Need the flags, but possibly not all of them */
	switch (type) {
	case flag_logical_noclobber:
		failure;
		/* fall through */
	
	case flag_and:
	case flag_or:
	case flag_eor:
		comprintf("\tdont_care_flags();\n");
		start_brace();
		{
			const char* op;
			switch (type) {
			case flag_and:
				op = "and";
				break;
			case flag_or:
				op = "or";
				break;
			case flag_eor:
				op = "xor";
				break;
			default:
				assert(0);
				break;
			}
			switch (size) {
			case sz_byte:
				comprintf("\tstart_needflags();\n"
						"\t%s_b(%s,%s);\n", op, dst, src);
				break;
			case sz_word:
				comprintf("\tstart_needflags();\n"
						"\t%s_w(%s,%s);\n", op, dst, src);
				break;
			case sz_long:
				comprintf("\tstart_needflags();\n"
						"\t%s_l(%s,%s);\n", op, dst, src);
				break;
			}
			comprintf("\tlive_flags();\n");
			comprintf("\tend_needflags();\n");
			close_brace();
			return;
		}

	case flag_mov:
		comprintf("\tdont_care_flags();\n");
		start_brace();
		{
			switch (size) {
			case sz_byte:
				comprintf("\tif (%s!=%s) {\n", src, dst);
				comprintf("\tmov_b_ri(%s,0);\n"
						"\tstart_needflags();\n", dst);
				comprintf("\tor_b(%s,%s);\n", dst, src);
				comprintf("\t} else {\n");
				comprintf("\tmov_b_rr(%s,%s);\n", dst, src);
				comprintf("\ttest_b_rr(%s,%s);\n", dst, dst);
				comprintf("\t}\n");
				break;
			case sz_word:
				comprintf("\tif (%s!=%s) {\n", src, dst);
				comprintf("\tmov_w_ri(%s,0);\n"
						"\tstart_needflags();\n", dst);
				comprintf("\tor_w(%s,%s);\n", dst, src);
				comprintf("\t} else {\n");
				comprintf("\tmov_w_rr(%s,%s);\n", dst, src);
				comprintf("\ttest_w_rr(%s,%s);\n", dst, dst);
				comprintf("\t}\n");
				break;
			case sz_long:
				comprintf("\tif (%s!=%s) {\n", src, dst);
				comprintf("\tmov_l_ri(%s,0);\n"
						"\tstart_needflags();\n", dst);
				comprintf("\tor_l(%s,%s);\n", dst, src);
				comprintf("\t} else {\n");
				comprintf("\tmov_l_rr(%s,%s);\n", dst, src);
				comprintf("\ttest_l_rr(%s,%s);\n", dst, dst);
				comprintf("\t}\n");
				break;
			}
			comprintf("\tlive_flags();\n");
			comprintf("\tend_needflags();\n");
			close_brace();
			return;
		}

	case flag_logical:
		comprintf("\tdont_care_flags();\n");
		start_brace();
		switch (size) {
		case sz_byte:
			comprintf("\tstart_needflags();\n"
					"\ttest_b_rr(%s,%s);\n", value, value);
			break;
		case sz_word:
			comprintf("\tstart_needflags();\n"
					"\ttest_w_rr(%s,%s);\n", value, value);
			break;
		case sz_long:
			comprintf("\tstart_needflags();\n"
					"\ttest_l_rr(%s,%s);\n", value, value);
			break;
		}
		comprintf("\tlive_flags();\n");
		comprintf("\tend_needflags();\n");
		close_brace();
		return;

	case flag_add:
	case flag_sub:
	case flag_cmp:
		comprintf("\tdont_care_flags();\n");
		{
			const char* op;
			switch (type) {
			case flag_add:
				op = "add";
				break;
			case flag_sub:
				op = "sub";
				break;
			case flag_cmp:
				op = "cmp";
				break;
			default:
				assert(0);
				break;
			}
			switch (size) {
			case sz_byte:
				comprintf("\tstart_needflags();\n"
						"\t%s_b(%s,%s);\n", op, dst, src);
				break;
			case sz_word:
				comprintf("\tstart_needflags();\n"
						"\t%s_w(%s,%s);\n", op, dst, src);
				break;
			case sz_long:
				comprintf("\tstart_needflags();\n"
						"\t%s_l(%s,%s);\n", op, dst, src);
				break;
			}
			comprintf("\tlive_flags();\n");
			comprintf("\tend_needflags();\n");
			if (type != flag_cmp) {
				duplicate_carry();
			}
			comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n");

			return;
		}

	case flag_addx:
	case flag_subx:
		uses_cmov;
		comprintf("\tdont_care_flags();\n");
		{
			const char* op;
			switch (type) {
			case flag_addx:
				op = "adc";
				break;
			case flag_subx:
				op = "sbb";
				break;
			default:
				assert(0);
				break;
			}
			start_brace();
			comprintf("\tint zero=scratchie++;\n"
					"\tint one=scratchie++;\n"
					"\tif (needed_flags&FLAG_Z) {\n"
					"\tmov_l_ri(zero,0);\n"
					"\tmov_l_ri(one,-1);\n"
					"\tmake_flags_live();\n"
					"\tcmov_l_rr(zero,one,%d);\n"
					"\t}\n", NATIVE_CC_NE);
			comprintf("\trestore_carry();\n"); /* Reload the X flag into C */
			switch (size) {
			case sz_byte:
				comprintf("\tstart_needflags();\n"
						"\t%s_b(%s,%s);\n", op, dst, src);
				break;
			case sz_word:
				comprintf("\tstart_needflags();\n"
						"\t%s_w(%s,%s);\n", op, dst, src);
				break;
			case sz_long:
				comprintf("\tstart_needflags();\n"
						"\t%s_l(%s,%s);\n", op, dst, src);
				break;
			}
			comprintf("\tlive_flags();\n");
			comprintf("\tif (needed_flags&FLAG_Z) {\n"
					"\tcmov_l_rr(zero,one,%d);\n"
					"\tset_zero(zero, one);\n" /* No longer need one */
					"\tlive_flags();\n"
					"\t}\n", NATIVE_CC_NE);
			comprintf("\tend_needflags();\n");
			duplicate_carry();
			comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n");
			return;
		}
	default:
		failure;
		break;
	}
}
#endif

static void gen_abcd(uae_u32 opcode, struct instr *curi, const char* ssize) {
#if 0
#else
	(void) opcode;
	(void) curi;
	(void) ssize;
	failure;
	/* No BCD maths for me.... */
#endif
}

static void gen_add(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
#if defined(USE_JIT2)
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0);

	comprintf("\t dont_care_flags();\n");
	start_brace();
	comprintf("\t int tmp=scratchie++;\n");
	// Use tmp register to avoid destroying upper part in .B., .W cases
	if (!noflags) {
		comprintf("\t start_needflags();\n");
		comprintf("\t jff_ADD_%s(tmp,dst,src);\n", ssize);
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
		duplicate_carry();
		comprintf(
				"\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n");
	} else {
		comprintf("\t jnf_ADD(tmp,dst,src);\n");
	}
	genastore("tmp", curi->dmode, "dstreg", curi->size, "dst");
#else
	(void) ssize;
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0);
	genflags(flag_add, curi->size, "", "src", "dst");
	genastore("dst", curi->dmode, "dstreg", curi->size, "dst");
#endif
}

static void gen_adda(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
#if defined(USE_JIT2)
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	genamode(curi->dmode, "dstreg", sz_long, "dst", 1, 0);
	start_brace();
	comprintf("\t jnf_ADDA_%s(dst, src);\n", ssize);
	genastore("dst", curi->dmode, "dstreg", sz_long, "dst");
#else
	(void) ssize;
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	genamode(curi->dmode, "dstreg", sz_long, "dst", 1, 0);
	start_brace();
	comprintf("\tint tmp=scratchie++;\n");
	switch (curi->size) {
	case sz_byte:
		comprintf("\tsign_extend_8_rr(tmp,src);\n");
		break;
	case sz_word:
		comprintf("\tsign_extend_16_rr(tmp,src);\n");
		break;
	case sz_long:
		comprintf("\ttmp=src;\n");
		break;
	default:
		assert(0);
		break;
	}
	comprintf("\tarm_ADD_l(dst,tmp);\n");
	genastore("dst", curi->dmode, "dstreg", sz_long, "dst");
#endif
}

static void gen_addx(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
#if defined(USE_JIT2)
	isaddx;
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0);
	start_brace();

	// Use tmp register to avoid destroying upper part in .B., .W cases
	comprintf("\t dont_care_flags();\n");
	comprintf("\t int tmp=scratchie++;\n");
	if (!noflags) {
		comprintf("\t make_flags_live();\n");
		comprintf("\t restore_carry();\n"); /* Reload the X flag into C */
		comprintf("\t start_needflags();\n");
		comprintf("\t jff_ADDX_%s(tmp,dst,src);\n", ssize);
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
		duplicate_carry();
		comprintf("\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n");
	} else {
		comprintf("\t restore_carry();\n"); /* Reload the X flag into C */
		comprintf("\t jnf_ADDX(tmp,dst,src);\n");
	}
	genastore("tmp", curi->dmode, "dstreg", curi->size, "dst");
#else
	(void) ssize;
	isaddx;
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0);
	start_brace();
	genflags(flag_addx, curi->size, "", "src", "dst");
	genastore("dst", curi->dmode, "dstreg", curi->size, "dst");
#endif
}

static void gen_and(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
#if defined(USE_JIT2)
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0);

	comprintf("\t dont_care_flags();\n");
	comprintf("\t int tmp=scratchie++;\n");
	start_brace();
	if (!noflags) {
		comprintf("\t jff_AND_%s(tmp,dst,src);\n", ssize);
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
	} else {
		comprintf("\t jnf_AND(tmp,dst,src);\n");
	}
	genastore("tmp", curi->dmode, "dstreg", curi->size, "dst");
#else
	(void) ssize;
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0);
	genflags(flag_and, curi->size, "", "src", "dst");
	genastore("dst", curi->dmode, "dstreg", curi->size, "dst");
#endif
}

static void gen_andsr(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
	(void) ssize;
#if defined(USE_JIT2)
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	if (!noflags) {
		comprintf("\t make_flags_live();\n");
		comprintf("\t start_needflags();\n");
		comprintf("\t jff_ANDSR(ARM_CCR_MAP[src & 0xF], (src & 0x10));\n");
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
	}
#else
	(void) curi;
	failure;
	isjump;
#endif
}

static void gen_asl(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
#if defined(USE_JIT2)
	mayfail;
	if (curi->smode == Dreg) {
		comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n"
				"  FAIL(1);\n"
				"  return;\n"
				"} \n");
		start_brace();
	}
	comprintf("\t dont_care_flags();\n");
	comprintf("\t int tmp=scratchie++;\n");

	genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0);

	if (curi->smode != immi) {
		if (!noflags) {
			start_brace();
			comprintf("\t make_flags_live();\n");
			comprintf("\t start_needflags();\n");
			comprintf("\t jff_ASL_%s_reg(tmp,data,cnt);\n", ssize);
			comprintf("\t live_flags();\n");
			comprintf("\t end_needflags();\n");
			comprintf("\t duplicate_carry();\n");
			comprintf(
					"\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n");
		} else {
			start_brace();
			comprintf("\t jnf_LSL_reg(tmp,data,cnt);\n");
		}
	} else {
		start_brace();
		if (!noflags) {
			comprintf("\t make_flags_live();\n");
			comprintf("\t start_needflags();\n");
			comprintf("\t jff_ASL_%s_imm(tmp,data,srcreg);\n", ssize);
			comprintf("\t live_flags();\n");
			comprintf("\t end_needflags();\n");
			comprintf("\t duplicate_carry();\n");
			comprintf(
					"\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n");
		} else {
			comprintf("\t jnf_LSL_imm(tmp,data,srcreg);\n");
		}
	}
	genastore("tmp", curi->dmode, "dstreg", curi->size, "data");
#else
	(void) ssize;

	mayfail;
	if (curi->smode == Dreg) {
		comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n"
				"  FAIL(1);\n"
				"  return;\n"
				"} \n");
		start_brace();
	}
	comprintf("\tdont_care_flags();\n");
	/* Except for the handling of the V flag, this is identical to
	 LSL. The handling of V is, uhm, unpleasant, so if it's needed,
	 let the normal emulation handle it. Shoulders of giants kinda
	 thing ;-) */
	comprintf("if (needed_flags & FLAG_V) {\n"
			"  FAIL(1);\n"
			"  return;\n"
			"} \n");

	genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0);
	if (curi->smode != immi) {
		if (!noflags) {
			uses_cmov;
			start_brace();
			comprintf("\tint highmask;\n"
					"\tint cdata=scratchie++;\n"
					"\tint tmpcnt=scratchie++;\n");
			comprintf("\tmov_l_rr(tmpcnt,cnt);\n"
					"\tand_l_ri(tmpcnt,63);\n"
					"\tmov_l_ri(cdata,0);\n"
					"\tcmov_l_rr(cdata,data,%d);\n", NATIVE_CC_NE);
			/* cdata is now either data (for shift count!=0) or
			 0 (for shift count==0) */
			switch (curi->size) {
			case sz_byte:
				comprintf("\tshll_b_rr(data,cnt);\n"
						"\thighmask=0x38;\n");
				break;
			case sz_word:
				comprintf("\tshll_w_rr(data,cnt);\n"
						"\thighmask=0x30;\n");
				break;
			case sz_long:
				comprintf("\tshll_l_rr(data,cnt);\n"
						"\thighmask=0x20;\n");
				break;
			default:
				assert(0);
				break;
			}
			comprintf("test_l_ri(cnt,highmask);\n"
					"mov_l_ri(scratchie,0);\n"
					"cmov_l_rr(scratchie,data,%d);\n", NATIVE_CC_EQ);
			switch (curi->size) {
			case sz_byte:
				comprintf("\tmov_b_rr(data,scratchie);\n");
				break;
			case sz_word:
				comprintf("\tmov_w_rr(data,scratchie);\n");
				break;
			case sz_long:
				comprintf("\tmov_l_rr(data,scratchie);\n");
				break;
			default:
				assert(0);
				break;
			}
			/* Result of shift is now in data. Now we need to determine
			 the carry by shifting cdata one less */
			comprintf("\tsub_l_ri(tmpcnt,1);\n");
			switch (curi->size) {
			case sz_byte:
				comprintf("\tshll_b_rr(cdata,tmpcnt);\n");
				break;
			case sz_word:
				comprintf("\tshll_w_rr(cdata,tmpcnt);\n");
				break;
			case sz_long:
				comprintf("\tshll_l_rr(cdata,tmpcnt);\n");
				break;
			default:
				assert(0);
				break;
			}
			comprintf("test_l_ri(tmpcnt,highmask);\n"
					"mov_l_ri(scratchie,0);\n"
					"cmov_l_rr(cdata,scratchie,%d);\n", NATIVE_CC_NE);
			/* And create the flags */
			comprintf("\tstart_needflags();\n");

			comprintf("\tif (needed_flags & FLAG_ZNV)\n");
			switch (curi->size) {
			case sz_byte:
				comprintf("\t  test_b_rr(data,data);\n");
				comprintf("\t bt_l_ri(cdata,7);\n");
				break;
			case sz_word:
				comprintf("\t  test_w_rr(data,data);\n");
				comprintf("\t bt_l_ri(cdata,15);\n");
				break;
			case sz_long:
				comprintf("\t  test_l_rr(data,data);\n");
				comprintf("\t bt_l_ri(cdata,31);\n");
				break;
			}
			comprintf("\t live_flags();\n");
			comprintf("\t end_needflags();\n");
			comprintf("\t duplicate_carry();\n");
			comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n");
			genastore("data", curi->dmode, "dstreg", curi->size, "data");
		} else {
			uses_cmov;
			start_brace();
			comprintf("\tint highmask;\n");
			switch (curi->size) {
			case sz_byte:
				comprintf("\tshll_b_rr(data,cnt);\n"
						"\thighmask=0x38;\n");
				break;
			case sz_word:
				comprintf("\tshll_w_rr(data,cnt);\n"
						"\thighmask=0x30;\n");
				break;
			case sz_long:
				comprintf("\tshll_l_rr(data,cnt);\n"
						"\thighmask=0x20;\n");
				break;
			default:
				assert(0);
				break;
			}
			comprintf("test_l_ri(cnt,highmask);\n"
					"mov_l_ri(scratchie,0);\n"
					"cmov_l_rr(scratchie,data,%d);\n", NATIVE_CC_EQ);
			switch (curi->size) {
			case sz_byte:
				comprintf("\tmov_b_rr(data,scratchie);\n");
				break;
			case sz_word:
				comprintf("\tmov_w_rr(data,scratchie);\n");
				break;
			case sz_long:
				comprintf("\tmov_l_rr(data,scratchie);\n");
				break;
			default:
				assert(0);
				break;
			}
			genastore("data", curi->dmode, "dstreg", curi->size, "data");
		}
	} else {
		start_brace();
		comprintf("\tint tmp=scratchie++;\n"
				"\tint bp;\n"
				"\tmov_l_rr(tmp,data);\n");
		switch (curi->size) {
		case sz_byte:
			comprintf("\tshll_b_ri(data,srcreg);\n"
					"\tbp=8-srcreg;\n");
			break;
		case sz_word:
			comprintf("\tshll_w_ri(data,srcreg);\n"
					"\tbp=16-srcreg;\n");
			break;
		case sz_long:
			comprintf("\tshll_l_ri(data,srcreg);\n"
					"\tbp=32-srcreg;\n");
			break;
		default:
			assert(0);
			break;
		}

		if (!noflags) {
			comprintf("\tstart_needflags();\n");
			comprintf("\tif (needed_flags & FLAG_ZNV)\n");
			switch (curi->size) {
			case sz_byte:
				comprintf("\t  test_b_rr(data,data);\n");
				break;
			case sz_word:
				comprintf("\t  test_w_rr(data,data);\n");
				break;
			case sz_long:
				comprintf("\t  test_l_rr(data,data);\n");
				break;
			}
			comprintf("\t bt_l_ri(tmp,bp);\n"); /* Set C */
			comprintf("\t live_flags();\n");
			comprintf("\t end_needflags();\n");
			comprintf("\t duplicate_carry();\n");
			comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n");
		}
		genastore("data", curi->dmode, "dstreg", curi->size, "data");
	}
#endif
}

static void gen_aslw(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
	(void) ssize;
#if defined(USE_JIT2)
	comprintf("\t dont_care_flags();\n");
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	start_brace();
	comprintf("\t int tmp=scratchie++;\n");
	if (!noflags) {
		comprintf("\t start_needflags();\n");
		comprintf("\t jff_ASLW(tmp,src);\n");
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
	} else {
		comprintf("\t jnf_ASLW(tmp,src);\n");
	}
	genastore("tmp", curi->smode, "srcreg", curi->size, "src");
#else
	(void) curi;
	failure;
#endif
}

static void gen_asr(uae_u32 opcode, struct instr *curi, const char* ssize) {
#if defined(USE_JIT2)
	(void)opcode;

	mayfail;
	if (curi->smode == Dreg) {
		comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n"
				"  FAIL(1);\n"
				"  return;\n"
				"} \n");
		start_brace();
	}
	comprintf("\t dont_care_flags();\n");

	genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0);

	start_brace();
	comprintf("\t int tmp=scratchie++;\n");
	if (curi->smode != immi) {
		if (!noflags) {
			comprintf("\t make_flags_live();\n");
			comprintf("\t start_needflags();\n");
			comprintf("\t jff_ASR_%s_reg(tmp,data,cnt);\n", ssize);
			comprintf("\t live_flags();\n");
			comprintf("\t end_needflags();\n");
			comprintf("\t duplicate_carry();\n");
			comprintf(
					"if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n");
		} else {
			comprintf("\t jnf_ASR_%s_reg(tmp,data,cnt);\n", ssize);
		}
	} else {
		char *op;
		if (!noflags) {
			comprintf("\t make_flags_live();\n");
			comprintf("\t start_needflags();\n");
			op = "ff";
		} else
		op = "nf";

		comprintf("\t j%s_ASR_%s_imm(tmp,data,srcreg);\n", op, ssize);
		if (!noflags) {
			comprintf("\t live_flags();\n");
			comprintf("\t end_needflags();\n");
			comprintf("\t duplicate_carry();\n");
			comprintf(
					"\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n");
		}
	}
	genastore("tmp", curi->dmode, "dstreg", curi->size, "data");
#else
	(void) opcode;
	(void) ssize;

	mayfail;
	if (curi->smode == Dreg) {
		comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n"
				"  FAIL(1);\n"
				"  return;\n"
				"} \n");
		start_brace();
	}
	comprintf("\tdont_care_flags();\n");

	genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0);
	if (curi->smode != immi) {
		if (!noflags) {
			uses_cmov;
			start_brace();
			comprintf("\tint highmask;\n"
					"\tint width;\n"
					"\tint cdata=scratchie++;\n"
					"\tint tmpcnt=scratchie++;\n"
					"\tint highshift=scratchie++;\n");
			comprintf("\tmov_l_rr(tmpcnt,cnt);\n"
					"\tand_l_ri(tmpcnt,63);\n"
					"\tmov_l_ri(cdata,0);\n"
					"\tcmov_l_rr(cdata,data,%d);\n", NATIVE_CC_NE);
			/* cdata is now either data (for shift count!=0) or
			 0 (for shift count==0) */
			switch (curi->size) {
			case sz_byte:
				comprintf("\tshra_b_rr(data,cnt);\n"
						"\thighmask=0x38;\n"
						"\twidth=8;\n");
				break;
			case sz_word:
				comprintf("\tshra_w_rr(data,cnt);\n"
						"\thighmask=0x30;\n"
						"\twidth=16;\n");
				break;
			case sz_long:
				comprintf("\tshra_l_rr(data,cnt);\n"
						"\thighmask=0x20;\n"
						"\twidth=32;\n");
				break;
			default:
				assert(0);
				break;
			}
			comprintf("test_l_ri(cnt,highmask);\n"
					"mov_l_ri(highshift,0);\n"
					"mov_l_ri(scratchie,width/2);\n"
					"cmov_l_rr(highshift,scratchie,%d);\n", NATIVE_CC_NE);
			/* The x86 masks out bits, so we now make sure that things
			 really get shifted as much as planned */
			switch (curi->size) {
			case sz_byte:
				comprintf("\tshra_b_rr(data,highshift);\n");
				break;
			case sz_word:
				comprintf("\tshra_w_rr(data,highshift);\n");
				break;
			case sz_long:
				comprintf("\tshra_l_rr(data,highshift);\n");
				break;
			default:
				assert(0);
				break;
			}
			/* And again */
			switch (curi->size) {
			case sz_byte:
				comprintf("\tshra_b_rr(data,highshift);\n");
				break;
			case sz_word:
				comprintf("\tshra_w_rr(data,highshift);\n");
				break;
			case sz_long:
				comprintf("\tshra_l_rr(data,highshift);\n");
				break;
			default:
				assert(0);
				break;
			}

			/* Result of shift is now in data. Now we need to determine
			 the carry by shifting cdata one less */
			comprintf("\tsub_l_ri(tmpcnt,1);\n");
			switch (curi->size) {
			case sz_byte:
				comprintf("\tshra_b_rr(cdata,tmpcnt);\n");
				break;
			case sz_word:
				comprintf("\tshra_w_rr(cdata,tmpcnt);\n");
				break;
			case sz_long:
				comprintf("\tshra_l_rr(cdata,tmpcnt);\n");
				break;
			default:
				assert(0);
				break;
			}
			/* If the shift count was higher than the width, we need
			 to pick up the sign from data */
			comprintf("test_l_ri(tmpcnt,highmask);\n"
					"cmov_l_rr(cdata,data,%d);\n", NATIVE_CC_NE);
			/* And create the flags */
			comprintf("\tstart_needflags();\n");
			comprintf("\tif (needed_flags & FLAG_ZNV)\n");
			switch (curi->size) {
			case sz_byte:
				comprintf("\t  test_b_rr(data,data);\n");
				break;
			case sz_word:
				comprintf("\t  test_w_rr(data,data);\n");
				break;
			case sz_long:
				comprintf("\t  test_l_rr(data,data);\n");
				break;
			}
			comprintf("\t bt_l_ri(cdata,0);\n"); /* Set C */
			comprintf("\t live_flags();\n");
			comprintf("\t end_needflags();\n");
			comprintf("\t duplicate_carry();\n");
			comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n");
			genastore("data", curi->dmode, "dstreg", curi->size, "data");
		} else {
			uses_cmov;
			start_brace();
			comprintf("\tint highmask;\n"
					"\tint width;\n"
					"\tint highshift=scratchie++;\n");
			switch (curi->size) {
			case sz_byte:
				comprintf("\tshra_b_rr(data,cnt);\n"
						"\thighmask=0x38;\n"
						"\twidth=8;\n");
				break;
			case sz_word:
				comprintf("\tshra_w_rr(data,cnt);\n"
						"\thighmask=0x30;\n"
						"\twidth=16;\n");
				break;
			case sz_long:
				comprintf("\tshra_l_rr(data,cnt);\n"
						"\thighmask=0x20;\n"
						"\twidth=32;\n");
				break;
			default:
				assert(0);
				break;
			}
			comprintf("test_l_ri(cnt,highmask);\n"
					"mov_l_ri(highshift,0);\n"
					"mov_l_ri(scratchie,width/2);\n"
					"cmov_l_rr(highshift,scratchie,%d);\n", NATIVE_CC_NE);
			/* The x86 masks out bits, so we now make sure that things
			 really get shifted as much as planned */
			switch (curi->size) {
			case sz_byte:
				comprintf("\tshra_b_rr(data,highshift);\n");
				break;
			case sz_word:
				comprintf("\tshra_w_rr(data,highshift);\n");
				break;
			case sz_long:
				comprintf("\tshra_l_rr(data,highshift);\n");
				break;
			default:
				assert(0);
				break;
			}
			/* And again */
			switch (curi->size) {
			case sz_byte:
				comprintf("\tshra_b_rr(data,highshift);\n");
				break;
			case sz_word:
				comprintf("\tshra_w_rr(data,highshift);\n");
				break;
			case sz_long:
				comprintf("\tshra_l_rr(data,highshift);\n");
				break;
			default:
				assert(0);
				break;
			}
			genastore("data", curi->dmode, "dstreg", curi->size, "data");
		}
	} else {
		start_brace();
		comprintf("\tint tmp=scratchie++;\n"
				"\tint bp;\n"
				"\tmov_l_rr(tmp,data);\n");
		switch (curi->size) {
		case sz_byte:
			comprintf("\tshra_b_ri(data,srcreg);\n"
					"\tbp=srcreg-1;\n");
			break;
		case sz_word:
			comprintf("\tshra_w_ri(data,srcreg);\n"
					"\tbp=srcreg-1;\n");
			break;
		case sz_long:
			comprintf("\tshra_l_ri(data,srcreg);\n"
					"\tbp=srcreg-1;\n");
			break;
		default:
			assert(0);
			break;
		}

		if (!noflags) {
			comprintf("\tstart_needflags();\n");
			comprintf("\tif (needed_flags & FLAG_ZNV)\n");
			switch (curi->size) {
			case sz_byte:
				comprintf("\t  test_b_rr(data,data);\n");
				break;
			case sz_word:
				comprintf("\t  test_w_rr(data,data);\n");
				break;
			case sz_long:
				comprintf("\t  test_l_rr(data,data);\n");
				break;
			}
			comprintf("\t bt_l_ri(tmp,bp);\n"); /* Set C */
			comprintf("\t live_flags();\n");
			comprintf("\t end_needflags();\n");
			comprintf("\t duplicate_carry();\n");
			comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n");
		}
		genastore("data", curi->dmode, "dstreg", curi->size, "data");
	}
#endif
}

static void gen_asrw(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
	(void) ssize;
#if defined(USE_JIT2)
	comprintf("\t dont_care_flags();\n");
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	start_brace();
	comprintf("\t int tmp = scratchie++;\n");

	if (!noflags) {
		comprintf("\t start_needflags();\n");
		comprintf("\t jff_ASRW(tmp,src);\n");
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
	} else {
		comprintf("\t jnf_ASRW(tmp,src);\n");
	}
	genastore("tmp", curi->smode, "srcreg", curi->size, "src");
#else
	(void) curi;
	failure;
#endif
}

static void gen_bchg(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
#if defined(USE_JIT2)
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0);
	start_brace();

	if (!noflags) {
		comprintf("\t make_flags_live();\n");
		comprintf("\t start_needflags();\n");
		comprintf("\t jff_BCHG_%s(dst,src);\n", ssize);
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
	} else {
		comprintf("\t jnf_BCHG_%s(dst,src);\n", ssize);
		comprintf("\t dont_care_flags();\n");
	}
	genastore("dst", curi->dmode, "dstreg", curi->size, "dst");
#else
	(void) ssize;
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0);
	start_brace();
	comprintf("\tint s=scratchie++;\n"
			"\tint tmp=scratchie++;\n"
			"\tmov_l_rr(s,src);\n");
	if (curi->size == sz_byte)
		comprintf("\tand_l_ri(s,7);\n");
	else
		comprintf("\tand_l_ri(s,31);\n");

	comprintf("\tbtc_l_rr(dst,s);\n" /* Answer now in C */
			"\tsbb_l(s,s);\n" /* s is 0 if bit was 0, -1 otherwise */
			"\tmake_flags_live();\n" /* Get the flags back */
			"\tdont_care_flags();\n");
	if (!noflags) {
		comprintf("\tstart_needflags();\n"
				"\tset_zero(s,tmp);\n"
				"\tlive_flags();\n"
				"\tend_needflags();\n");
	}
	genastore("dst", curi->dmode, "dstreg", curi->size, "dst");
#endif
}

static void gen_bclr(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
#if defined(USE_JIT2)
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0);
	start_brace();

	if (!noflags) {
		comprintf("\t make_flags_live();\n");
		comprintf("\t start_needflags();\n");
		comprintf("\t jff_BCLR_%s(dst,src);\n", ssize);
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
	} else {
		comprintf("\t jnf_BCLR_%s(dst,src);\n", ssize);
		comprintf("\t dont_care_flags();\n");
	}
	genastore("dst", curi->dmode, "dstreg", curi->size, "dst");
#else
	(void) ssize;
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0);
	start_brace();
	comprintf("\tint s=scratchie++;\n"
			"\tint tmp=scratchie++;\n"
			"\tmov_l_rr(s,src);\n");
	if (curi->size == sz_byte)
		comprintf("\tand_l_ri(s,7);\n");
	else
		comprintf("\tand_l_ri(s,31);\n");

	comprintf("\tbtr_l_rr(dst,s);\n" /* Answer now in C */
			"\tsbb_l(s,s);\n" /* s is 0 if bit was 0, -1 otherwise */
			"\tmake_flags_live();\n" /* Get the flags back */
			"\tdont_care_flags();\n");
	if (!noflags) {
		comprintf("\tstart_needflags();\n"
				"\tset_zero(s,tmp);\n"
				"\tlive_flags();\n"
				"\tend_needflags();\n");
	}
	genastore("dst", curi->dmode, "dstreg", curi->size, "dst");
#endif
}

static void gen_bset(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
#if defined(USE_JIT2)
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0);
	start_brace();

	if (!noflags) {
		comprintf("\t make_flags_live();\n");
		comprintf("\t start_needflags();\n");
		comprintf("\t jff_BSET_%s(dst,src);\n", ssize);
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
	} else {
		comprintf("\t jnf_BSET_%s(dst,src);\n", ssize);
		comprintf("\t dont_care_flags();\n");
	}
	genastore("dst", curi->dmode, "dstreg", curi->size, "dst");
#else
	(void) ssize;
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0);
	start_brace();
	comprintf("\tint s=scratchie++;\n"
			"\tint tmp=scratchie++;\n"
			"\tmov_l_rr(s,src);\n");
	if (curi->size == sz_byte)
		comprintf("\tand_l_ri(s,7);\n");
	else
		comprintf("\tand_l_ri(s,31);\n");

	comprintf("\tbts_l_rr(dst,s);\n" /* Answer now in C */
			"\tsbb_l(s,s);\n" /* s is 0 if bit was 0, -1 otherwise */
			"\tmake_flags_live();\n" /* Get the flags back */
			"\tdont_care_flags();\n");
	if (!noflags) {
		comprintf("\tstart_needflags();\n"
				"\tset_zero(s,tmp);\n"
				"\tlive_flags();\n"
				"\tend_needflags();\n");
	}
	genastore("dst", curi->dmode, "dstreg", curi->size, "dst");
#endif
}

static void gen_btst(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
#if defined(USE_JIT2)
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0);
	start_brace();

	// If we are not interested in flags it is not necessary to do
	// anything with the data
	if (!noflags) {
		comprintf("\t make_flags_live();\n");
		comprintf("\t start_needflags();\n");
		comprintf("\t jff_BTST_%s(dst,src);\n", ssize);
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
	} else {
		comprintf("\t dont_care_flags();\n");
	}
#else
	(void) ssize;
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0);
	start_brace();
	comprintf("\tint s=scratchie++;\n"
			"\tint tmp=scratchie++;\n"
			"\tmov_l_rr(s,src);\n");
	if (curi->size == sz_byte)
		comprintf("\tand_l_ri(s,7);\n");
	else
		comprintf("\tand_l_ri(s,31);\n");

	comprintf("\tbt_l_rr(dst,s);\n" /* Answer now in C */
			"\tsbb_l(s,s);\n" /* s is 0 if bit was 0, -1 otherwise */
			"\tmake_flags_live();\n" /* Get the flags back */
			"\tdont_care_flags();\n");
	if (!noflags) {
		comprintf("\tstart_needflags();\n"
				"\tset_zero(s,tmp);\n"
				"\tlive_flags();\n"
				"\tend_needflags();\n");
	}
#endif
}

static void gen_clr(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
	(void) ssize;
#if defined(USE_JIT2)
	genamode(curi->smode, "srcreg", curi->size, "src", 2, 0);
	comprintf("\t dont_care_flags();\n");
	start_brace();
	comprintf("\t int tmp=scratchie++;\n");
	if (!noflags) {
		comprintf("\t start_needflags();\n");
		comprintf("\t jff_CLR(tmp);\n");
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
	} else {
		comprintf("\t jnf_CLR(tmp);\n");
	}
	genastore("tmp", curi->smode, "srcreg", curi->size, "src");
#else
	genamode(curi->smode, "srcreg", curi->size, "src", 2, 0);
	start_brace();
	comprintf("\tint dst=scratchie++;\n");
	comprintf("\tmov_l_ri(dst,0);\n");
	genflags(flag_logical, curi->size, "dst", "", "");
	genastore("dst", curi->smode, "srcreg", curi->size, "src");
#endif
}

static void gen_cmp(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
#if defined(USE_JIT2)
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0);
	start_brace();
	comprintf("\t dont_care_flags();\n");
	if (!noflags) {
		comprintf("\t start_needflags();\n");
		comprintf("\t jff_CMP_%s(dst,src);\n", ssize);
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
		comprintf("\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n");
	} else {
		comprintf("/* Weird --- CMP with noflags ;-) */\n");
	}
#else
	(void) ssize;
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0);
	start_brace();
	genflags(flag_cmp, curi->size, "", "src", "dst");
#endif
}

static void gen_cmpa(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
#if  defined(USE_JIT2)
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	genamode(curi->dmode, "dstreg", sz_long, "dst", 1, 0);
	start_brace();
	if (!noflags) {
		comprintf("\t dont_care_flags();\n");
		comprintf("\t start_needflags();\n");
		comprintf("\t jff_CMPA_%s(dst,src);\n", ssize);
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
		comprintf("\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n");
	} else {
		comprintf("\tdont_care_flags();\n");
		comprintf("/* Weird --- CMP with noflags ;-) */\n");
	}
#else
	(void) ssize;
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	genamode(curi->dmode, "dstreg", sz_long, "dst", 1, 0);
	start_brace();
	comprintf("\tint tmps=scratchie++;\n");
	switch (curi->size) {
	case sz_byte:
		comprintf("\tsign_extend_8_rr(tmps,src);\n");
		break;
	case sz_word:
		comprintf("\tsign_extend_16_rr(tmps,src);\n");
		break;
	case sz_long:
		comprintf("tmps=src;\n");
		break;
	default:
		assert(0);
		break;
	}
	genflags(flag_cmp, sz_long, "", "tmps", "dst");
#endif
}

static void gen_dbcc(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
	(void) ssize;
#if 0
	isjump;
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "offs", 1, 0);

	comprintf("uae_u32 voffs;\n");
	comprintf("voffs = get_const(offs);\n");
	/* That offs is an immediate, so we can clobber it with abandon */
	switch (curi->size) {
		case sz_word:
		comprintf("\t voffs = (uae_s32)((uae_s16)voffs);\n");
		break;
		default:
		assert(0); /* Seems this only comes in word flavour */
		break;
	}
	comprintf("\t voffs -= m68k_pc_offset - m68k_pc_offset_thisinst - 2;\n");
	comprintf("\t voffs += (uintptr)comp_pc_p + m68k_pc_offset;\n");

	comprintf("\t add_const_v(PC_P, m68k_pc_offset);\n");
	comprintf("\t m68k_pc_offset = 0;\n");

	start_brace();

	if (curi->cc >= 2) {
		comprintf("\t make_flags_live();\n"); /* Load the flags */
	}

	assert(curi->size == sz_word);

	switch (curi->cc) {
		case 0: /* This is an elaborate nop? */
		break;
		case 1:
		case 2:
		case 3:
		case 4:
		case 5:
		case 6:
		case 7:
		case 8:
		case 9:
		case 10:
		case 11:
		case 12:
		case 13:
		case 14:
		case 15:
		comprintf("\t start_needflags();\n");
		comprintf("\t jnf_DBcc(src,voffs,%d);\n", curi->cc);
		comprintf("\t end_needflags();\n");
		break;
		default:
		assert(0);
		break;
	}
	genastore("src", curi->smode, "srcreg", curi->size, "src");
	gen_update_next_handler();
#else
	isjump;
	uses_cmov;
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "offs", 1, 0);

	/* That offs is an immediate, so we can clobber it with abandon */
	switch (curi->size) {
	case sz_word:
		comprintf("\tsign_extend_16_rr(offs,offs);\n");
		break;
	default:
		assert(0); /* Seems this only comes in word flavour */
		break;
	}
	comprintf("\tsub_l_ri(offs,m68k_pc_offset-m68k_pc_offset_thisinst-2);\n");
	comprintf("\tarm_ADD_l_ri(offs,(uintptr)comp_pc_p);\n");
	/* New PC,
	 once the
	 offset_68k is
	 * also added */
	/* Let's fold in the m68k_pc_offset at this point */
	comprintf("\tarm_ADD_l_ri(offs,m68k_pc_offset);\n");
	comprintf("\tarm_ADD_l_ri(PC_P,m68k_pc_offset);\n");
	comprintf("\tm68k_pc_offset=0;\n");

	start_brace();
	comprintf("\tint nsrc=scratchie++;\n");

	if (curi->cc >= 2) {
		comprintf("\tmake_flags_live();\n"); /* Load the flags */
	}

	assert (curi->size == sz_word);

	switch (curi->cc) {
	case 0: /* This is an elaborate nop? */
		break;
	case 1:
		comprintf("\tstart_needflags();\n");
		comprintf("\tsub_w_ri(src,1);\n");
		comprintf("\t end_needflags();\n");
		start_brace();
		comprintf("\tuae_u32 v2,v;\n"
				"\tuae_u32 v1=get_const(PC_P);\n");
		comprintf("\tv2=get_const(offs);\n"
				"\tregister_branch(v1,v2,%d);\n", NATIVE_CC_CC);
		break;

	case 8:
		failure;
		break; /* Work out details! FIXME */
	case 9:
		failure;
		break; /* Not critical, though! */

	case 2:
	case 3:
	case 4:
	case 5:
	case 6:
	case 7:
	case 10:
	case 11:
	case 12:
	case 13:
	case 14:
	case 15:
		comprintf("\tmov_l_rr(nsrc,src);\n");
		comprintf("\tlea_l_brr(scratchie,src,(uae_s32)-1);\n"
				"\tmov_w_rr(src,scratchie);\n");
		comprintf("\tcmov_l_rr(offs,PC_P,%d);\n", cond_codes[curi->cc]);
		comprintf("\tcmov_l_rr(src,nsrc,%d);\n", cond_codes[curi->cc]);
		/* OK, now for cc=true, we have src==nsrc and offs==PC_P,
		 so whether we move them around doesn't matter. However,
		 if cc=false, we have offs==jump_pc, and src==nsrc-1 */

		comprintf("\t start_needflags();\n");
		comprintf("\ttest_w_rr(nsrc,nsrc);\n");
		comprintf("\t end_needflags();\n");
		comprintf("\tcmov_l_rr(PC_P,offs,%d);\n", NATIVE_CC_NE);
		break;
	default:
		assert(0);
		break;
	}
	genastore("src", curi->smode, "srcreg", curi->size, "src");
	gen_update_next_handler();
#endif
}

static void gen_eor(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
#if defined(USE_JIT2)
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0);

	comprintf("\t dont_care_flags();\n");
	start_brace();
	comprintf("\t int tmp=scratchie++;\n");
	if (!noflags) {
		comprintf("\t jff_EOR_%s(tmp,dst,src);\n", ssize);
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
	} else {
		comprintf("\t jnf_EOR(tmp,dst,src);\n");
	}
	genastore("tmp", curi->dmode, "dstreg", curi->size, "dst");
#else
	(void) ssize;
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0);
	genflags(flag_eor, curi->size, "", "src", "dst");
	genastore("dst", curi->dmode, "dstreg", curi->size, "dst");
#endif
}

static void gen_eorsr(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
	(void) ssize;
#if defined(USE_JIT2)
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	if (!noflags) {
		comprintf("\t make_flags_live();\n");
		comprintf("\t start_needflags();\n");
		comprintf("\t jff_EORSR(ARM_CCR_MAP[src & 0xF], ((src & 0x10) >> 4));\n");
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
	}
#else
	(void) curi;
	failure;
	isjump;
#endif
}

static void gen_exg(uae_u32 opcode, struct instr *curi, const char* ssize) {
#if 0
#else
	(void) opcode;
	(void) ssize;
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0);
	start_brace();
	comprintf("\tint tmp=scratchie++;\n"
			"\tmov_l_rr(tmp,src);\n");
	genastore("dst", curi->smode, "srcreg", curi->size, "src");
	genastore("tmp", curi->dmode, "dstreg", curi->size, "dst");
#endif
}

static void gen_ext(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
#if defined(USE_JIT2)
	genamode(curi->smode, "srcreg", sz_long, "src", 1, 0);
	comprintf("\t dont_care_flags();\n");
	start_brace();
	comprintf("\t int tmp=scratchie++;\n");
	if (!noflags) {
		comprintf("\t start_needflags();\n");
		comprintf("\t jff_EXT_%s(tmp,src);\n", ssize);
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
	} else {
		comprintf("\t jnf_EXT_%s(tmp,src);\n", ssize);
	}
	genastore("tmp", curi->smode, "srcreg",
			curi->size == sz_word ? sz_word : sz_long, "src");
#else
	(void) ssize;
	genamode(curi->smode, "srcreg", sz_long, "src", 1, 0);
	comprintf("\tdont_care_flags();\n");
	start_brace();
	switch (curi->size) {
	case sz_byte:
		comprintf("\tint dst = src;\n"
				"\tsign_extend_8_rr(src,src);\n");
		break;
	case sz_word:
		comprintf("\tint dst = scratchie++;\n"
				"\tsign_extend_8_rr(dst,src);\n");
		break;
	case sz_long:
		comprintf("\tint dst = src;\n"
				"\tsign_extend_16_rr(src,src);\n");
		break;
	default:
		assert(0);
		break;
	}
	genflags(flag_logical, curi->size == sz_word ? sz_word : sz_long, "dst", "",
			"");
	genastore("dst", curi->smode, "srcreg",
			curi->size == sz_word ? sz_word : sz_long, "src");
#endif
}

static void gen_lsl(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
	(void) ssize;
#if defined(USE_JIT2)
	mayfail;
	if (curi->smode == Dreg) {
		comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n"
				"  FAIL(1);\n"
				"  return;\n"
				"} \n");
		start_brace();
	}
	comprintf("\tdont_care_flags();\n");

	genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0);
	comprintf("\t int tmp=scratchie++;\n");
	if (curi->smode != immi) {
		if (!noflags) {
			start_brace();
			comprintf("\t make_flags_live();\n");
			comprintf("\t start_needflags();\n");
			comprintf("\t jff_LSL_%s_reg(tmp,data,cnt);\n", ssize);
			comprintf("\t live_flags();\n");
			comprintf("\t end_needflags();\n");
			comprintf("\t duplicate_carry();\n");
			comprintf(
					"\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n");
		} else {
			start_brace();
			comprintf("\t jnf_LSL_reg(tmp,data,cnt);\n");
		}
	} else {
		start_brace();
		if (!noflags) {
			comprintf("\t make_flags_live();\n");
			comprintf("\t start_needflags();\n");
			comprintf("\t jff_LSL_%s_imm(tmp,data,srcreg);\n", ssize);
			comprintf("\t live_flags();\n");
			comprintf("\t end_needflags();\n");
			comprintf("\t duplicate_carry();\n");
			comprintf(
					"\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n");
		} else {
			comprintf("\t jnf_LSL_imm(tmp,data,srcreg);\n");
		}
	}
	genastore("tmp", curi->dmode, "dstreg", curi->size, "data");
#else
	mayfail;
	if (curi->smode == Dreg) {
		comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n"
				"  FAIL(1);\n"
				"  return;\n"
				"} \n");
		start_brace();
	}
	comprintf("\tdont_care_flags();\n");

	genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0);
	if (curi->smode != immi) {
		if (!noflags) {
			uses_cmov;
			start_brace();
			comprintf("\tint highmask;\n"
					"\tint cdata=scratchie++;\n"
					"\tint tmpcnt=scratchie++;\n");
			comprintf("\tmov_l_rr(tmpcnt,cnt);\n"
					"\tand_l_ri(tmpcnt,63);\n"
					"\tmov_l_ri(cdata,0);\n"
					"\tcmov_l_rr(cdata,data,%d);\n", NATIVE_CC_NE);
			/* cdata is now either data (for shift count!=0) or
			 0 (for shift count==0) */
			switch (curi->size) {
			case sz_byte:
				comprintf("\tshll_b_rr(data,cnt);\n"
						"\thighmask=0x38;\n");
				break;
			case sz_word:
				comprintf("\tshll_w_rr(data,cnt);\n"
						"\thighmask=0x30;\n");
				break;
			case sz_long:
				comprintf("\tshll_l_rr(data,cnt);\n"
						"\thighmask=0x20;\n");
				break;
			default:
				assert(0);
				break;
			}
			comprintf("test_l_ri(cnt,highmask);\n"
					"mov_l_ri(scratchie,0);\n"
					"cmov_l_rr(scratchie,data,%d);\n", NATIVE_CC_EQ);
			switch (curi->size) {
			case sz_byte:
				comprintf("\tmov_b_rr(data,scratchie);\n");
				break;
			case sz_word:
				comprintf("\tmov_w_rr(data,scratchie);\n");
				break;
			case sz_long:
				comprintf("\tmov_l_rr(data,scratchie);\n");
				break;
			default:
				assert(0);
				break;
			}
			/* Result of shift is now in data. Now we need to determine
			 the carry by shifting cdata one less */
			comprintf("\tsub_l_ri(tmpcnt,1);\n");
			switch (curi->size) {
			case sz_byte:
				comprintf("\tshll_b_rr(cdata,tmpcnt);\n");
				break;
			case sz_word:
				comprintf("\tshll_w_rr(cdata,tmpcnt);\n");
				break;
			case sz_long:
				comprintf("\tshll_l_rr(cdata,tmpcnt);\n");
				break;
			default:
				assert(0);
				break;
			}
			comprintf("test_l_ri(tmpcnt,highmask);\n"
					"mov_l_ri(scratchie,0);\n"
					"cmov_l_rr(cdata,scratchie,%d);\n", NATIVE_CC_NE);
			/* And create the flags */
			comprintf("\tstart_needflags();\n");
			comprintf("\tif (needed_flags & FLAG_ZNV)\n");
			switch (curi->size) {
			case sz_byte:
				comprintf("\t  test_b_rr(data,data);\n");
				comprintf("\t bt_l_ri(cdata,7);\n");
				break;
			case sz_word:
				comprintf("\t  test_w_rr(data,data);\n");
				comprintf("\t bt_l_ri(cdata,15);\n");
				break;
			case sz_long:
				comprintf("\t  test_l_rr(data,data);\n");
				comprintf("\t bt_l_ri(cdata,31);\n");
				break;
			}
			comprintf("\t live_flags();\n");
			comprintf("\t end_needflags();\n");
			comprintf("\t duplicate_carry();\n");
			comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n");
			genastore("data", curi->dmode, "dstreg", curi->size, "data");
		} else {
			uses_cmov;
			start_brace();
			comprintf("\tint highmask;\n");
			switch (curi->size) {
			case sz_byte:
				comprintf("\tshll_b_rr(data,cnt);\n"
						"\thighmask=0x38;\n");
				break;
			case sz_word:
				comprintf("\tshll_w_rr(data,cnt);\n"
						"\thighmask=0x30;\n");
				break;
			case sz_long:
				comprintf("\tshll_l_rr(data,cnt);\n"
						"\thighmask=0x20;\n");
				break;
			default:
				assert(0);
				break;
			}
			comprintf("test_l_ri(cnt,highmask);\n"
					"mov_l_ri(scratchie,0);\n"
					"cmov_l_rr(scratchie,data,%d);\n", NATIVE_CC_EQ);
			switch (curi->size) {
			case sz_byte:
				comprintf("\tmov_b_rr(data,scratchie);\n");
				break;
			case sz_word:
				comprintf("\tmov_w_rr(data,scratchie);\n");
				break;
			case sz_long:
				comprintf("\tmov_l_rr(data,scratchie);\n");
				break;
			default:
				assert(0);
				break;
			}
			genastore("data", curi->dmode, "dstreg", curi->size, "data");
		}
	} else {
		start_brace();
		comprintf("\tint tmp=scratchie++;\n"
				"\tint bp;\n"
				"\tmov_l_rr(tmp,data);\n");
		switch (curi->size) {
		case sz_byte:
			comprintf("\tshll_b_ri(data,srcreg);\n"
					"\tbp=8-srcreg;\n");
			break;
		case sz_word:
			comprintf("\tshll_w_ri(data,srcreg);\n"
					"\tbp=16-srcreg;\n");
			break;
		case sz_long:
			comprintf("\tshll_l_ri(data,srcreg);\n"
					"\tbp=32-srcreg;\n");
			break;
		default:
			assert(0);
			break;
		}

		if (!noflags) {
			comprintf("\tstart_needflags();\n");
			comprintf("\tif (needed_flags & FLAG_ZNV)\n");
			switch (curi->size) {
			case sz_byte:
				comprintf("\t  test_b_rr(data,data);\n");
				break;
			case sz_word:
				comprintf("\t  test_w_rr(data,data);\n");
				break;
			case sz_long:
				comprintf("\t  test_l_rr(data,data);\n");
				break;
			}
			comprintf("\t bt_l_ri(tmp,bp);\n"); /* Set C */
			comprintf("\t live_flags();\n");
			comprintf("\t end_needflags();\n");
			comprintf("\t duplicate_carry();\n");
			comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n");
		}
		genastore("data", curi->dmode, "dstreg", curi->size, "data");
	}
#endif
}

static void gen_lslw(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
	(void) ssize;
#if defined(USE_JIT2)
	comprintf("\t dont_care_flags();\n");
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	start_brace();
	comprintf("\t int tmp=scratchie++;\n");
	if (!noflags) {
		comprintf("\t start_needflags();\n");
		comprintf("\t jff_LSLW(tmp,src);\n");
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
	} else {
		comprintf("\t jnf_LSLW(tmp,src);\n");
	}
	genastore("tmp", curi->smode, "srcreg", curi->size, "src");
#else
	(void) curi;
	failure;
#endif
}

static void gen_lsr(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
#if defined(USE_JIT2)
	mayfail;
	if (curi->smode == Dreg) {
		comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n"
				"  FAIL(1);\n"
				"  return;\n"
				"} \n");
		start_brace();
	}
	comprintf("\t dont_care_flags();\n");

	genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0);
	comprintf("\t int tmp=scratchie++;\n");
	if (curi->smode != immi) {
		if (!noflags) {
			start_brace();
			comprintf("\t make_flags_live();\n");
			comprintf("\t start_needflags();\n");
			comprintf("\t jff_LSR_%s_reg(tmp,data,cnt);\n", ssize);
			comprintf("\t live_flags();\n");
			comprintf("\t end_needflags();\n");
			comprintf("\t duplicate_carry();\n");
			comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n");
		} else {
			start_brace();
			comprintf("\t jnf_LSR_%s_reg(tmp,data,cnt);\n", ssize);
		}
	} else {
		start_brace();
		char *op;
		if (!noflags) {
			comprintf("\t make_flags_live();\n");
			comprintf("\t start_needflags();\n");
			op = "ff";
		} else
		op = "nf";

		comprintf("\t j%s_LSR_%s_imm(tmp,data,srcreg);\n", op, ssize);

		if (!noflags) {
			comprintf("\t live_flags();\n");
			comprintf("\t end_needflags();\n");
			comprintf("\t duplicate_carry();\n");
			comprintf(
					"\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n");
		}
	}
	genastore("tmp", curi->dmode, "dstreg", curi->size, "data");
#else
	(void) ssize;
	mayfail;
	if (curi->smode == Dreg) {
		comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n"
				"  FAIL(1);\n"
				"  return;\n"
				"} \n");
		start_brace();
	}
	comprintf("\tdont_care_flags();\n");

	genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0);
	if (curi->smode != immi) {
		if (!noflags) {
			uses_cmov;
			start_brace();
			comprintf("\tint highmask;\n"
					"\tint cdata=scratchie++;\n"
					"\tint tmpcnt=scratchie++;\n");
			comprintf("\tmov_l_rr(tmpcnt,cnt);\n"
					"\tand_l_ri(tmpcnt,63);\n"
					"\tmov_l_ri(cdata,0);\n"
					"\tcmov_l_rr(cdata,data,%d);\n", NATIVE_CC_NE);
			/* cdata is now either data (for shift count!=0) or
			 0 (for shift count==0) */
			switch (curi->size) {
			case sz_byte:
				comprintf("\tshrl_b_rr(data,cnt);\n"
						"\thighmask=0x38;\n");
				break;
			case sz_word:
				comprintf("\tshrl_w_rr(data,cnt);\n"
						"\thighmask=0x30;\n");
				break;
			case sz_long:
				comprintf("\tshrl_l_rr(data,cnt);\n"
						"\thighmask=0x20;\n");
				break;
			default:
				assert(0);
				break;
			}
			comprintf("test_l_ri(cnt,highmask);\n"
					"mov_l_ri(scratchie,0);\n"
					"cmov_l_rr(scratchie,data,%d);\n", NATIVE_CC_EQ);
			switch (curi->size) {
			case sz_byte:
				comprintf("\tmov_b_rr(data,scratchie);\n");
				break;
			case sz_word:
				comprintf("\tmov_w_rr(data,scratchie);\n");
				break;
			case sz_long:
				comprintf("\tmov_l_rr(data,scratchie);\n");
				break;
			default:
				assert(0);
				break;
			}
			/* Result of shift is now in data. Now we need to determine
			 the carry by shifting cdata one less */
			comprintf("\tsub_l_ri(tmpcnt,1);\n");
			switch (curi->size) {
			case sz_byte:
				comprintf("\tshrl_b_rr(cdata,tmpcnt);\n");
				break;
			case sz_word:
				comprintf("\tshrl_w_rr(cdata,tmpcnt);\n");
				break;
			case sz_long:
				comprintf("\tshrl_l_rr(cdata,tmpcnt);\n");
				break;
			default:
				assert(0);
				break;
			}
			comprintf("test_l_ri(tmpcnt,highmask);\n"
					"mov_l_ri(scratchie,0);\n"
					"cmov_l_rr(cdata,scratchie,%d);\n", NATIVE_CC_NE);
			/* And create the flags */
			comprintf("\tstart_needflags();\n");
			comprintf("\tif (needed_flags & FLAG_ZNV)\n");
			switch (curi->size) {
			case sz_byte:
				comprintf("\t  test_b_rr(data,data);\n");
				break;
			case sz_word:
				comprintf("\t  test_w_rr(data,data);\n");
				break;
			case sz_long:
				comprintf("\t  test_l_rr(data,data);\n");
				break;
			}
			comprintf("\t bt_l_ri(cdata,0);\n"); /* Set C */
			comprintf("\t live_flags();\n");
			comprintf("\t end_needflags();\n");
			comprintf("\t duplicate_carry();\n");
			comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n");
			genastore("data", curi->dmode, "dstreg", curi->size, "data");
		} else {
			uses_cmov;
			start_brace();
			comprintf("\tint highmask;\n");
			switch (curi->size) {
			case sz_byte:
				comprintf("\tshrl_b_rr(data,cnt);\n"
						"\thighmask=0x38;\n");
				break;
			case sz_word:
				comprintf("\tshrl_w_rr(data,cnt);\n"
						"\thighmask=0x30;\n");
				break;
			case sz_long:
				comprintf("\tshrl_l_rr(data,cnt);\n"
						"\thighmask=0x20;\n");
				break;
			default:
				assert(0);
				break;
			}
			comprintf("test_l_ri(cnt,highmask);\n"
					"mov_l_ri(scratchie,0);\n"
					"cmov_l_rr(scratchie,data,%d);\n", NATIVE_CC_EQ);
			switch (curi->size) {
			case sz_byte:
				comprintf("\tmov_b_rr(data,scratchie);\n");
				break;
			case sz_word:
				comprintf("\tmov_w_rr(data,scratchie);\n");
				break;
			case sz_long:
				comprintf("\tmov_l_rr(data,scratchie);\n");
				break;
			default:
				assert(0);
				break;
			}
			genastore("data", curi->dmode, "dstreg", curi->size, "data");
		}
	} else {
		start_brace();
		comprintf("\tint tmp=scratchie++;\n"
				"\tint bp;\n"
				"\tmov_l_rr(tmp,data);\n");
		switch (curi->size) {
		case sz_byte:
			comprintf("\tshrl_b_ri(data,srcreg);\n"
					"\tbp=srcreg-1;\n");
			break;
		case sz_word:
			comprintf("\tshrl_w_ri(data,srcreg);\n"
					"\tbp=srcreg-1;\n");
			break;
		case sz_long:
			comprintf("\tshrl_l_ri(data,srcreg);\n"
					"\tbp=srcreg-1;\n");
			break;
		default:
			assert(0);
			break;
		}

		if (!noflags) {
			comprintf("\tstart_needflags();\n");
			comprintf("\tif (needed_flags & FLAG_ZNV)\n");
			switch (curi->size) {
			case sz_byte:
				comprintf("\t  test_b_rr(data,data);\n");
				break;
			case sz_word:
				comprintf("\t  test_w_rr(data,data);\n");
				break;
			case sz_long:
				comprintf("\t  test_l_rr(data,data);\n");
				break;
			}
			comprintf("\t bt_l_ri(tmp,bp);\n"); /* Set C */
			comprintf("\t live_flags();\n");
			comprintf("\t end_needflags();\n");
			comprintf("\t duplicate_carry();\n");
			comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n");
		}
		genastore("data", curi->dmode, "dstreg", curi->size, "data");
	}
#endif
}

static void gen_lsrw(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
	(void) ssize;
#if defined(USE_JIT2)
	comprintf("\t dont_care_flags();\n");
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	start_brace();
	comprintf("\t int tmp = scratchie++;\n");

	if (!noflags) {
		comprintf("\t start_needflags();\n");
		comprintf("\t jff_LSRW(tmp,src);\n");
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
	} else {
		comprintf("\t jnf_LSRW(tmp,src);\n");
	}
	genastore("tmp", curi->smode, "srcreg", curi->size, "src");
#else
	(void) curi;
	failure;
#endif
}

static void gen_move(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
#if defined(USE_JIT2)
	switch (curi->dmode) {
		case Dreg:
		case Areg:
		genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
		genamode(curi->dmode, "dstreg", curi->size, "dst", 2, 0);
		comprintf("\t dont_care_flags();\n");
		start_brace();
		comprintf("\t int tmp=scratchie++;\n");
		if (!noflags && curi->dmode == Dreg) {
			comprintf("\t start_needflags();\n");
			comprintf("\t jff_MOVE_%s(tmp, src);\n", ssize);
			comprintf("\t live_flags();\n");
			comprintf("\t end_needflags();\n");
		} else {
			comprintf("\t tmp = src;\n");
		}
		genastore("tmp", curi->dmode, "dstreg", curi->size, "dst");
		break;

		default: /* It goes to memory, not a register */
		genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
		genamode(curi->dmode, "dstreg", curi->size, "dst", 2, 0);
		comprintf("\t dont_care_flags();\n");
		start_brace();
		if (!noflags) {
			comprintf("\t start_needflags();\n");
			comprintf("\t jff_TST_%s(src);\n", ssize);
			comprintf("\t live_flags();\n");
			comprintf("\t end_needflags();\n");
		}
		genastore("src", curi->dmode, "dstreg", curi->size, "dst");
		break;
	}
#else
	(void) ssize;

	switch (curi->dmode) {
	case Dreg:
	case Areg:
		genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
		genamode(curi->dmode, "dstreg", curi->size, "dst", 2, 0);
		genflags(flag_mov, curi->size, "", "src", "dst");
		genastore("dst", curi->dmode, "dstreg", curi->size, "dst");
		break;
	default: /* It goes to memory, not a register */
		genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
		genamode(curi->dmode, "dstreg", curi->size, "dst", 2, 0);
		genflags(flag_logical, curi->size, "src", "", "");
		genastore("src", curi->dmode, "dstreg", curi->size, "dst");
		break;
	}
#endif
}

static void gen_movea(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
#if defined(USE_JIT2)
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "dst", 2, 0);

	start_brace();
	comprintf("\t jnf_MOVEA_%s(dst, src);\n", ssize);
	genastore("dst", curi->dmode, "dstreg", sz_long, "dst");
#else
	(void) ssize;

	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "dst", 2, 0);

	start_brace();
	comprintf("\tint tmps=scratchie++;\n");
	switch (curi->size) {
	case sz_word:
		comprintf("\tsign_extend_16_rr(dst,src);\n");
		break;
	case sz_long:
		comprintf("\tmov_l_rr(dst,src);\n");
		break;
	default:
		assert(0);
		break;
	}
	genastore("dst", curi->dmode, "dstreg", sz_long, "dst");
#endif
}

static void gen_mull(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
	(void) ssize;
#if defined(USE_JIT2)
	comprintf("\t uae_u16 extra=%s;\n", gen_nextiword());
	comprintf("\t int r2=(extra>>12)&7;\n"
			"\t int tmp=scratchie++;\n");
	genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0);
	/* The two operands are in dst and r2 */
	if (!noflags) {
		comprintf("\t if (extra & 0x0400) {\n"); /* Need full 64 bit result */
		comprintf("\t   int r3=(extra & 7);\n");
		comprintf("\t   mov_l_rr(r3,dst);\n"); /* operands now in r3 and r2 */
		comprintf("\t   if (extra & 0x0800) { \n"); /* signed */
		comprintf("\t\t	  jff_MULS64(r2,r3);\n");
		comprintf("\t	} else { \n");
		comprintf("\t\t	  jff_MULU64(r2,r3);\n");
		comprintf("\t	} \n"); /* The result is in r2/r3, with r2 holding the lower 32 bits */
		comprintf("\t } else {\n"); /* Only want 32 bit result */
		/* operands in dst and r2, result goes into r2 */
		/* shouldn't matter whether it's signed or unsigned?!? */
		comprintf("\t   if (extra & 0x0800) { \n"); /* signed */
		comprintf("\t     jff_MULS32(r2,dst);\n");
		comprintf("\t	} else { \n");
		comprintf("\t\t	  jff_MULU32(r2,dst);\n");
		comprintf("\t	} \n"); /* The result is in r2, with r2 holding the lower 32 bits */
		comprintf("\t }\n");
	} else {
		comprintf("\t if (extra & 0x0400) {\n"); /* Need full 64 bit result */
		comprintf("\t   int r3=(extra & 7);\n");
		comprintf("\t   mov_l_rr(r3,dst);\n"); /* operands now in r3 and r2 */
		comprintf("\t   if (extra & 0x0800) { \n"); /* signed */
		comprintf("\t\t	  jnf_MULS64(r2,r3);\n");
		comprintf("\t	} else { \n");
		comprintf("\t\t	  jnf_MULU64(r2,r3);\n");
		comprintf("\t	} \n"); /* The result is in r2/r3, with r2 holding the lower 32 bits */
		comprintf("\t } else {\n"); /* Only want 32 bit result */
		/* operands in dst and r2, result foes into r2 */
		/* shouldn't matter whether it's signed or unsigned?!? */
		comprintf("\t   if (extra & 0x0800) { \n"); /* signed */
		comprintf("\t     jnf_MULS32(r2,dst);\n");
		comprintf("\t	} else { \n");
		comprintf("\t\t	  jnf_MULU32(r2,dst);\n");
		comprintf("\t	} \n"); /* The result is in r2, with r2 holding the lower 32 bits */
		comprintf("\t }\n");
	}
#else
	if (!noflags) {
		failure;
		return;
	}
	comprintf("\tuae_u16 extra=%s;\n", gen_nextiword());
	comprintf("\tint r2=(extra>>12)&7;\n"
			"\tint tmp=scratchie++;\n");

	genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0);
	/* The two operands are in dst and r2 */
	comprintf("\tif (extra&0x0400) {\n" /* Need full 64 bit result */
			"\tint r3=(extra&7);\n"
			"\tmov_l_rr(r3,dst);\n"); /* operands now in r3 and r2 */
	comprintf("\tif (extra&0x0800) { \n" /* signed */
			"\t\timul_64_32(r2,r3);\n"
			"\t} else { \n"
			"\t\tmul_64_32(r2,r3);\n"
			"\t} \n");
	/* The result is in r2/tmp, with r2 holding the lower 32 bits */
	comprintf("\t} else {\n"); /* Only want 32 bit result */
	/* operands in dst and r2, result foes into r2 */
	/* shouldn't matter whether it's signed or unsigned?!? */
	comprintf("\timul_32_32(r2,dst);\n"
			"\t}\n");
#endif
}

static void gen_muls(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
	(void) ssize;
#if defined(USE_JIT2)
	comprintf("\t dont_care_flags();\n");
	genamode(curi->smode, "srcreg", sz_word, "src", 1, 0);
	genamode(curi->dmode, "dstreg", sz_word, "dst", 1, 0);
	start_brace();
	if (!noflags) {
		comprintf("\t start_needflags();\n");
		comprintf("\t jff_MULS(dst,src);\n");
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
	} else {
		comprintf("\t jnf_MULS(dst,src);\n");
	}
	genastore("dst", curi->dmode, "dstreg", sz_long, "dst");
#else
	comprintf("\tdont_care_flags();\n");
	genamode(curi->smode, "srcreg", sz_word, "src", 1, 0);
	genamode(curi->dmode, "dstreg", sz_word, "dst", 1, 0);
	comprintf("\tsign_extend_16_rr(scratchie,src);\n"
			"\tsign_extend_16_rr(dst,dst);\n"
			"\timul_32_32(dst,scratchie);\n");
	genflags(flag_logical, sz_long, "dst", "", "");
	genastore("dst", curi->dmode, "dstreg", sz_long, "dst");
#endif
}

static void gen_mulu(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
	(void) ssize;
#if defined(USE_JIT2)
	comprintf("\t dont_care_flags();\n");
	genamode(curi->smode, "srcreg", sz_word, "src", 1, 0);
	genamode(curi->dmode, "dstreg", sz_word, "dst", 1, 0);
	start_brace();
	if (!noflags) {
		comprintf("\t start_needflags();\n");
		comprintf("\t jff_MULU(dst,src);\n");
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
	} else {
		comprintf("\t jnf_MULU(dst,src);\n");
	}
	genastore("dst", curi->dmode, "dstreg", sz_long, "dst");
#else
	comprintf("\tdont_care_flags();\n");
	genamode(curi->smode, "srcreg", sz_word, "src", 1, 0);
	genamode(curi->dmode, "dstreg", sz_word, "dst", 1, 0);
	/* To do 16x16 unsigned multiplication, we actually use
	 32x32 signed, and zero-extend the registers first.
	 That solves the problem of MUL needing dedicated registers
	 on the x86 */
	comprintf("\tzero_extend_16_rr(scratchie,src);\n"
			"\tzero_extend_16_rr(dst,dst);\n"
			"\timul_32_32(dst,scratchie);\n");
	genflags(flag_logical, sz_long, "dst", "", "");
	genastore("dst", curi->dmode, "dstreg", sz_long, "dst");

#endif
}

static void gen_nbcd(uae_u32 opcode, struct instr *curi, const char* ssize) {
#if 0
#else
	(void) opcode;
	(void) curi;
	(void) ssize;
	failure;
	/* Nope! */
#endif
}

static void gen_neg(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
#if defined(USE_JIT2)
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	start_brace();
	comprintf("\t int tmp=scratchie++;\n");
	if (!noflags) {
		comprintf("\t start_needflags();\n");
		comprintf("\t jff_NEG_%s(tmp,src);\n", ssize);
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
		duplicate_carry();
		comprintf("\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n");
	} else {
		comprintf("\t jnf_NEG(tmp,src);\n");
	}

	genastore("tmp", curi->smode, "srcreg", curi->size, "src");
#else
	(void) ssize;
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	start_brace();
	comprintf("\tint dst=scratchie++;\n");
	comprintf("\tmov_l_ri(dst,0);\n");
	genflags(flag_sub, curi->size, "", "src", "dst");
	genastore("dst", curi->smode, "srcreg", curi->size, "src");
#endif
}

static void gen_negx(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
#if defined(USE_JIT2)
	isaddx;
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	start_brace();
	comprintf("\t int dst=scratchie++;\n");

	if (!noflags) {
		comprintf("\t make_flags_live();\n");
		comprintf("\t restore_inverted_carry();\n"); /* Reload the X flag into C */
		comprintf("\t start_needflags();\n");
		comprintf("\t jff_NEGX_%s(dst,src);\n", ssize);
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
		duplicate_carry();
		comprintf("\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n");
	} else {
		comprintf("\t restore_inverted_carry();\n"); /* Reload the X flag into C */
		comprintf("\t jnf_NEGX(dst,src);\n");
	}

	genastore("dst", curi->smode, "srcreg", curi->size, "src");
#else
	(void) ssize;
	isaddx;
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	start_brace();
	comprintf("\tint dst=scratchie++;\n");
	comprintf("\tmov_l_ri(dst,0);\n");
	genflags(flag_subx, curi->size, "", "src", "dst");
	genastore("dst", curi->smode, "srcreg", curi->size, "src");
#endif
}

static void gen_not(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
#if defined(USE_JIT2)
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	comprintf("\t dont_care_flags();\n");
	start_brace();
	comprintf("\t int tmp=scratchie++;\n");
	if (!noflags) {
		comprintf("\t start_needflags();\n");
		comprintf("\t jff_NOT_%s(tmp,src);\n", ssize);
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
	} else {
		comprintf("\t jnf_NOT(tmp,src);\n", ssize);
	}
	genastore("tmp", curi->smode, "srcreg", curi->size, "src");
#else
	(void) ssize;
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	start_brace();
	comprintf("\tint dst=scratchie++;\n");
	comprintf("\tmov_l_ri(dst,0xffffffff);\n");
	genflags(flag_eor, curi->size, "", "src", "dst");
	genastore("dst", curi->smode, "srcreg", curi->size, "src");
#endif
}

static void gen_or(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
#if defined(USE_JIT2)
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0);

	comprintf("\t dont_care_flags();\n");
	start_brace();
	comprintf("\t int tmp=scratchie++;\n");
	if (!noflags) {
		comprintf("\t jff_OR_%s(tmp, dst,src);\n", ssize);
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
	} else {
		comprintf("\t jnf_OR(tmp, dst,src);\n");
	}
	genastore("tmp", curi->dmode, "dstreg", curi->size, "dst");
#else
	(void) ssize;
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0);
	genflags(flag_or, curi->size, "", "src", "dst");
	genastore("dst", curi->dmode, "dstreg", curi->size, "dst");
#endif
}

static void gen_orsr(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
	(void) ssize;
#if defined(USE_JIT2)
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	if (!noflags) {
		comprintf("\t make_flags_live();\n");
		comprintf("\t start_needflags();\n");
		comprintf("\t jff_ORSR(ARM_CCR_MAP[src & 0xF], ((src & 0x10) >> 4));\n");
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
	}
#else
	(void) curi;
	failure;
	isjump;
#endif
}

static void gen_rol(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
#if defined(USE_JIT2)
	mayfail;
	if (curi->smode == Dreg) {
		comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n"
				"  FAIL(1);\n"
				"  return;\n"
				"} \n");
		start_brace();
	}
	comprintf("\t dont_care_flags();\n");
	genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0);
	start_brace();
	comprintf("\t int tmp=scratchie++;\n");

	if (!noflags) {
		comprintf("\t start_needflags();\n");
		comprintf("\t jff_ROL_%s(tmp,data,cnt);\n", ssize);
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
	} else {
		comprintf("\t jnf_ROL_%s(tmp,data,cnt);\n", ssize);
	}
	genastore("tmp", curi->dmode, "dstreg", curi->size, "data");
#else
	(void) ssize;

	mayfail;
	if (curi->smode == Dreg) {
		comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n"
				"  FAIL(1);\n"
				"  return;\n"
				"} \n");
		start_brace();
	}
	comprintf("\tdont_care_flags();\n");
	genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0);
	start_brace();

	switch (curi->size) {
	case sz_long:
		comprintf("\t rol_l_rr(data,cnt);\n");
		break;
	case sz_word:
		comprintf("\t rol_w_rr(data,cnt);\n");
		break;
	case sz_byte:
		comprintf("\t rol_b_rr(data,cnt);\n");
		break;
	}

	if (!noflags) {
		comprintf("\tstart_needflags();\n");
		comprintf("\tif (needed_flags & FLAG_ZNV)\n");
		switch (curi->size) {
		case sz_byte:
			comprintf("\t  test_b_rr(data,data);\n");
			break;
		case sz_word:
			comprintf("\t  test_w_rr(data,data);\n");
			break;
		case sz_long:
			comprintf("\t  test_l_rr(data,data);\n");
			break;
		}
		comprintf("\t bt_l_ri(data,0x00);\n"); /* Set C */
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
	}
	genastore("data", curi->dmode, "dstreg", curi->size, "data");
#endif
}

static void gen_rolw(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
	(void) ssize;
#if defined(USE_JIT2)
	comprintf("\t dont_care_flags();\n");
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	start_brace();
	comprintf("\t int tmp = scratchie++;\n");

	if (!noflags) {
		comprintf("\t start_needflags();\n");
		comprintf("\t jff_ROLW(tmp,src);\n");
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
	} else {
		comprintf("\t jnf_ROLW(tmp,src);\n");
	}
	genastore("tmp", curi->smode, "srcreg", curi->size, "src");
#else
	(void) curi;
	failure;
#endif
}

static void gen_ror(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
#if defined(USE_JIT2)
	mayfail;
	if (curi->smode == Dreg) {
		comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n"
				"  FAIL(1);\n"
				"  return;\n"
				"} \n");
		start_brace();
	}
	comprintf("\t dont_care_flags();\n");
	genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0);
	start_brace();
	comprintf("\t int tmp=scratchie++;\n");

	if (!noflags) {
		comprintf("\t start_needflags();\n");
		comprintf("\t jff_ROR_%s(tmp,data,cnt);\n", ssize);
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
	} else {
		comprintf("\t jnf_ROR_%s(tmp,data,cnt);\n", ssize);
	}
	genastore("tmp", curi->dmode, "dstreg", curi->size, "data");
#else
	(void) ssize;
	mayfail;
	if (curi->smode == Dreg) {
		comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n"
				"  FAIL(1);\n"
				"  return;\n"
				"} \n");
		start_brace();
	}
	comprintf("\tdont_care_flags();\n");
	genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0);
	start_brace();

	switch (curi->size) {
	case sz_long:
		comprintf("\t ror_l_rr(data,cnt);\n");
		break;
	case sz_word:
		comprintf("\t ror_w_rr(data,cnt);\n");
		break;
	case sz_byte:
		comprintf("\t ror_b_rr(data,cnt);\n");
		break;
	}

	if (!noflags) {
		comprintf("\tstart_needflags();\n");
		comprintf("\tif (needed_flags & FLAG_ZNV)\n");
		switch (curi->size) {
		case sz_byte:
			comprintf("\t  test_b_rr(data,data);\n");
			break;
		case sz_word:
			comprintf("\t  test_w_rr(data,data);\n");
			break;
		case sz_long:
			comprintf("\t  test_l_rr(data,data);\n");
			break;
		}
		switch (curi->size) {
		case sz_byte:
			comprintf("\t bt_l_ri(data,0x07);\n");
			break;
		case sz_word:
			comprintf("\t bt_l_ri(data,0x0f);\n");
			break;
		case sz_long:
			comprintf("\t bt_l_ri(data,0x1f);\n");
			break;
		}
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
	}
	genastore("data", curi->dmode, "dstreg", curi->size, "data");
#endif
}

static void gen_rorw(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
	(void) ssize;
#if defined(USE_JIT2)
	comprintf("\t dont_care_flags();\n");
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	start_brace();
	comprintf("\t int tmp = scratchie++;\n");

	if (!noflags) {
		comprintf("\t start_needflags();\n");
		comprintf("\t jff_RORW(tmp,src);\n");
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
	} else {
		comprintf("\t jnf_RORW(tmp,src);\n");
	}
	genastore("tmp", curi->smode, "srcreg", curi->size, "src");
#else
	(void) curi;
	failure;
#endif
}

static void gen_roxl(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
#if defined(USE_JIT2)
	mayfail;
	if (curi->smode == Dreg) {
		comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n"
				"  FAIL(1);\n"
				"  return;\n"
				"} \n");
		start_brace();
	}
	isaddx;
	comprintf("\t dont_care_flags();\n");
	genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0);
	start_brace();
	comprintf("\t int tmp=scratchie++;\n");

	if (!noflags) {
		comprintf("\t make_flags_live();\n");
		comprintf("\t restore_carry();\n"); /* Reload the X flag into C */
		comprintf("\t start_needflags();\n");
		comprintf("\t jff_ROXL_%s(tmp,data,cnt);\n", ssize);
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
		duplicate_carry();
	} else {
		comprintf("\t restore_carry();\n"); /* Reload the X flag into C */
		comprintf("\t jnf_ROXL_%s(tmp,data,cnt);\n", ssize);
	}
	genastore("tmp", curi->dmode, "dstreg", curi->size, "data");
#else
	(void) curi;
	(void) ssize;
	failure;
#endif
}

static void gen_roxlw(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
	(void) ssize;
#if defined(USE_JIT2)
	isaddx;
	comprintf("\t dont_care_flags();\n");
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	start_brace();
	comprintf("\t int tmp = scratchie++;\n");

	if (!noflags) {
		comprintf("\t make_flags_live();\n");
		comprintf("\t restore_carry();\n"); /* Reload the X flag into C */
		comprintf("\t start_needflags();\n");
		comprintf("\t jff_ROXLW(tmp,src);\n");
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
		duplicate_carry();
	} else {
		comprintf("\t restore_carry();\n"); /* Reload the X flag into C */
		comprintf("\t jnf_ROXLW(tmp,src);\n");
	}
	genastore("tmp", curi->smode, "srcreg", curi->size, "src");
#else
	(void) curi;
	failure;
#endif
}

static void gen_roxr(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
	(void) ssize;
#if defined(USE_JIT2)
	mayfail;
	if (curi->smode == Dreg) {
		comprintf("if ((uae_u32)srcreg==(uae_u32)dstreg) {\n"
				"  FAIL(1);\n"
				"  return;\n"
				"} \n");
		start_brace();
	}
	isaddx;
	comprintf("\t dont_care_flags();\n");
	genamode(curi->smode, "srcreg", curi->size, "cnt", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "data", 1, 0);
	start_brace();
	comprintf("\t int tmp=scratchie++;\n");

	if (!noflags) {
		comprintf("\t make_flags_live();\n");
		comprintf("\t restore_carry();\n"); /* Reload the X flag into C */
		comprintf("\t start_needflags();\n");
		comprintf("\t jff_ROXR_%s(tmp,data,cnt);\n", ssize);
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
		duplicate_carry();
	} else {
		comprintf("\t restore_carry();\n"); /* Reload the X flag into C */
		comprintf("\t jnf_ROXR_%s(tmp,data,cnt);\n", ssize);
	}
	genastore("tmp", curi->dmode, "dstreg", curi->size, "data");
#else
	(void) curi;
	failure;
#endif
}

static void gen_roxrw(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
	(void) ssize;
#if defined(USE_JIT2)
	isaddx;
	comprintf("\t dont_care_flags();\n");
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	start_brace();
	comprintf("\t int tmp = scratchie++;\n");

	if (!noflags) {
		comprintf("\t make_flags_live();\n");
		comprintf("\t restore_carry();\n"); /* Reload the X flag into C */
		comprintf("\t start_needflags();\n");
		comprintf("\t jff_ROXRW(tmp,src);\n");
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
		duplicate_carry();
	} else {
		comprintf("\t restore_carry();\n"); /* Reload the X flag into C */
		comprintf("\t jnf_ROXRW(tmp,src);\n");
	}
	genastore("tmp", curi->smode, "srcreg", curi->size, "src");
#else
	(void) curi;
	failure;
#endif
}

static void gen_sbcd(uae_u32 opcode, struct instr *curi, const char* ssize) {
#if 0
#else
	(void) opcode;
	(void) curi;
	(void) ssize;
	failure;
	/* I don't think so! */
#endif
}

static void gen_scc(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
	(void) ssize;
#if 0
	genamode(curi->smode, "srcreg", curi->size, "src", 2, 0);
	start_brace();
	comprintf("\t int val = scratchie++;\n");
	switch (curi->cc) {
		case 0: /* Unconditional set */
		case 1:
		case 2:
		case 3:
		case 4:
		case 5:
		case 6:
		case 7:
		case 8:
		case 9:
		case 10:
		case 11:
		case 12:
		case 13:
		case 14:
		case 15:
		comprintf("\t make_flags_live();\n"); /* Load the flags */
		comprintf("\t jnf_Scc_ri(val,%d);\n", curi->cc);
		break;
		default:
		assert(0);
		break;
	}
	genastore("val", curi->smode, "srcreg", curi->size, "src");
#else
	genamode(curi->smode, "srcreg", curi->size, "src", 2, 0);
	start_brace();
	comprintf("\tint val = scratchie++;\n");

	/* We set val to 0 if we really should use 255, and to 1 for real 0 */
	switch (curi->cc) {
	case 0: /* Unconditional set */
		comprintf("\tmov_l_ri(val,0);\n");
		break;
	case 1:
		/* Unconditional not-set */
		comprintf("\tmov_l_ri(val,1);\n");
		break;
	case 8:
		failure;
		break; /* Work out details! FIXME */
	case 9:
		failure;
		break; /* Not critical, though! */

	case 2:
	case 3:
	case 4:
	case 5:
	case 6:
	case 7:
	case 10:
	case 11:
	case 12:
	case 13:
	case 14:
	case 15:
		comprintf("\tmake_flags_live();\n"); /* Load the flags */
		/* All condition codes can be inverted by changing the LSB */
		comprintf("\tsetcc(val,%d);\n", cond_codes[curi->cc] ^ 1);
		break;
	default:
		assert(0);
		break;
	}
	comprintf("\tsub_b_ri(val,1);\n");
	genastore("val", curi->smode, "srcreg", curi->size, "src");
#endif
}

static void gen_sub(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
#if defined(USE_JIT2)
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0);

	comprintf("\t dont_care_flags();\n");
	start_brace();
	// Use tmp register to avoid destroying upper part in .B., .W cases
	comprintf("\t int tmp=scratchie++;\n");
	if (!noflags) {
		comprintf("\t start_needflags();\n");
		comprintf("\t jff_SUB_%s(tmp,dst,src);\n", ssize);
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
		duplicate_carry();
		comprintf(
				"\t if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n");
	} else {
		comprintf("\t jnf_SUB_%s(tmp,dst,src);\n", ssize);
	}
	genastore("tmp", curi->dmode, "dstreg", curi->size, "dst");
#else
	(void) ssize;
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0);
	genflags(flag_sub, curi->size, "", "src", "dst");
	genastore("dst", curi->dmode, "dstreg", curi->size, "dst");
#endif
}

static void gen_suba(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
#if defined(USE_JIT2)
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	genamode(curi->dmode, "dstreg", sz_long, "dst", 1, 0);
	start_brace();
	comprintf("\t jnf_SUBA_%s(dst, src);\n", ssize);
	genastore("dst", curi->dmode, "dstreg", sz_long, "dst");
#else
	(void) ssize;
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	genamode(curi->dmode, "dstreg", sz_long, "dst", 1, 0);
	start_brace();
	comprintf("\tint tmp=scratchie++;\n");
	switch (curi->size) {
	case sz_byte:
		comprintf("\tsign_extend_8_rr(tmp,src);\n");
		break;
	case sz_word:
		comprintf("\tsign_extend_16_rr(tmp,src);\n");
		break;
	case sz_long:
		comprintf("\ttmp=src;\n");
		break;
	default:
		assert(0);
		break;
	}
	comprintf("\tsub_l(dst,tmp);\n");
	genastore("dst", curi->dmode, "dstreg", sz_long, "dst");
#endif
}

static void gen_subx(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
#if defined(USE_JIT2)
	isaddx;
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0);
	start_brace();
	comprintf("\tint tmp=scratchie++;\n");
	comprintf("\tdont_care_flags();\n");
	if (!noflags) {
		comprintf("\t make_flags_live();\n");
		comprintf("\t restore_inverted_carry();\n"); /* Reload the X flag into C */
		comprintf("\t start_needflags();\n");
		comprintf("\t jff_SUBX_%s(tmp,dst,src);\n", ssize);
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
		duplicate_carry();
		comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n");
	} else {
		comprintf("\t restore_inverted_carry();\n"); /* Reload the X flag into C */
		comprintf("\t jnf_SUBX(tmp,dst,src);\n");
	}
	genastore("tmp", curi->dmode, "dstreg", curi->size, "dst");
#else
	(void) ssize;
	isaddx;
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	genamode(curi->dmode, "dstreg", curi->size, "dst", 1, 0);
	genflags(flag_subx, curi->size, "", "src", "dst");
	genastore("dst", curi->dmode, "dstreg", curi->size, "dst");
#endif
}

static void gen_swap(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
	(void) ssize;
#if defined(USE_JIT2)
	genamode(curi->smode, "srcreg", sz_long, "src", 1, 0);
	comprintf("\t dont_care_flags();\n");
	start_brace();

	if (!noflags) {
		comprintf("\t start_needflags();\n");
		comprintf("\t jff_SWAP(src);\n");
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
		comprintf("if (!(needed_flags & FLAG_CZNV)) dont_care_flags();\n");
	} else {
		comprintf("\t jnf_SWAP(src);\n");
	}
	genastore("src", curi->smode, "srcreg", sz_long, "src");
#else
	genamode(curi->smode, "srcreg", sz_long, "src", 1, 0);
	comprintf("\tdont_care_flags();\n");
	comprintf("\tarm_ROR_l_ri8(src,16);\n");
	genflags(flag_logical, sz_long, "src", "", "");
	genastore("src", curi->smode, "srcreg", sz_long, "src");
#endif
}

static void gen_tst(uae_u32 opcode, struct instr *curi, const char* ssize) {
	(void) opcode;
	(void) ssize;
#if defined(USE_JIT2)
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	comprintf("\t dont_care_flags();\n");
	if (!noflags) {
		start_brace();
		comprintf("\t start_needflags();\n");
		comprintf("\t jff_TST_%s(src);\n", ssize);
		comprintf("\t live_flags();\n");
		comprintf("\t end_needflags();\n");
	}
#else
	genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
	genflags(flag_logical, curi->size, "src", "", "");
#endif
}

static int /* returns zero for success, non-zero for failure */
gen_opcode(unsigned long int opcode) {
	struct instr *curi = table68k + opcode;
	const char* ssize = NULL;

	insn_n_cycles = 2;
	global_failure = 0;
	long_opcode = 0;
	global_isjump = 0;
	global_iscjump = 0;
	global_isaddx = 0;
	global_cmov = 0;
	global_fpu = 0;
	global_mayfail = 0;
	hack_opcode = opcode;
	endstr[0] = 0;

	start_brace();
	comprintf("\tuae_u8 scratchie=S1;\n");
	switch (curi->plev) {
	case 0: /* not privileged */
		break;
	case 1: /* unprivileged only on 68000 */
		if (cpu_level == 0)
			break;
		if (next_cpu_level < 0)
			next_cpu_level = 0;

		/* fall through */
	case 2: /* priviledged */
		failure; /* Easy ones first */
		break;
	case 3: /* privileged if size == word */
		if (curi->size == sz_byte)
			break;
		failure;
		break;
	}
	switch (curi->size) {
	case sz_byte:
		ssize = "b";
		break;
	case sz_word:
		ssize = "w";
		break;
	case sz_long:
		ssize = "l";
		break;
	default:
		assert(0);
		break;
	}
	(void) ssize;

	switch (curi->mnemo) {
	case i_AND:
		gen_and(opcode, curi, ssize);
		break;

	case i_OR:
		gen_or(opcode, curi, ssize);
		break;

	case i_EOR:
		gen_eor(opcode, curi, ssize);
		break;

	case i_ORSR:
		gen_orsr(opcode, curi, ssize);
		break;

	case i_EORSR:
		gen_eorsr(opcode, curi, ssize);
		break;

	case i_ANDSR:
		gen_andsr(opcode, curi, ssize);
		break;

	case i_SUB:
		gen_sub(opcode, curi, ssize);
		break;

	case i_SUBA:
		gen_suba(opcode, curi, ssize);
		break;

	case i_SUBX:
		gen_subx(opcode, curi, ssize);
		break;

	case i_SBCD:
		gen_sbcd(opcode, curi, ssize);
		break;

	case i_ADD:
		gen_add(opcode, curi, ssize);
		break;

	case i_ADDA:
		gen_adda(opcode, curi, ssize);
		break;

	case i_ADDX:
		gen_addx(opcode, curi, ssize);
		break;

	case i_ABCD:
		gen_abcd(opcode, curi, ssize);
		break;

	case i_NEG:
		gen_neg(opcode, curi, ssize);
		break;

	case i_NEGX:
		gen_negx(opcode, curi, ssize);
		break;

	case i_NBCD:
		gen_nbcd(opcode, curi, ssize);
		break;

	case i_CLR:
		gen_clr(opcode, curi, ssize);
		break;

	case i_NOT:
		gen_not(opcode, curi, ssize);
		break;

	case i_TST:
		gen_tst(opcode, curi, ssize);
		break;

	case i_BCHG:
		gen_bchg(opcode, curi, ssize);
		break;

	case i_BCLR:
		gen_bclr(opcode, curi, ssize);
		break;

	case i_BSET:
		gen_bset(opcode, curi, ssize);
		break;

	case i_BTST:
		gen_btst(opcode, curi, ssize);
		break;

	case i_CMPM:
	case i_CMP:
		gen_cmp(opcode, curi, ssize);
		break;

	case i_CMPA:
		gen_cmpa(opcode, curi, ssize);
		break;

		/* The next two are coded a little unconventional, but they are doing
		 * weird things... */
	case i_MVPRM:
		isjump;
		failure;
		break;

	case i_MVPMR:
		isjump;
		failure;
		break;

	case i_MOVE:
		gen_move(opcode, curi, ssize);
		break;

	case i_MOVEA:
		gen_movea(opcode, curi, ssize);
		break;

	case i_MVSR2:
		isjump;
		failure;
		break;

	case i_MV2SR:
		isjump;
		failure;
		break;

	case i_SWAP:
		gen_swap(opcode, curi, ssize);
		break;

	case i_EXG:
		gen_exg(opcode, curi, ssize);
		break;

	case i_EXT:
		gen_ext(opcode, curi, ssize);
		break;

	case i_MVMEL:
		genmovemel(opcode);
		break;

	case i_MVMLE:
		genmovemle(opcode);
		break;

	case i_TRAP:
		isjump;
		failure;
		break;

	case i_MVR2USP:
		isjump;
		failure;
		break;

	case i_MVUSP2R:
		isjump;
		failure;
		break;

	case i_RESET:
		isjump;
		failure;
		break;

	case i_NOP:
		break;

	case i_STOP:
		isjump;
		failure;
		break;

	case i_RTE:
		isjump;
		failure;
		break;

	case i_RTD:
		genamode(curi->smode, "srcreg", curi->size, "offs", 1, 0);
		/* offs is constant */
		comprintf("\tarm_ADD_l_ri8(offs,4);\n");
		start_brace();
		comprintf("\tint newad=scratchie++;\n"
				"\treadlong(15,newad,scratchie);\n"
				"\tmov_l_mr((uintptr)&regs.pc,newad);\n"
				"\tget_n_addr_jmp(newad,PC_P,scratchie);\n"
				"\tmov_l_mr((uintptr)&regs.pc_oldp,PC_P);\n"
				"\tm68k_pc_offset=0;\n"
				"\tarm_ADD_l(15,offs);\n");
		gen_update_next_handler();
		isjump;
		break;

	case i_LINK:
		genamode(curi->smode, "srcreg", sz_long, "src", 1, 0);
		genamode(curi->dmode, "dstreg", curi->size, "offs", 1, 0);
		comprintf("\tsub_l_ri(15,4);\n"
				"\twritelong_clobber(15,src,scratchie);\n"
				"\tmov_l_rr(src,15);\n");
		if (curi->size == sz_word)
			comprintf("\tsign_extend_16_rr(offs,offs);\n");
		comprintf("\tarm_ADD_l(15,offs);\n");
		genastore("src", curi->smode, "srcreg", sz_long, "src");
		break;

	case i_UNLK:
		genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
		comprintf("\tmov_l_rr(15,src);\n"
				"\treadlong(15,src,scratchie);\n"
				"\tarm_ADD_l_ri8(15,4);\n");
		genastore("src", curi->smode, "srcreg", curi->size, "src");
		break;

	case i_RTS:
		comprintf("\tint newad=scratchie++;\n"
				"\treadlong(15,newad,scratchie);\n"
				"\tmov_l_mr((uintptr)&regs.pc,newad);\n"
				"\tget_n_addr_jmp(newad,PC_P,scratchie);\n"
				"\tmov_l_mr((uintptr)&regs.pc_oldp,PC_P);\n"
				"\tm68k_pc_offset=0;\n"
				"\tlea_l_brr(15,15,4);\n");
		gen_update_next_handler();
		isjump;
		break;

	case i_TRAPV:
		isjump;
		failure;
		break;

	case i_RTR:
		isjump;
		failure;
		break;

	case i_JSR:
		isjump;
		genamode(curi->smode, "srcreg", curi->size, "src", 0, 0);
		start_brace();
		comprintf(
				"\tuae_u32 retadd=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+m68k_pc_offset;\n");
		comprintf("\tint ret=scratchie++;\n"
				"\tmov_l_ri(ret,retadd);\n"
				"\tsub_l_ri(15,4);\n"
				"\twritelong_clobber(15,ret,scratchie);\n");
		comprintf("\tmov_l_mr((uintptr)&regs.pc,srca);\n"
				"\tget_n_addr_jmp(srca,PC_P,scratchie);\n"
				"\tmov_l_mr((uintptr)&regs.pc_oldp,PC_P);\n"
				"\tm68k_pc_offset=0;\n");
		gen_update_next_handler();
		break;

	case i_JMP:
		isjump;
		genamode(curi->smode, "srcreg", curi->size, "src", 0, 0);
		comprintf("\tmov_l_mr((uintptr)&regs.pc,srca);\n"
				"\tget_n_addr_jmp(srca,PC_P,scratchie);\n"
				"\tmov_l_mr((uintptr)&regs.pc_oldp,PC_P);\n"
				"\tm68k_pc_offset=0;\n");
		gen_update_next_handler();
		break;

	case i_BSR:
		is_const_jump;
		genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
		start_brace();
		comprintf(
				"\tuae_u32 retadd=start_pc+((char *)comp_pc_p-(char *)start_pc_p)+m68k_pc_offset;\n");
		comprintf("\tint ret=scratchie++;\n"
				"\tmov_l_ri(ret,retadd);\n"
				"\tsub_l_ri(15,4);\n"
				"\twritelong_clobber(15,ret,scratchie);\n");
		comprintf("\tarm_ADD_l_ri(src,m68k_pc_offset_thisinst+2);\n");
		comprintf("\tm68k_pc_offset=0;\n");
		comprintf("\tarm_ADD_l(PC_P,src);\n");
		comprintf("\tcomp_pc_p=(uae_u8*)get_const(PC_P);\n");
		break;

	case i_Bcc:
		comprintf("\tuae_u32 v,v1,v2;\n");
		genamode(curi->smode, "srcreg", curi->size, "src", 1, 0);
		/* That source is an immediate, so we can clobber it with abandon */
		switch (curi->size) {
		case sz_byte:
			comprintf("\tsign_extend_8_rr(src,src);\n");
			break;
		case sz_word:
			comprintf("\tsign_extend_16_rr(src,src);\n");
			break;
		case sz_long:
			break;
		}
		comprintf(
				"\tsub_l_ri(src,m68k_pc_offset-m68k_pc_offset_thisinst-2);\n");
		/* Leave the following as "add" --- it will allow it to be optimized
		 away due to src being a constant ;-) */
		comprintf("\tarm_ADD_l_ri(src,(uintptr)comp_pc_p);\n");
		comprintf("\tmov_l_ri(PC_P,(uintptr)comp_pc_p);\n");
		/* Now they are both constant. Might as well fold in m68k_pc_offset */
		comprintf("\tarm_ADD_l_ri(src,m68k_pc_offset);\n");
		comprintf("\tarm_ADD_l_ri(PC_P,m68k_pc_offset);\n");
		comprintf("\tm68k_pc_offset=0;\n");

		if (curi->cc >= 2) {
			comprintf("\tv1=get_const(PC_P);\n"
					"\tv2=get_const(src);\n"
					"\tregister_branch(v1,v2,%d);\n", cond_codes[curi->cc]);
			comprintf("\tmake_flags_live();\n"); /* Load the flags */
			isjump;
		} else {
			is_const_jump;
		}

		switch (curi->cc) {
		case 0: /* Unconditional jump */
			comprintf("\tmov_l_rr(PC_P,src);\n");
			comprintf("\tcomp_pc_p=(uae_u8*)get_const(PC_P);\n");
			break;
		case 1:
			break; /* This is silly! */
		case 8:
			failure;
			break; /* Work out details! FIXME */
		case 9:
			failure;
			break; /* Not critical, though! */

		case 2:
		case 3:
		case 4:
		case 5:
		case 6:
		case 7:
		case 10:
		case 11:
		case 12:
		case 13:
		case 14:
		case 15:
			break;
		default:
			assert(0);
			break;
		}
		break;

	case i_LEA:
		genamode(curi->smode, "srcreg", curi->size, "src", 0, 0);
		genamode(curi->dmode, "dstreg", curi->size, "dst", 2, 0);
		genastore("srca", curi->dmode, "dstreg", curi->size, "dst");
		break;

	case i_PEA:
		if (table68k[opcode].smode == Areg || table68k[opcode].smode == Aind
				|| table68k[opcode].smode == Aipi
				|| table68k[opcode].smode == Apdi
				|| table68k[opcode].smode == Ad16
				|| table68k[opcode].smode == Ad8r)
			comprintf("if (srcreg==7) dodgy=1;\n");

		genamode(curi->smode, "srcreg", curi->size, "src", 0, 0);
		genamode(Apdi, "7", sz_long, "dst", 2, 0);
		genastore("srca", Apdi, "7", sz_long, "dst");
		break;

	case i_DBcc:
		gen_dbcc(opcode, curi, ssize);
		break;

	case i_Scc:
		gen_scc(opcode, curi, ssize);
		break;

	case i_DIVU:
		isjump;
		failure;
		break;

	case i_DIVS:
		isjump;
		failure;
		break;

	case i_MULU:
		gen_mulu(opcode, curi, ssize);
		break;

	case i_MULS:
		gen_muls(opcode, curi, ssize);
		break;

	case i_CHK:
		isjump;
		failure;
		break;

	case i_CHK2:
		isjump;
		failure;
		break;

	case i_ASR:
		gen_asr(opcode, curi, ssize);
		break;

	case i_ASL:
		gen_asl(opcode, curi, ssize);
		break;

	case i_LSR:
		gen_lsr(opcode, curi, ssize);
		break;

	case i_LSL:
		gen_lsl(opcode, curi, ssize);
		break;

	case i_ROL:
		gen_rol(opcode, curi, ssize);
		break;

	case i_ROR:
		gen_ror(opcode, curi, ssize);
		break;

	case i_ROXL:
		gen_roxl(opcode, curi, ssize);
		break;

	case i_ROXR:
		gen_roxr(opcode, curi, ssize);
		break;

	case i_ASRW:
		gen_asrw(opcode, curi, ssize);
		break;

	case i_ASLW:
		gen_aslw(opcode, curi, ssize);
		break;

	case i_LSRW:
		gen_lsrw(opcode, curi, ssize);
		break;

	case i_LSLW:
		gen_lslw(opcode, curi, ssize);
		break;

	case i_ROLW:
		gen_rolw(opcode, curi, ssize);
		break;

	case i_RORW:
		gen_rorw(opcode, curi, ssize);
		break;

	case i_ROXLW:
		gen_roxlw(opcode, curi, ssize);
		break;

	case i_ROXRW:
		gen_roxrw(opcode, curi, ssize);
		break;

	case i_MOVEC2:
		isjump;
		failure;
		break;

	case i_MOVE2C:
		isjump;
		failure;
		break;

	case i_CAS:
		failure;
		break;

	case i_CAS2:
		failure;
		break;

	case i_MOVES:
		/* ignore DFC and SFC because we have no MMU */
		isjump;
		failure;
		break;

	case i_BKPT:
		/* only needed for hardware emulators */
		isjump;
		failure;
		break;

	case i_CALLM:
		/* not present in 68030 */
		isjump;
		failure;
		break;

	case i_RTM:
		/* not present in 68030 */
		isjump;
		failure;
		break;

	case i_TRAPcc:
		isjump;
		failure;
		break;

	case i_DIVL:
		isjump;
		failure;
		break;

	case i_MULL:
		gen_mull(opcode, curi, ssize);
		break;

	case i_BFTST:
	case i_BFEXTU:
	case i_BFCHG:
	case i_BFEXTS:
	case i_BFCLR:
	case i_BFFFO:
	case i_BFSET:
	case i_BFINS:
		failure;
		break;
	case i_PACK:
		failure;
		break;
	case i_UNPK:
		failure;
		break;
	case i_TAS:
		failure;
		break;
	case i_FPP:
		uses_fpu;
#ifdef USE_JIT_FPU
		mayfail;
		comprintf("\tuae_u16 extra=%s;\n",gen_nextiword());
		swap_opcode();
		comprintf("\tcomp_fpp_opp(opcode,extra);\n");
#else
		failure;
#endif
		break;
	case i_FBcc:
		uses_fpu;
#ifdef USE_JIT_FPU
		isjump;
		uses_cmov;
		mayfail;
		swap_opcode();
		comprintf("\tcomp_fbcc_opp(opcode);\n");
#else
		isjump;
		failure;
#endif
		break;
	case i_FDBcc:
		uses_fpu;
		isjump;
		failure;
		break;
	case i_FScc:
		uses_fpu;
#ifdef USE_JIT_FPU
		mayfail;
		uses_cmov;
		comprintf("\tuae_u16 extra=%s;\n",gen_nextiword());
		swap_opcode();
		comprintf("\tcomp_fscc_opp(opcode,extra);\n");
#else
		failure;
#endif
		break;
	case i_FTRAPcc:
		uses_fpu;
		isjump;
		failure;
		break;
	case i_FSAVE:
		uses_fpu;
		failure;
		break;
	case i_FRESTORE:
		uses_fpu;
		failure;
		break;

	case i_CINVL:
	case i_CINVP:
	case i_CINVA:
		isjump; /* Not really, but it's probably a good idea to stop
		 translating at this point */
		failure;
		comprintf("\tflush_icache();\n"); /* Differentiate a bit more? */
		break;
	case i_CPUSHL:
	case i_CPUSHP:
	case i_CPUSHA:
		isjump; /* Not really, but it's probably a good idea to stop
		 translating at this point */
		failure;
		break;

	case i_MOVE16:
		gen_move16(opcode, curi);
		break;

	case i_EMULOP_RETURN:
		isjump;
		failure;
		break;

	case i_EMULOP:
		failure;
		break;

	case i_NATFEAT_ID:
	case i_NATFEAT_CALL:
		failure;
		break;

	case i_MMUOP:
		isjump;
		failure;
		break;
	default:
		assert(0);
		break;
	}
	comprintf("%s", endstr);
	finish_braces();
	sync_m68k_pc();
	if (global_mayfail)
		comprintf("\tif (failure)  m68k_pc_offset=m68k_pc_offset_thisinst;\n");
	return global_failure;
}

static void generate_includes(FILE * f) {
	fprintf(f, "#include \"sysdeps.h\"\n");
	fprintf(f, "#include \"m68k.h\"\n");
	fprintf(f, "#include \"memory-uae.h\"\n");
	fprintf(f, "#include \"readcpu.h\"\n");
	fprintf(f, "#include \"newcpu.h\"\n");
	fprintf(f, "#include \"comptbl.h\"\n");
	fprintf(f, "#include \"debug.h\"\n");
}

static int postfix;

static char *decodeEA (amodes mode, wordsizes size)
{
	static char buffer[80];

	buffer[0] = 0;
	switch (mode){
	case Dreg:
		strcpy (buffer,"Dn");
		break;
	case Areg:
		strcpy (buffer,"An");
		break;
	case Aind:
		strcpy (buffer,"(An)");
		break;
	case Aipi:
		strcpy (buffer,"(An)+");
		break;
	case Apdi:
		strcpy (buffer,"-(An)");
		break;
	case Ad16:
		strcpy (buffer,"(d16,An)");
		break;
	case Ad8r:
		strcpy (buffer,"(d8,An,Xn)");
		break;
	case PC16:
		strcpy (buffer,"(d16,PC)");
		break;
	case PC8r:
		strcpy (buffer,"(d8,PC,Xn)");
		break;
	case absw:
		strcpy (buffer,"(xxx).W");
		break;
	case absl:
		strcpy (buffer,"(xxx).L");
		break;
	case imm:
		switch (size){
		case sz_byte:
			strcpy (buffer,"#<data>.B");
			break;
		case sz_word:
			strcpy (buffer,"#<data>.W");
			break;
		case sz_long:
			strcpy (buffer,"#<data>.L");
			break;
		default:
			break;
		}
		break;
	case imm0:
		strcpy (buffer,"#<data>.B");
		break;
	case imm1:
		strcpy (buffer,"#<data>.W");
		break;
	case imm2:
		strcpy (buffer,"#<data>.L");
		break;
	case immi:
		strcpy (buffer,"#<data>");
		break;

	default:
		break;
	}
	return buffer;
}

static char *outopcode (const char *name, int opcode)
{
	static char out[100];
	struct instr *ins;

	ins = &table68k[opcode];
	strcpy (out, name);
	if (ins->smode == immi)
		strcat (out, "Q");
	if (ins->size == sz_byte)
		strcat (out,".B");
	if (ins->size == sz_word)
		strcat (out,".W");
	if (ins->size == sz_long)
		strcat (out,".L");
	strcat (out," ");
	if (ins->suse)
		strcat (out, decodeEA (ins->smode, ins->size));
	if (ins->duse) {
		if (ins->suse) strcat (out,",");
		strcat (out, decodeEA (ins->dmode, ins->size));
	}
	return out;
}


static void generate_one_opcode(int rp, int noflags) {
	int i;
	uae_u16 smsk, dmsk;
	int opcode = opcode_map[rp];
	int aborted = 0;
	int have_srcreg = 0;
	int have_dstreg = 0;
	const char *name;
	
	if (table68k[opcode].mnemo == i_ILLG || table68k[opcode].clev > cpu_level)
		return;

	for (i = 0; lookuptab[i].name[0]; i++) {
		if (table68k[opcode].mnemo == lookuptab[i].mnemo)
			break;
	}

	if (table68k[opcode].handler != -1)
		return;

	switch (table68k[opcode].stype) {
	case 0:
		smsk = 7;
		break;
	case 1:
		smsk = 255;
		break;
	case 2:
		smsk = 15;
		break;
	case 3:
		smsk = 7;
		break;
	case 4:
		smsk = 7;
		break;
	case 5:
		smsk = 63;
		break;
	case 6:
		smsk = 255;
		break;
	case 7:
		smsk = 3;
		break;
	default:
		assert(0);
		break;
	}
	dmsk = 7;

	next_cpu_level = -1;
	if (table68k[opcode].suse && table68k[opcode].smode != imm
			&& table68k[opcode].smode != imm0 && table68k[opcode].smode != imm1
			&& table68k[opcode].smode != imm2 && table68k[opcode].smode != absw
			&& table68k[opcode].smode != absl && table68k[opcode].smode != PC8r
			&& table68k[opcode].smode != PC16) {
		have_srcreg = 1;
		if (table68k[opcode].spos == -1) {
			if (((int) table68k[opcode].sreg) >= 128)
				comprintf("\tuae_s32 srcreg = (uae_s32)(uae_s8)%d;\n",
						(int) table68k[opcode].sreg);
			else
				comprintf("\tuae_s32 srcreg = %d;\n",
						(int) table68k[opcode].sreg);
		} else {
			char source[100];
			int pos = table68k[opcode].spos;

			comprintf(
					"#if defined(HAVE_GET_WORD_UNSWAPPED) && !defined(FULLMMU)\n");

			if (pos < 8 && (smsk >> (8 - pos)) != 0)
				sprintf(source, "(((opcode >> %d) | (opcode << %d)) & %d)",
						pos ^ 8, 8 - pos, dmsk);
			else if (pos != 8)
				sprintf(source, "((opcode >> %d) & %d)", pos ^ 8, smsk);
			else
				sprintf(source, "(opcode & %d)", smsk);

			if (table68k[opcode].stype == 3)
				comprintf("\tuae_u32 srcreg = imm8_table[%s];\n", source);
			else if (table68k[opcode].stype == 1)
				comprintf("\tuae_u32 srcreg = (uae_s32)(uae_s8)%s;\n", source);
			else
				comprintf("\tuae_u32 srcreg = %s;\n", source);

			comprintf("#else\n");

			if (pos)
				sprintf(source, "((opcode >> %d) & %d)", pos, smsk);
			else
				sprintf(source, "(opcode & %d)", smsk);

			if (table68k[opcode].stype == 3)
				comprintf("\tuae_s32 srcreg = imm8_table[%s];\n", source);
			else if (table68k[opcode].stype == 1)
				comprintf("\tuae_s32 srcreg = (uae_s32)(uae_s8)%s;\n", source);
			else
				comprintf("\tuae_s32 srcreg = %s;\n", source);

			comprintf("#endif\n");
		}
	}
	if (table68k[opcode].duse
	/* Yes, the dmode can be imm, in case of LINK or DBcc */
	&& table68k[opcode].dmode != imm && table68k[opcode].dmode != imm0
			&& table68k[opcode].dmode != imm1 && table68k[opcode].dmode != imm2
			&& table68k[opcode].dmode != absw
			&& table68k[opcode].dmode != absl) {
		have_dstreg = 1;
		if (table68k[opcode].dpos == -1) {
			if (((int) table68k[opcode].dreg) >= 128)
				comprintf("\tuae_s32 dstreg = (uae_s32)(uae_s8)%d;\n",
						(int) table68k[opcode].dreg);
			else
				comprintf("\tuae_s32 dstreg = %d;\n",
						(int) table68k[opcode].dreg);
		} else {
			int pos = table68k[opcode].dpos;

			comprintf(
					"#if defined(HAVE_GET_WORD_UNSWAPPED) && !defined(FULLMMU)\n");

			if (pos < 8 && (dmsk >> (8 - pos)) != 0)
				comprintf(
						"\tuae_u32 dstreg = ((opcode >> %d) | (opcode << %d)) & %d;\n",
						pos ^ 8, 8 - pos, dmsk);
			else if (pos != 8)
				comprintf("\tuae_u32 dstreg = (opcode >> %d) & %d;\n", pos ^ 8,
						dmsk);
			else
				comprintf("\tuae_u32 dstreg = opcode & %d;\n", dmsk);

			comprintf("#else\n");

			if (pos)
				comprintf("\tuae_u32 dstreg = (opcode >> %d) & %d;\n", pos,
						dmsk);
			else
				comprintf("\tuae_u32 dstreg = opcode & %d;\n", dmsk);

			comprintf("#endif\n");
		}
	}

	if (have_srcreg && have_dstreg
			&& (table68k[opcode].dmode == Areg || table68k[opcode].dmode == Aind
					|| table68k[opcode].dmode == Aipi
					|| table68k[opcode].dmode == Apdi
					|| table68k[opcode].dmode == Ad16
					|| table68k[opcode].dmode == Ad8r)
			&& (table68k[opcode].smode == Areg || table68k[opcode].smode == Aind
					|| table68k[opcode].smode == Aipi
					|| table68k[opcode].smode == Apdi
					|| table68k[opcode].smode == Ad16
					|| table68k[opcode].smode == Ad8r)) {
		comprintf("\tuae_u32 dodgy=(srcreg==(uae_s32)dstreg);\n");
	} else {
		comprintf("\tuae_u32 dodgy=0;\n");
	}
	comprintf("\tuae_u32 m68k_pc_offset_thisinst=m68k_pc_offset;\n");
	comprintf("\tm68k_pc_offset+=2;\n");

	aborted = gen_opcode(opcode);
	{
		int flags = 0;
		if (global_isjump)
			flags |= 1;
		if (long_opcode)
			flags |= 2;
		if (global_cmov)
			flags |= 4;
		if (global_isaddx)
			flags |= 8;
		if (global_iscjump)
			flags |= 16;
		if (global_fpu)
			flags |= 32;

		comprintf("}\n");

		name = lookuptab[i].name;
		if (aborted) {
			fprintf(stblfile, "{ NULL, 0x%08x, %d }, /* %s */\n", opcode, flags, name);
			com_discard();
		} else {
			const char *tbl = noflags ? "nf" : "ff";
			fprintf(stblfile,
					"{ op_%x_%d_comp_%s, %d, 0x%08x }, /* %s */\n",
					opcode, postfix, tbl, opcode, flags, name);
			fprintf(headerfile, "extern compop_func op_%x_%d_comp_%s;\n",
					opcode, postfix, tbl);
			printf ("/* %s */\n", outopcode (name, opcode));
			printf(
					"void REGPARAM2 op_%x_%d_comp_%s(uae_u32 opcode) /* %s */\n{\n",
					opcode, postfix, tbl, name);
			com_flush();
		}
	}
	opcode_next_clev[rp] = next_cpu_level;
	opcode_last_postfix[rp] = postfix;
}

static void generate_func(int noflags) {
	int i, j, rp;
	const char *tbl = noflags ? "nf" : "ff";

	using_prefetch = 0;
	using_exception_3 = 0;
	for (i = 0; i < 1; i++) /* We only do one level! */
	{
		cpu_level = 4 - i;
		postfix = i;

		fprintf(stblfile, "const struct comptbl op_smalltbl_%d_comp_%s[] = {\n",
				postfix, tbl);

		/* sam: this is for people with low memory (eg. me :)) */
		printf("\n"
				"#if !defined(PART_1) && !defined(PART_2) && "
				"!defined(PART_3) && !defined(PART_4) && "
				"!defined(PART_5) && !defined(PART_6) && "
				"!defined(PART_7) && !defined(PART_8)"
				"\n"
				"#define PART_1 1\n"
				"#define PART_2 1\n"
				"#define PART_3 1\n"
				"#define PART_4 1\n"
				"#define PART_5 1\n"
				"#define PART_6 1\n"
				"#define PART_7 1\n"
				"#define PART_8 1\n"
				"#endif\n\n");

		rp = 0;
		for (j = 1; j <= 8; ++j) {
			int k = (j * nr_cpuop_funcs) / 8;
			printf("#ifdef PART_%d\n", j);
			for (; rp < k; rp++)
				generate_one_opcode(rp, noflags);
			printf("#endif\n\n");
		}

		fprintf(stblfile, "{ 0, 65536, 0 }};\n");
	}

}

#if (defined(OS_cygwin) || defined(OS_mingw)) && defined(EXTENDED_SIGSEGV)
void cygwin_mingw_abort()
{
#undef abort
	abort();
}
#endif

int main(void)
{
	init_table68k();

	opcode_map = (int *) malloc(sizeof(int) * nr_cpuop_funcs);
	opcode_last_postfix = (int *) malloc(sizeof(int) * nr_cpuop_funcs);
	opcode_next_clev = (int *) malloc(sizeof(int) * nr_cpuop_funcs);
	counts = (unsigned long *) malloc(65536 * sizeof(unsigned long));
	read_counts();

	/* It would be a lot nicer to put all in one file (we'd also get rid of
	 * cputbl.h that way), but cpuopti can't cope.  That could be fixed, but
	 * I don't dare to touch the 68k version.  */

	headerfile = fopen("comptbl.h", "wb");
	fprintf (headerfile, ""
		"extern const struct comptbl op_smalltbl_0_comp_nf[];\n"
		"extern const struct comptbl op_smalltbl_0_comp_ff[];\n"
		"");

	stblfile = fopen("compstbl.cpp", "wb");
	if (freopen("compemu.cpp", "wb", stdout) == NULL)
	{
		assert(0);
	}

	generate_includes(stdout);
	generate_includes(stblfile);

	printf("#include \"compiler/compemu.h\"\n");

	noflags = 0;
	generate_func(noflags);

	free(opcode_map);
	free(opcode_last_postfix);
	free(opcode_next_clev);
	free(counts);

	opcode_map = (int *) malloc(sizeof(int) * nr_cpuop_funcs);
	opcode_last_postfix = (int *) malloc(sizeof(int) * nr_cpuop_funcs);
	opcode_next_clev = (int *) malloc(sizeof(int) * nr_cpuop_funcs);
	counts = (unsigned long *) malloc(65536 * sizeof(unsigned long));
	read_counts();
	noflags = 1;
	generate_func(noflags);

	free(opcode_map);
	free(opcode_last_postfix);
	free(opcode_next_clev);
	free(counts);

	free(table68k);
	fclose(stblfile);
	fclose(headerfile);
	return 0;
}