view etc/images/redo.xpm @ 105885:8103235103a7

Let integers use up 2 tags to give them one extra bit and double their range. * lisp.h (USE_2_TAGS_FOR_INTS): New macro. (LISP_INT_TAG, case_Lisp_Int, LISP_STRING_TAG, LISP_INT_TAG_P): New macros. (enum Lisp_Type): Use them. Give explicit values. (Lisp_Type_Limit): Remove. (XINT, XUINT, make_number) [!USE_LISP_UNION_TYPE]: (MOST_NEGATIVE_FIXNUM, MOST_POSITIVE_FIXNUM, INTMASK): Pay attention to USE_2_TAGS_FOR_INTS. (INTEGERP): Use LISP_INT_TAG_P. * fns.c (internal_equal): Simplify the default case. (sxhash): Use case_Lisp_Int. * data.c (wrong_type_argument): Don't check against Lisp_Type_Limit any more. (Ftype_of): Use case_Lisp_Int. (store_symval_forwarding): Take into account the fact that Ints can now have more than one tag. * buffer.c (syms_of_buffer): Use LISP_INT_TAG. buffer_slot_type_mismatch): * xfaces.c (face_attr_equal_p): * print.c (print_object): * alloc.c (mark_maybe_object, mark_object, survives_gc_p): Use case_Lisp_Int.

/* XPM */
static char * stock_redo_xpm[] = {
"24 24 42 1",
" 	c None",
".	c #000000",
"+	c #939A8D",
"@	c #BAD09D",
"#	c #92998C",
"$	c #818F71",
"%	c #ADBDA0",
"&	c #C2D5AA",
"*	c #D1DFBE",
"=	c #BED2A3",
"-	c #99A28F",
";	c #A8BCA6",
">	c #D5E1C6",
",	c #CDDCBC",
"'	c #D2E0BF",
")	c #C5D7AE",
"!	c #919889",
"~	c #8C9A7F",
"{	c #D4E0C5",
"]	c #D3E0C1",
"^	c #BFD3A6",
"/	c #9BAA87",
"(	c #B5C3A9",
"_	c #92AD62",
":	c #7C9B40",
"<	c #59702D",
"[	c #7F8E6B",
"}	c #C8D9B2",
"|	c #85A24D",
"1	c #53692A",
"2	c #A4B690",
"3	c #9BB572",
"4	c #6D8839",
"5	c #95A77E",
"6	c #8BA859",
"7	c #657255",
"8	c #98AF74",
"9	c #AFC394",
"0	c #6D7A5B",
"a	c #9CAF84",
"b	c #748261",
"c	c #879772",
"                        ",
"                        ",
"                        ",
"            .           ",
"            ..          ",
"            .+.         ",
"         ....@#.        ",
"        .$%&*=@-.       ",
"       .;>,')@@@!.      ",
"      .~{]*^@@@@@/.     ",
"      .(>_::::::<.      ",
"     .[}|::::::1.       ",
"     .23:<...:1.        ",
"     .@:4.  .<.         ",
"     .@:..  ..          ",
"     .56.   .           ",
"     .78.               ",
"      .9.               ",
"      .0a.              ",
"       .bc.             ",
"        ...             ",
"                        ",
"                        ",
"                        "};