SYM * symbolPtr[1000000]; // Symbol pointers table
static long unused; // For supressing 'write' warnings
char buffer[256]; // Scratch buffer for messages
-int stringtype; // Non-zero if we need any special string conversions
// Function prototypes
int d_unimpl(void);
// Check to see if the value being passed in is negative (who the hell does
// that?--nobody does; it's the code gremlins, or rum, that does it)
- if (eval < 0)
+ // N.B.: Since VALUE is of type uint32_t, if it goes negative, it will have
+ // its high bit set.
+ if (eval & 0x80000000)
return error("negative sizes not allowed");
// In non-TDB section (BSS, ABS and M6502) just advance the location
for(;; tok++)
{
// dc.b 'string' [,] ...
- if (siz == SIZB && *tok == STRING && (tok[2] == ',' || tok[2] == EOL))
+ if (siz == SIZB && (*tok == STRING || *tok == STRINGA8) && (tok[2] == ',' || tok[2] == EOL))
{
uint32_t i = strlen(string[tok[1]]);
if ((challoc - ch_size) < i)
chcheck(i);
- if (stringtype == NORMAL)
- {
- for (p = string[tok[1]]; *p != EOS; p++)
- D_byte(*p);
- }
- else if(stringtype == A8INT)
- {
- for (p = string[tok[1]]; *p != EOS; p++)
- D_byte(strtoa8[*p]);
- }
- else
- {
- error("String format not supported yet");
- }
-
+ if (*tok == STRING)
+ {
+ for(p=string[tok[1]]; *p!=EOS; p++)
+ D_byte(*p);
+ }
+ else if(*tok == STRINGA8)
+ {
+ for(p=string[tok[1]]; *p!=EOS; p++)
+ D_byte(strtoa8[*p]);
+ }
+ else
+ {
+ error("String format not supported... yet");
+ }
tok += 2;
goto comma;