From 8f26ce7300d7c8478a6c493097031230ffbbe38c Mon Sep 17 00:00:00 2001 From: Jay Belanger Date: Tue, 14 Aug 2007 14:52:51 +0000 Subject: [PATCH] calc-aent.el calc-do-quick-calc: Add base 2 to the list of outputs of integers. --- lisp/ChangeLog | 5 +++++ lisp/calc/calc-aent.el | 3 +++ 2 files changed, 8 insertions(+) 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 (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 * 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)) -- 2.39.2