From ecd0f7dbf60dbe8bae852b9baec9b6a3cc9fe0b9 Mon Sep 17 00:00:00 2001 From: Tristan Gingold Date: Wed, 23 Nov 2011 11:27:50 +0000 Subject: [PATCH] 2011-11-23 Tristan Gingold * config/tc-alpha.c (s_alpha_frame): Emit a warning if bad value of RA. (s_alpha_pdesc): Adjust comment. --- gas/ChangeLog | 6 ++++++ gas/config/tc-alpha.c | 8 ++++++-- 2 files changed, 12 insertions(+), 2 deletions(-) diff --git a/gas/ChangeLog b/gas/ChangeLog index 9348a2067..c199dddba 100644 --- a/gas/ChangeLog +++ b/gas/ChangeLog @@ -1,3 +1,9 @@ +2011-11-23 Tristan Gingold + + * config/tc-alpha.c (s_alpha_frame): Emit a warning if bad value + of RA. + (s_alpha_pdesc): Adjust comment. + 2011-11-23 Thomas Klein * config/tc-arm.c (do_t_mov_cmp): Prevent emitting code for MOV diff --git a/gas/config/tc-alpha.c b/gas/config/tc-alpha.c index 47d519ab1..6f39d1c4f 100644 --- a/gas/config/tc-alpha.c +++ b/gas/config/tc-alpha.c @@ -4435,6 +4435,7 @@ static void s_alpha_frame (int ignore ATTRIBUTE_UNUSED) { long val; + int ra; alpha_evax_proc->framereg = tc_get_register (1); @@ -4450,7 +4451,10 @@ s_alpha_frame (int ignore ATTRIBUTE_UNUSED) alpha_evax_proc->framesize = val; - (void) tc_get_register (1); + ra = tc_get_register (1); + if (ra != AXP_REG_RA) + as_warn (_("Bad RA (%d) register for .frame"), ra); + SKIP_WHITESPACE (); if (*input_line_pointer++ != ',') { @@ -4473,7 +4477,7 @@ s_alpha_prologue (int ignore ATTRIBUTE_UNUSED) (FAKE_LABEL_NAME, now_seg, (valueT) frag_now_fix (), frag_now); } -/* Parse .pdesc . +/* Parse .pdesc ,{null|stack|reg} Insert a procedure descriptor. */ static void -- 2.11.4.GIT