p = optext;
- if (*p == ' ') /* Expect all whitespace reduced to ' '. */
+ if (is_whitespace (*p))
p++; /* skip over whitespace */
if ((at = INDIRECTP (*p)) != 0)
{ /* 1 if *p=='@'(or '*' for Un*x) */
p++; /* at is determined */
- if (*p == ' ') /* Expect all whitespace reduced to ' '. */
+ if (is_whitespace (*p))
p++; /* skip over whitespace */
}
len = ' '; /* Len is determined. */
}
- if (*p == ' ') /* Expect all whitespace reduced to ' '. */
+ if (is_whitespace (*p))
p++;
if ((hash = IMMEDIATEP (*p)) != 0) /* 1 if *p=='#' ('$' for Un*x) */
;
q--; /* Now q points at last char of text. */
- if (*q == ' ' && q >= p) /* Expect all whitespace reduced to ' '. */
+ if (is_whitespace (*q) && q >= p)
q--;
/* Reverse over whitespace, but don't. */
Otherwise ndx == -1 if there was no "[...]".
Otherwise, ndx is index register number, and q points before "[...]". */
- if (*q == ' ' && q >= p) /* Expect all whitespace reduced to ' '. */
+ if (is_whitespace (*q) && q >= p)
q--;
/* Reverse over whitespace, but don't. */
/* Run back over *p. */
We remember to save q, in case we didn't want "Rn" anyway. */
if (!paren)
{
- if (*q == ' ' && q >= p) /* Expect all whitespace reduced to ' '. */
+ if (is_whitespace (*q) && q >= p)
q--;
/* Reverse over whitespace, but don't. */
/* Run back over *p. */
/* Op-code of this instruction. */
vax_opcodeT oc;
- if (*instring == ' ')
+ if (is_whitespace (*instring))
++instring;
/* MUST end in end-of-string or exactly 1 space. */
- for (p = instring; *p && *p != ' '; p++)
+ for (p = instring; *p && !is_whitespace (*p); p++)
;
/* Scanned up to end of operation-code. */
}
if (!*alloperr)
{
- if (*instring == ' ')
+ if (is_whitespace (*instring))
instring++;
if (*instring)
alloperr = _("Too many operands");