Parent Directory | Revision Log | Patch
revision 1.265 by rms, Tue Jul 2 19:13:12 2002 UTC | revision 1.266 by lektu, Thu Jul 11 14:12:36 2002 UTC | |
---|---|---|
# | Line 3121 This is text showing the elements of vec | Line 3121 This is text showing the elements of vec |
3121 | (vector, describer) | (vector, describer) |
3122 | Lisp_Object vector, describer; | Lisp_Object vector, describer; |
3123 | { | { |
3124 | int count = specpdl_ptr - specpdl; | int count = SPECPDL_INDEX (); |
3125 | if (NILP (describer)) | if (NILP (describer)) |
3126 | describer = intern ("princ"); | describer = intern ("princ"); |
3127 | specbind (Qstandard_output, Fcurrent_buffer ()); | specbind (Qstandard_output, Fcurrent_buffer ()); |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |