gdb/gdb/s390-tdep.c

15    This program is distributed in the hope that it will be useful,
152 /* Return the GDB type object for the "standard" data type of data in
306 /* 'float' values are stored in the upper half of floating-point
320   char in[8];
324   get_frame_register (frame, regnum, in);
325   memcpy (out, in, len);
330                         struct type *valtype, const void *in)
337   memcpy (out, in, len);
360   /* Registers that need to be saved/restored in order to
432    REGCACHE.  If REGNUM is -1, do this for all registers in REGSET.  */
484    in simulation, but using conservative approximations of the values
490    we don't know exactly what value will be in r1 after executing this
512       xr r1, r3      # exclusive-or r1 and r3, place result in r1
531    - To see whether we've saved the SP in the current frame's back
620    This can reduce the number of cases we need to analyze in the
677 /* Subtract B from A, and put the result in DIFF.
884    These functions' arguments appear in the order they appear in the
885    instruction, not in the machine-language form.  So, opcodes always
888    registers, as they do in the assembly syntax, not at the end, as
889    they do in the machine language.  */
945       /* Yes, insn[3].  insn[2] is unused in RRE format.  */
1045   /* We can't just add stuff directly in addr; it might alias some of
1146      ever stored to once in any given function, and we do recognize these
1160   /* If it's a load from an in-line constant pool, then we can
1557          Since r2 is zero, this saves the PC in r1, but doesn't branch.  */
1589 	   to manipulate any of the data we're interested in here --
1625 /* Return true if we are in the functin's epilogue, i.e. after the
1641      In that situation, this function needs to return 'true' in
1743 	 -- in particular, it must point to a different function.  */
1750 	     call, and we have stopped in the prologue *before* the
1782      This can only happen in an innermost frame.  */
1787       /* See the comment in s390_in_function_epilogue_p on why this is
1835      because we're in the middle of the prologue ...  */
1844      If not, we cannot unwind further -- this happens e.g. in
1880      sanity check, let's verify that the spill slot for SP in the
1881      save area pointed to by the backchain in fact links back to
1970    is in the RETADDR register).  */
1994   /* The return address is in register %r14.  */
2350    As an odd quirk, not mentioned in the ABI, GCC passes float and
2369    But as an odd quirk, not mentioned in the ABI, GCC passes float and
2400 /* Return non-zero if TYPE should be passed in a float register
2412 /* Return non-zero if TYPE should be passed in an integer register
2433   /* Even structs get passed in the least significant bits of the
2481 /* Put the actual parameter values pointed to by ARGS[0..NARGS-1] in
2578 		/* When we store a single-precision value in an FP register,
2586 		/* When we store a single-precision value in a stack slot,
2622 		   in it, then don't go back and use it again later.  */
2696 		   struct regcache *regcache, void *out, const void *in)
2702   if (in)
2709 	      /* When we store a single-precision value in an FP register,
2712 					  0, length, in);
2719 			extract_unsigned_integer (in, length));
2722 			extract_signed_integer (in, length));
2726 	      regcache_cooked_write (regcache, S390_R2_REGNUM, in);
2728 				     (const char *)in + word_size);
2746 	      /* When we store a single-precision value in an FP register,