comparison src/chartab.c @ 4580:1d11ecca9cd0

Print char table values correctly. src/ChangeLog addition: 2009-01-16 Aidan Kehoe <kehoea@parhasard.net> * chartab.c (print_table_entry): Print char table values correctly, eliminating some confusion between symbols and strings. tests/ChangeLog addition: 2009-01-18 Aidan Kehoe <kehoea@parhasard.net> * automated/lisp-tests.el: Check that a bug I fixed in char table printing is really gone.
author Aidan Kehoe <kehoea@parhasard.net>
date Sun, 18 Jan 2009 12:49:53 +0000
parents c661944aa259
children 6ef8256a020a 8b63e21b0436 e0db3c197671
comparison
equal deleted inserted replaced
4576:774e5c7522bf 4580:1d11ecca9cd0
315 if (!a->first) 315 if (!a->first)
316 write_c_string (a->printcharfun, " "); 316 write_c_string (a->printcharfun, " ");
317 a->first = 0; 317 a->first = 0;
318 lisprange = encode_char_table_range (range); 318 lisprange = encode_char_table_range (range);
319 GCPRO1 (lisprange); 319 GCPRO1 (lisprange);
320 write_fmt_string_lisp (a->printcharfun, "%s %s", 2, lisprange, val); 320 write_fmt_string_lisp (a->printcharfun, "%s %S", 2, lisprange, val);
321 UNGCPRO; 321 UNGCPRO;
322 return 0; 322 return 0;
323 } 323 }
324 324
325 static void 325 static void