view etc/toolbar/last-win-dn.xbm @ 5904:ee27ca517e90

Revise print_symbol(), never calling is{float,ratio}_string(). src/ChangeLog addition: 2015-05-08 Aidan Kehoe <kehoea@parhasard.net> * print.c (print_symbol): Revise this. No longer call isfloat_string() and isratio_string() on practically every symbol seen; check explicitly for the known float format in this function, which turns out to be a more limited and cheap job than you would think. Also check for integer and ratio syntax in passing. Use Vdigit_fixnum_map when working out whether a given character is a digit. * lisp.h: Make Vdigit_fixnum_map available generally. tests/ChangeLog addition: 2015-05-08 Aidan Kehoe <kehoea@parhasard.net> * automated/lisp-reader-tests.el: Check read and print handling of symbols that look like numbers. In passing, check the read and print handling of the associated numbers.
author Aidan Kehoe <kehoea@parhasard.net>
date Fri, 08 May 2015 14:33:46 +0100
parents 7910031dd78a
children
line wrap: on
line source

/* This file is part of XEmacs.

XEmacs is free software: you can redistribute it and/or modify it
under the terms of the GNU General Public License as published by the
Free Software Foundation, either version 3 of the License, or (at your
option) any later version.

XEmacs is distributed in the hope that it will be useful, but WITHOUT
ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
for more details.

You should have received a copy of the GNU General Public License
along with XEmacs.  If not, see <http://www.gnu.org/licenses/>. */

#define noname_width 28
#define noname_height 28
static char noname_bits[] = {
 0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0x00,0xf8,0xff,0xff,0xde,
 0xfb,0xff,0x01,0xd0,0xfb,0xff,0xbd,0xd7,0xfb,0x03,0xa0,0xd7,0xfb,0x7b,0xaf,
 0xd7,0xfb,0x7b,0xaf,0x07,0xf8,0x7b,0xaf,0xd7,0xfb,0x7b,0x0f,0xd0,0xfb,0x7b,
 0xaf,0xd7,0xfb,0x03,0xa0,0xd7,0xfb,0x7b,0xaf,0xd7,0xfb,0x7b,0xaf,0x07,0xf8,
 0x7b,0xaf,0xf7,0xff,0x7b,0x0f,0xf0,0xff,0x7b,0xef,0xff,0xff,0x03,0xe0,0xff,
 0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xf9,0xff,0xff,0x7f,0xfc,
 0xff,0xff,0x1f,0x00,0x00,0xff,0x7f,0xfc,0xff,0xff,0xff,0xf9,0xff,0xff,0xff,
 0xff,0xff,0xff,0xff,0xff,0xff,0xff};