blob: 04c39076f55201896ce32063f8d6d9bc32f94aab [file] [log] [blame]
Alexandre Lisiond204ea52013-10-15 10:16:25 -04001/*
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
21void 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
41void 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, "%d ", 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
62void gsm_debug_longword P2( (name, value),
63 char * name,
64 longword value )
65{
66 fprintf(stderr, "%s: %d\n", name, (long)value );
67}
68
69void gsm_debug_word P2( (name, value),
70 char * name,
71 word value )
72{
73 fprintf(stderr, "%s: %d\n", name, (long)value);
74}
75
76#endif