calc-aent.el

calc-do-quick-calc: Add base 2 to the list of outputs of integers.

2 files changed, 8 insertions, 0 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 1e543d87efd..5ec2a41c997 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2007-08-14  Chris Hecker  <checker@d6.com> (tiny change)
+
+        * calc/calc-aent.el (calc-do-quick-calc): Add binary
+        representation of integers to the list of outputs.
+
 2007-08-14  Glenn Morris  <rgm@gnu.org>
 
         * simple.el (bad-packages-alist): New constant.
diff --git a/lisp/calc/calc-aent.el b/lisp/calc/calc-aent.el
index e640eb5c438..ffd07bd8f2e 100644
--- a/lisp/calc/calc-aent.el
+++ b/lisp/calc/calc-aent.el
@@ -74,6 +74,9 @@
                                 ", "
                                 (let ((calc-number-radix 8))
                                   (math-format-value (car alg-exp) 1000))
+                                ", "
+                                (let ((calc-number-radix 2))
+                                  (math-format-value (car alg-exp) 1000))
                                 (if (and (integerp (car alg-exp))
                                          (> (car alg-exp) 0)
                                          (< (car alg-exp) 127))