r446 - trunk/emulator/usim

[rswindells at common-lisp.net]

Author: rswindells
Date: Tue May 24 15:18:34 2016
New Revision: 446

Log:
Dump %SYS-COM-BAND-FORMAT as well.

Modified:
   trunk/emulator/usim/lod.c

Modified: trunk/emulator/usim/lod.c
==============================================================================
--- trunk/emulator/usim/lod.c	Sat Jan  3 17:39:57 2015	(r445)
+++ trunk/emulator/usim/lod.c	Tue May 24 15:18:34 2016	(r446)
@@ -42,7 +42,7 @@
 	{ "%SYS-COM-ETHER-FREE-LIST", 0405 },
 	{ "%SYS-COM-ETHER-TRANSMIT-LIST", 0406 },
 	{ "%SYS-COM-ETHER-RECEIVE-LIST", 0407 },
-	{ "%SYS-COM-SPARE-1", 0410 },
+	{ "%SYS-COM-BAND-FORMAT", 0410 },
 	{ "%SYS-COM-SPARE-2", 0411 },
 	{ "%SYS-COM-UNIBUS-INTERRUPT-LIST", 0412 },
 	{ "%SYS-COM-TEMPORARY", 0413 },
@@ -561,6 +561,7 @@
 	if (loadband_filename) {
 		/* %SYS-COM-AREA-ORIGIN-PNTR */
 		com = showlabel("%SYS-COM-AREA-ORIGIN-PNTR", 0400, 1);
+		showlabel("%SYS-COM-BAND-FORMAT", 0410, 1);
 
 		if (show_comm) {
 			for (i = 0; cv[i].name; i++) {