annotate gdbinit @ 12312:b10ea6efdc58 release-3-4-x ss-3-3-91

version is now 3.3.91
author John W. Eaton <jwe@octave.org>
date Mon, 31 Jan 2011 08:36:58 -0500
parents 9126d71f53aa
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
10360
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
1 ## Helpful macros for debugging Octave.
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
2
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
3 ## Display a dim-vector object.
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
4
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
5 define display-dims
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
6 echo ndims: \
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
7 output $arg0.rep[-1]
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
8 echo \ndims: \
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
9 output *$arg0.rep@$arg0.rep[-1]
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
10 echo \n
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
11 dont-repeat
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
12 end
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
13
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
14 ## Display a dense array object.
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
15
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
16 define display-dense-array
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
17 echo array object: \
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
18 output $arg0
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
19 echo \ndimensions:\n
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
20 display-dims $arg0.dimensions
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
21 echo \nrep = \
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
22 output *$arg0.rep
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
23 echo \nrep.data = \
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
24 output *$arg0.rep.data@$arg0.rep.len
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
25 echo \n
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
26 dont-repeat
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
27 end
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
28
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
29 ## Display a sparse array object.
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
30
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
31 define display-sparse-array
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
32 echo sparse object: \
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
33 output $arg0
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
34 echo \ndimensions.rep[0] = \
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
35 display-dims $arg0.dimensions
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
36 echo \ndimensions.rep[1] = \
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
37 output $arg0.dimensions.rep[1]
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
38 echo \nrep = \
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
39 output *$arg0.rep
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
40 echo \nrep.d = \
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
41 output *$arg0.rep.d@$arg0.rep.nzmx
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
42 echo \nrep.r = \
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
43 output *$arg0.rep.r@$arg0.rep.nzmx
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
44 echo \nrep.c = \
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
45 output *$arg0.rep.c@($arg0.rep.ncols+1)
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
46 echo \n
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
47 dont-repeat
9126d71f53aa add gdbinit file to sources
John W. Eaton <jwe@octave.org>
parents:
diff changeset
48 end