* s390-tdep.c (s390_get_frame_info): Don't used fextra_info to set

orig_sp if it's not initialized.

gdb/ChangeLog

@@ -1,3 +1,8 @@
+2001-12-03  Jim Blandy  <jimb@redhat.com>
+
+	* s390-tdep.c (s390_get_frame_info): Don't used fextra_info to set
+ 	orig_sp if it's not initialized.
+
 2001-11-30  Pierre Muller  <muller@ics.u-strasbg.fr>
 
 	* findvar.c (locate_var_value): Specify in which register a register

gdb/s390-tdep.c

@@ -242,7 +242,8 @@ s390_get_frame_info (CORE_ADDR pc, struct frame_extra_info *fextra_info,
     {
       if (fi && fi->frame)
 	{
-	  orig_sp = fi->frame + fextra_info->stack_bought;
+          if (! init_extra_info && fextra_info->initialised)
+            orig_sp = fi->frame + fextra_info->stack_bought;
 	  saved_regs = fi->saved_regs;
 	}
       if (init_extra_info || !fextra_info->initialised)