yggdrasil/binutils-gdb
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

* config/tc-s390.c (md_gather_operands): Accept an instruction

Browse Source 
without operands if all operands are tagged as optional.
This commit is contained in:
Martin Schwidefsky 2009-06-19 10:58:27 +00:00
parent ce21feb4ba
commit 5e7c27a607
2 changed files with 23 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
gas/ChangeLog
View File

@ -1,3 +1,8 @@
2009-06-19 Martin Schwidefsky <schwidefsky@de.ibm.com>
* config/tc-s390.c (md_gather_operands): Accept an instruction
without operands if all operands are tagged as optional.
2009-06-18 Nick Clifton <nickc@redhat.com>
PR 10169

19
gas/config/tc-s390.c
View File

@ -1188,7 +1188,24 @@ md_gather_operands (char *str,
if (ex.X_op == O_illegal)
as_bad (_("illegal operand"));
else if (ex.X_op == O_absent)
as_bad (_("missing operand"));
{
/* No operands, check if all operands can be skipped. */
while (*opindex_ptr != 0 && operand->flags & S390_OPERAND_OPTIONAL)
{
if (operand->flags & S390_OPERAND_DISP)
{
/* An optional displacement makes the whole D(X,B)
D(L,B) or D(B) block optional. */
do {
operand = s390_operands + *(++opindex_ptr);
} while (!(operand->flags & S390_OPERAND_BASE));
}
operand = s390_operands + *(++opindex_ptr);
}
if (opindex_ptr[0] == '\0')
break;
as_bad (_("missing operand"));
}
else if (ex.X_op == O_register || ex.X_op == O_constant)
{
s390_lit_suffix (&str, &ex, ELF_SUFFIX_NONE);