* config/sh/tm-sh.h (BELIEVE_PCC_PROMOTION): Define, so that
[deliverable/binutils-gdb.git] / gas / debug.c
1 /* Routines for debug use only. Don't link into product.
2 */
3
4 #include "as.h"
5 #include "subsegs.h"
6
7 dmp_frags()
8 {
9 frchainS *chp;
10 char *p;
11
12 for ( chp=frchain_root; chp; chp = chp->frch_next ){
13 switch ( chp->frch_seg ){
14 case SEG_DATA:
15 p ="Data";
16 break;
17 case SEG_TEXT:
18 p ="Text";
19 break;
20 default:
21 p ="???";
22 break;
23 }
24 printf("\nSEGMENT %s %d\n", p, chp->frch_subseg);
25 dmp_frag( chp->frch_root,"\t");
26 }
27 }
28
29 dmp_frag( fp, indent )
30 struct frag *fp;
31 char *indent;
32 {
33 for ( ; fp; fp = fp->fr_next ){
34 printf("%sFRAGMENT @ 0x%x\n", indent, fp);
35 switch( fp->fr_type ){
36 case rs_align:
37 printf("%srs_align(%d)\n",indent, fp->fr_offset);
38 break;
39 case rs_fill:
40 printf("%srs_fill(%d)\n",indent, fp->fr_offset);
41 printf("%s", indent);
42 var_chars( fp, fp->fr_var + fp->fr_fix );
43 printf("%s\t repeated %d times,",
44 indent, fp->fr_offset);
45 printf(" fixed length if # chars == 0)\n");
46 break;
47 case rs_org:
48 printf("%srs_org(%d+sym @0x%x)\n",indent,
49 fp->fr_offset, fp->fr_symbol);
50 printf("%sfill with ",indent);
51 var_chars( fp, 1 );
52 printf("\n");
53 break;
54 case rs_machine_dependent:
55 printf("%smachine_dep\n",indent);
56 break;
57 default:
58 printf("%sunknown type\n",indent);
59 break;
60 }
61 printf("%saddr=%d(0x%x)\n",indent,fp->fr_address,fp->fr_address);
62 printf("%sfr_fix=%d\n",indent,fp->fr_fix);
63 printf("%sfr_var=%d\n",indent,fp->fr_var);
64 printf("%sfr_offset=%d\n",indent,fp->fr_offset);
65 printf("%schars @ 0x%x\n",indent,fp->fr_literal);
66 printf("\n");
67 }
68 }
69
70 var_chars( fp, n )
71 struct frag *fp;
72 int n;
73 {
74 unsigned char *p;
75
76 for ( p=(unsigned char*)fp->fr_literal; n; n-- , p++ ){
77 printf("%02x ", *p );
78 }
79 }
80
81 /* end of debug.c */
This page took 0.029617 seconds and 4 git commands to generate.