espressif/binutils-gdb
1
0
Fork 0
mirror of https://github.com/espressif/binutils-gdb.git synced 2025-06-26 13:56:22 +08:00
Code Issues Packages Projects Releases Wiki Activity

* config/tc-hppa.c (pa_callinfo): Accept "millicode" as an

Browse Source 
argument to a .callinfo directive.  Don't loop forever on errors.
This commit is contained in:
Jeff Law
1994-03-16 22:42:51 +00:00
parent d6e6bc1c52
commit f2ada9106d
2 changed files with 15 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
gas/ChangeLog
View File

@ -11,6 +11,9 @@ Wed Mar 16 17:11:37 1994 Ian Lance Taylor (ian@tweedledumb.cygnus.com)
Wed Mar 16 11:54:12 1994 Jeffrey A. Law (law@snake.cs.utah.edu) Wed Mar 16 11:54:12 1994 Jeffrey A. Law (law@snake.cs.utah.edu)
* config/tc-hppa.c (pa_callinfo): Accept "millicode" as an
argument to a .callinfo directive. Don't loop forever on errors.
* config/tc-hppa.c (pa_reg): Use pa_parse_number so that we can * config/tc-hppa.c (pa_reg): Use pa_parse_number so that we can
use pre-defined registers as arguments. use pre-defined registers as arguments.

13
gas/config/tc-hppa.c
View File

@ -4323,9 +4323,20 @@ pa_callinfo (unused)
*p = c; *p = c;
last_call_info->ci_unwind.descriptor.hpux_interrupt_marker = 1; last_call_info->ci_unwind.descriptor.hpux_interrupt_marker = 1;
} }
/* Is this a millicode routine. "millicode" isn't in my
assembler manual, but my copy is old. The HP assembler
accepts it, and there's a place in the unwind descriptor
to drop the information, so we'll accept it too. */
else if ((strncasecmp (name, "millicode", 9) == 0))
{
p = input_line_pointer;
*p = c;
last_call_info->ci_unwind.descriptor.millicode = 1;
}
else else
{ {
as_bad ("Invalid .CALLINFO argument: %s", name); as_bad ("Invalid .CALLINFO argument: %s", name);
*input_line_pointer = c;
} }
if (!is_end_of_statement ()) if (!is_end_of_statement ())
input_line_pointer++; input_line_pointer++;
@ -4478,7 +4489,7 @@ pa_equ (reg)
if (label_symbol) if (label_symbol)
{ {
symbol = label_symbol->lss_label; symbol = label_symbol->lss_label;
S_SET_VALUE (symbol, (unsigned int) get_absolute_expression ()); S_SET_VALUE (symbol, pa_parse_number (&input_line_pointer, 0));
S_SET_SEGMENT (symbol, &bfd_abs_section); S_SET_SEGMENT (symbol, &bfd_abs_section);
} }
else else