aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/emacs-lisp/float.el
diff options
context:
space:
mode:
authorJim Blandy <[email protected]>1991-03-01 21:55:53 +0000
committerJim Blandy <[email protected]>1991-03-01 21:55:53 +0000
commit3bfd7edbe7d3b56abc5a2ecb097e3cd594e3bf19 (patch)
tree43c1fa962bf9b7ba0ed56d206a77d630147c955c /lisp/emacs-lisp/float.el
parent56d506fcff55e31114063320005b319f1665eaa7 (diff)
*** empty log message ***
Diffstat (limited to 'lisp/emacs-lisp/float.el')
-rw-r--r--lisp/emacs-lisp/float.el11
1 files changed, 4 insertions, 7 deletions
diff --git a/lisp/emacs-lisp/float.el b/lisp/emacs-lisp/float.el
index ce2ab10127..68b88f41ec 100644
--- a/lisp/emacs-lisp/float.el
+++ b/lisp/emacs-lisp/float.el
@@ -386,11 +386,10 @@ Optional second argument non-nil means use scientific notation."
;; digits of the exponent.
(defun string-to-float (str)
"Convert the string to a floating point number.
-Accepts a decimal string in scientific notation,
-with exponent preceded by either E or e.
-Only the 6 most significant digits of the integer and fractional parts
-are used; only the first two digits of the exponent are used.
-Negative signs preceding both the decimal number and the exponent
+Accepts a decimal string in scientific notation, with exponent preceded
+by either E or e. Only the six most significant digits of the integer
+and fractional parts are used; only the first two digits of the exponent
+are used. Negative signs preceding both the decimal number and the exponent
are recognized."
(if (string-match floating-point-regexp str 0)
@@ -447,5 +446,3 @@ are recognized."
(funcall func exponent (aref powers-of-10 tens)))))
_f0)) ; if invalid, return 0
-
-