aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorStefan Monnier2010-09-27 22:11:33 +0200
committerStefan Monnier2010-09-27 22:11:33 +0200
commit993687257900ca2c1cab6437e799c67de67341f5 (patch)
treee2a2e2e9c993d777b2c19e2d95c82b27e1aa16e7
parent8ed70bf3167e37c8c15fb3d3286dfb1eb696a85a (diff)
downloademacs-993687257900ca2c1cab6437e799c67de67341f5.tar.gz
emacs-993687257900ca2c1cab6437e799c67de67341f5.zip
* lisp/emacs-lisp/float-sup.el (e): Remove.
-rw-r--r--lisp/ChangeLog4
-rw-r--r--lisp/emacs-lisp/float-sup.el5
2 files changed, 6 insertions, 3 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index a19c80c0d1b..b31ffc80c6a 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
12010-09-27 Stefan Monnier <monnier@iro.umontreal.ca>
2
3 * emacs-lisp/float-sup.el (e): Remove.
4
12010-09-27 Teodor Zlatanov <tzz@lifelogs.com> 52010-09-27 Teodor Zlatanov <tzz@lifelogs.com>
2 6
3 * net/gnutls.el (gnutls, gnutls-log-level): Add group and custom 7 * net/gnutls.el (gnutls, gnutls-log-level): Add group and custom
diff --git a/lisp/emacs-lisp/float-sup.el b/lisp/emacs-lisp/float-sup.el
index 48add9f1ffa..f213d2dba9d 100644
--- a/lisp/emacs-lisp/float-sup.el
+++ b/lisp/emacs-lisp/float-sup.el
@@ -39,7 +39,6 @@
39(defconst pi float-pi "Obsolete since Emacs-23.3. Use `float-pi' instead.") 39(defconst pi float-pi "Obsolete since Emacs-23.3. Use `float-pi' instead.")
40 40
41(defconst float-e (exp 1) "The value of e (2.7182818...).") 41(defconst float-e (exp 1) "The value of e (2.7182818...).")
42(defvar e float-e "Obsolete since Emacs-23.3. Use `float-e' instead.")
43 42
44(defconst degrees-to-radians (/ float-pi 180.0) 43(defconst degrees-to-radians (/ float-pi 180.0)
45 "Degrees to radian conversion constant.") 44 "Degrees to radian conversion constant.")
@@ -49,10 +48,10 @@
49;; these expand to a single multiply by a float when byte compiled 48;; these expand to a single multiply by a float when byte compiled
50 49
51(defmacro degrees-to-radians (x) 50(defmacro degrees-to-radians (x)
52 "Convert ARG from degrees to radians." 51 "Convert X from degrees to radians."
53 (list '* degrees-to-radians x)) 52 (list '* degrees-to-radians x))
54(defmacro radians-to-degrees (x) 53(defmacro radians-to-degrees (x)
55 "Convert ARG from radians to degrees." 54 "Convert X from radians to degrees."
56 (list '* radians-to-degrees x)) 55 (list '* radians-to-degrees x))
57 56
58(provide 'lisp-float-type) 57(provide 'lisp-float-type)