X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?p=rmac;a=blobdiff_plain;f=direct.c;h=a2eef8867618154b181ec48ba513a4afb1c16387;hp=3146c5345599c18d9703daa1c787ce157e961ceb;hb=c74d8ef6f193cb2be876c920c5cb7f599dd5418a;hpb=d0c28c349ddfb8393568037f68bddbe8979ce0df

diff --git a/direct.c b/direct.c
index 3146c53..a2eef88 100644
--- a/direct.c
+++ b/direct.c
@@ -25,6 +25,7 @@
 TOKEN exprbuf[128];			// Expression buffer 
 SYM * symbolPtr[1000000];	// Symbol pointers table
 static long unused;			// For supressing 'write' warnings
+char buffer[256];			// Scratch buffer for messages
 
 
 // Directive handler table
@@ -810,7 +811,6 @@ int d_dc(WORD siz)
 		// dc.b 'string' [,] ...
 		if (siz == SIZB && *tok == STRING && (tok[2] == ',' || tok[2] == EOL))
 		{
-//			i = strlen((const char*)tok[1]);
 			i = strlen(string[tok[1]]);
 
 			if ((challoc - ch_size) < i) 
@@ -854,7 +854,11 @@ int d_dc(WORD siz)
 					return error("non-absolute byte value");
 
 				if (eval + 0x100 >= 0x200)
-					return error(range_error);
+				{
+					sprintf(buffer, "%s (value = $%X)", range_error, eval);
+//					return error(range_error);
+					return error(buffer);
+				}
 
 				D_byte(eval);
 			}