Mercurial > hg > xemacs-beta
comparison src/lisp.h @ 4329:d9eb5ea14f65
Provide %b in #'format; use it for converting between ints and bit vectors.
lisp/ChangeLog addition:
2007-12-17 Aidan Kehoe <kehoea@parhasard.net>
* subr.el (integer-to-bit-vector): New.
* subr.el (bit-vector-to-integer): New.
Provide naive implementations using the Lisp reader for these.
src/ChangeLog addition:
2007-12-17 Aidan Kehoe <kehoea@parhasard.net>
* doprnt.c (emacs_doprnt_1):
Add support for formatted printing of both longs and bignums as
base 2.
* editfns.c (Fformat):
Document the new %b escape for #'format.
* lisp.h:
Make ulong_to_bit_string available beside long_to_string.
* lread.c:
Fix a bug where the integer base was being ignored in certain
contexts; thank you Sebastian Freundt. This is necessary for
correct behaviour of #'integer-to-bit-vector and
#'bit-vector-to-integer, just added to subr.el
* print.c (ulong_to_bit_string): New.
Analagous to long_to_string, but used all the time when %b is
encountered, since we can't pass that to sprintf.
man/ChangeLog addition:
2007-12-17 Aidan Kehoe <kehoea@parhasard.net>
* lispref/strings.texi (Formatting Strings):
Document %b for binary output.
author | Aidan Kehoe <kehoea@parhasard.net> |
---|---|
date | Mon, 17 Dec 2007 08:44:14 +0100 |
parents | ac5a714be3a2 |
children | a2af1ff1761f |
comparison
equal
deleted
inserted
replaced
4328:dfd878799ef0 | 4329:d9eb5ea14f65 |
---|---|
4980 floating point computations to define a compile-time integral | 4980 floating point computations to define a compile-time integral |
4981 constant. */ | 4981 constant. */ |
4982 #define DECIMAL_PRINT_SIZE(integral_type) \ | 4982 #define DECIMAL_PRINT_SIZE(integral_type) \ |
4983 (((2410824 * sizeof (integral_type)) / 1000000) + 3) | 4983 (((2410824 * sizeof (integral_type)) / 1000000) + 3) |
4984 void long_to_string (char *, long); | 4984 void long_to_string (char *, long); |
4985 void ulong_to_bit_string (char *, unsigned long); | |
4985 extern int print_escape_newlines; | 4986 extern int print_escape_newlines; |
4986 extern MODULE_API int print_readably; | 4987 extern MODULE_API int print_readably; |
4987 Lisp_Object internal_with_output_to_temp_buffer (Lisp_Object, | 4988 Lisp_Object internal_with_output_to_temp_buffer (Lisp_Object, |
4988 Lisp_Object (*) (Lisp_Object), | 4989 Lisp_Object (*) (Lisp_Object), |
4989 Lisp_Object, Lisp_Object); | 4990 Lisp_Object, Lisp_Object); |