|
1 /* |
|
2 * Copyright 1992 by Jutta Degener and Carsten Bormann, Technische |
|
3 * Universitaet Berlin. See the accompanying file "COPYRIGHT" for |
|
4 * details. THERE IS ABSOLUTELY NO WARRANTY FOR THIS SOFTWARE. |
|
5 */ |
|
6 |
|
7 /* $Header: /tmp_amd/presto/export/kbs/jutta/src/gsm/RCS/debug.c,v 1.2 1993/01/29 18:22:20 jutta Exp $ */ |
|
8 |
|
9 #include "private.h" |
|
10 |
|
11 #ifndef NDEBUG |
|
12 |
|
13 /* If NDEBUG _is_ defined and no debugging should be performed, |
|
14 * calls to functions in this module are #defined to nothing |
|
15 * in private.h. |
|
16 */ |
|
17 |
|
18 #include <stdio.h> |
|
19 #include "proto.h" |
|
20 |
|
21 void gsm_debug_words P4( (name, from, to, ptr), |
|
22 char * name, |
|
23 int from, |
|
24 int to, |
|
25 word * ptr) |
|
26 { |
|
27 int nprinted = 0; |
|
28 |
|
29 fprintf( stderr, "%s [%d .. %d]: ", name, from, to ); |
|
30 while (from <= to) { |
|
31 fprintf(stderr, "%d ", ptr[ from ] ); |
|
32 from++; |
|
33 if (nprinted++ >= 7) { |
|
34 nprinted = 0; |
|
35 if (from < to) putc('\n', stderr); |
|
36 } |
|
37 } |
|
38 putc('\n', stderr); |
|
39 } |
|
40 |
|
41 void gsm_debug_longwords P4( (name, from, to, ptr), |
|
42 char * name, |
|
43 int from, |
|
44 int to, |
|
45 longword * ptr) |
|
46 { |
|
47 int nprinted = 0; |
|
48 |
|
49 fprintf( stderr, "%s [%d .. %d]: ", name, from, to ); |
|
50 while (from <= to) { |
|
51 |
|
52 fprintf(stderr, "%ld ", ptr[ from ] ); |
|
53 from++; |
|
54 if (nprinted++ >= 7) { |
|
55 nprinted = 0; |
|
56 if (from < to) putc('\n', stderr); |
|
57 } |
|
58 } |
|
59 putc('\n', stderr); |
|
60 } |
|
61 |
|
62 void gsm_debug_longword P2( (name, value), |
|
63 char * name, |
|
64 longword value ) |
|
65 { |
|
66 fprintf(stderr, "%s: %ld\n", name, (long)value ); |
|
67 } |
|
68 |
|
69 void gsm_debug_word P2( (name, value), |
|
70 char * name, |
|
71 word value ) |
|
72 { |
|
73 fprintf(stderr, "%s: %ld\n", name, (long)value); |
|
74 } |
|
75 |
|
76 #endif |