Mercurial > repos > blastem

diff m68k_util.c @ 2590:e602dbf776d8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix abcd and implement sbcd and nbcd in new 68K core
author Michael Pavone <pavone@retrodev.com>
date Sun, 09 Feb 2025 02:57:37 -0800
parents e04c7e753bf6
children 1c493b8c513b
line wrap: on
line diff
--- a/m68k_util.c	Sun Feb 09 02:56:50 2025 -0800
+++ b/m68k_util.c	Sun Feb 09 02:57:37 2025 -0800
@@ -6,11 +6,30 @@
 	context->scratch1 = read_byte(context->scratch1, context->mem_pointers, &context->opts->gen, context);
 }
 
+#ifdef DEBUG_DISASM
+#include "68kinst.h"
+static uint16_t debug_disasm_fetch(uint32_t address, void *vcontext)
+{
+	m68k_context *context = vcontext;
+	return read_word(address, context->mem_pointers, &context->opts->gen, context);
+}
+#endif
 void m68k_read_16(m68k_context *context)
 {
 	context->cycles += 4 * context->opts->gen.clock_divider;
+#ifdef DEBUG_DISASM
 	uint32_t tmp = context->scratch1;
+#endif
 	context->scratch1 = read_word(context->scratch1, context->mem_pointers, &context->opts->gen, context);
+#ifdef DEBUG_DISASM
+	if (tmp == context->pc) {
+		m68kinst inst;
+		m68k_decode(debug_disasm_fetch, context, &inst, tmp);
+		static char disasm_buf[256];
+		m68k_disasm(&inst, disasm_buf);
+		printf("Fetch %05X: %04X - %s, d2 = %X, d3 = %X, d4 = %X, d6 = %X, xflag = %d\n", tmp, context->scratch1, disasm_buf, context->dregs[2], context->dregs[3], context->dregs[4], context->dregs[6], context->xflag);
+	}
+#endif
 }
 
 void m68k_write_8(m68k_context *context)