annotate etc/idd/drop @ 4728:d0ea57eb3de4

Don't error if handed a string and a non-string, #'equalp. tests/ChangeLog addition: 2009-11-01 Aidan Kehoe <kehoea@parhasard.net> * automated/lisp-tests.el: Check that (equal "hi there" [hi there]) gives nil, instead of erroring; fixes a bug Ben introduced in 2002. lisp/ChangeLog addition: 2009-11-01 Aidan Kehoe <kehoea@parhasard.net> * cl-extra.el (equalp): Don't error if handed a string and a non-string.
author Aidan Kehoe <kehoea@parhasard.net>
date Sun, 01 Nov 2009 15:05:46 +0000
parents 6075d714658b
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
177
6075d714658b Import from CVS: tag r20-3b15
cvs
parents:
diff changeset
1 #define drop_width 16
6075d714658b Import from CVS: tag r20-3b15
cvs
parents:
diff changeset
2 #define drop_height 16
6075d714658b Import from CVS: tag r20-3b15
cvs
parents:
diff changeset
3 #define drop_x_hot 6
6075d714658b Import from CVS: tag r20-3b15
cvs
parents:
diff changeset
4 #define drop_y_hot 4
6075d714658b Import from CVS: tag r20-3b15
cvs
parents:
diff changeset
5 static unsigned char drop_bits[] = {
6075d714658b Import from CVS: tag r20-3b15
cvs
parents:
diff changeset
6 0x00, 0x00, 0xfe, 0x07, 0x02, 0x04, 0x02, 0x04, 0x42, 0x04, 0xc2, 0x04,
6075d714658b Import from CVS: tag r20-3b15
cvs
parents:
diff changeset
7 0xc2, 0x05, 0xc2, 0x07, 0xc2, 0x07, 0xc2, 0x0f, 0xfe, 0x1f, 0xc0, 0x07,
6075d714658b Import from CVS: tag r20-3b15
cvs
parents:
diff changeset
8 0xc0, 0x06, 0x00, 0x0c, 0x00, 0x1c, 0x00, 0x08};