[Mit-cadr-cvs] r443 - trunk/emulator/usim

ggilley at common-lisp.net ggilley at common-lisp.net
Wed Dec 3 04:46:49 UTC 2014


Author: ggilley
Date: Wed Dec  3 04:46:48 2014
New Revision: 443

Log:
go back to before

Modified:
   trunk/emulator/usim/ucode.c

Modified: trunk/emulator/usim/ucode.c
==============================================================================
--- trunk/emulator/usim/ucode.c	Wed Dec  3 04:23:46 2014	(r442)
+++ trunk/emulator/usim/ucode.c	Wed Dec  3 04:46:48 2014	(r443)
@@ -148,6 +148,7 @@
 extern int uart_xbus_write(int, unsigned int);
 #endif
 
+extern void disassemble_ucode_loc(int loc, ucw_t u);
 extern int sym_find(int mcr, char *name, int *pval);
 void reset_pc_histogram(void);
 #if defined(OSX)
@@ -1456,7 +1457,6 @@
     int i;
     unsigned short instr;
     char *decoded;
-
     
     printf("lc history:\n");
     if (0) printf("lc_history_ptr %d, lc_history_max %d, lc_history_stores %d\n",
@@ -1467,7 +1467,7 @@
         if (lc_history_max < MAX_LC_HISTORY && lc_history_ptr == lc_history_max)
             break;
         
-        decoded = disassemble_ucode_loc(lc_history[lc_history_ptr].lc & 037777777, instr);
+        decoded = disass(0, lc_history[lc_history_ptr].lc & 0377777777, 0, instr, wide_integer ? 25 : 24);
         
         printf("%s\n", decoded);
         
@@ -1676,9 +1676,6 @@
 #ifdef STAT_PC_HISTOGRAM
 	show_pc_histogram();
 #endif
-#if defined(OSX)
-    show_lc_history();
-#endif
 
 	for (i = 0; i < 32; i += 4) {
 		printf(" spc[%02o] %c%011o %c%011o %c%011o %c%011o\n",




More information about the mit-cadr-cvs mailing list