* config/tc-s390.c (md_parse_option): Add cpu type z9-109.
(md_gather_operands): Add support for optional operands.
This commit is contained in:
parent
42e9a5a09c
commit
6c639ef964
|
@ -1,3 +1,8 @@
|
||||||
|
2005-08-12 Martin Schwidefsky <schwidefsky@de.ibm.com>
|
||||||
|
|
||||||
|
* config/tc-s390.c (md_parse_option): Add cpu type z9-109.
|
||||||
|
(md_gather_operands): Add support for optional operands.
|
||||||
|
|
||||||
2005-08-12 Dmitry Diky <diwil@spec.ru>
|
2005-08-12 Dmitry Diky <diwil@spec.ru>
|
||||||
* config/tc-msp430.c (msp430_enable_relax): New flag.
|
* config/tc-msp430.c (msp430_enable_relax): New flag.
|
||||||
(msp430_enable_polys): Likewise.
|
(msp430_enable_polys): Likewise.
|
||||||
|
|
|
@ -410,6 +410,8 @@ md_parse_option (c, arg)
|
||||||
current_cpu = S390_OPCODE_Z900;
|
current_cpu = S390_OPCODE_Z900;
|
||||||
else if (strcmp (arg + 5, "z990") == 0)
|
else if (strcmp (arg + 5, "z990") == 0)
|
||||||
current_cpu = S390_OPCODE_Z990;
|
current_cpu = S390_OPCODE_Z990;
|
||||||
|
else if (strcmp (arg + 5, "z9-109") == 0)
|
||||||
|
current_cpu = S390_OPCODE_Z9_109;
|
||||||
else
|
else
|
||||||
{
|
{
|
||||||
as_bad (_("invalid switch -m%s"), arg);
|
as_bad (_("invalid switch -m%s"), arg);
|
||||||
|
@ -1353,8 +1355,19 @@ md_gather_operands (str, insn, opcode)
|
||||||
/* If there is a next operand it must be separated by a comma. */
|
/* If there is a next operand it must be separated by a comma. */
|
||||||
if (opindex_ptr[1] != '\0')
|
if (opindex_ptr[1] != '\0')
|
||||||
{
|
{
|
||||||
if (*str++ != ',')
|
if (*str != ',')
|
||||||
as_bad (_("syntax error; expected ,"));
|
{
|
||||||
|
while (opindex_ptr[1] != '\0')
|
||||||
|
{
|
||||||
|
operand = s390_operands + *(++opindex_ptr);
|
||||||
|
if (operand->flags & S390_OPERAND_OPTIONAL)
|
||||||
|
continue;
|
||||||
|
as_bad (_("syntax error; expected ,"));
|
||||||
|
break;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
else
|
||||||
|
str++;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
else
|
else
|
||||||
|
@ -1386,8 +1399,19 @@ md_gather_operands (str, insn, opcode)
|
||||||
/* If there is a next operand it must be separated by a comma. */
|
/* If there is a next operand it must be separated by a comma. */
|
||||||
if (opindex_ptr[1] != '\0')
|
if (opindex_ptr[1] != '\0')
|
||||||
{
|
{
|
||||||
if (*str++ != ',')
|
if (*str != ',')
|
||||||
as_bad (_("syntax error; expected ,"));
|
{
|
||||||
|
while (opindex_ptr[1] != '\0')
|
||||||
|
{
|
||||||
|
operand = s390_operands + *(++opindex_ptr);
|
||||||
|
if (operand->flags & S390_OPERAND_OPTIONAL)
|
||||||
|
continue;
|
||||||
|
as_bad (_("syntax error; expected ,"));
|
||||||
|
break;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
else
|
||||||
|
str++;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
else
|
else
|
||||||
|
@ -1405,8 +1429,19 @@ md_gather_operands (str, insn, opcode)
|
||||||
/* If there is a next operand it must be separated by a comma. */
|
/* If there is a next operand it must be separated by a comma. */
|
||||||
if (opindex_ptr[1] != '\0')
|
if (opindex_ptr[1] != '\0')
|
||||||
{
|
{
|
||||||
if (*str++ != ',')
|
if (*str != ',')
|
||||||
as_bad (_("syntax error; expected ,"));
|
{
|
||||||
|
while (opindex_ptr[1] != '\0')
|
||||||
|
{
|
||||||
|
operand = s390_operands + *(++opindex_ptr);
|
||||||
|
if (operand->flags & S390_OPERAND_OPTIONAL)
|
||||||
|
continue;
|
||||||
|
as_bad (_("syntax error; expected ,"));
|
||||||
|
break;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
else
|
||||||
|
str++;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in New Issue