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