Changeset 15640 for release/1.9/source


Ignore:
Timestamp:
Feb 2, 2013, 7:12:39 AM (6 years ago)
Author:
gb
Message:

Avoid duplicate/different definitions of some constants.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • release/1.9/source/level-0/l0-float.lisp

    r15627 r15640  
    11851185
    11861186
    1187 (eval-when (:execute :compile-toplevel)
    1188   (defconstant single-float-pi (coerce pi 'single-float))
    1189   (defconstant double-float-half-pi (asin 1.0d0))
    1190   (defconstant single-float-half-pi (asin 1.0f0))
    1191 )
    1192 
    11931187(defun acos (x)
    11941188  "Return the arc cosine of NUMBER."
Note: See TracChangeset for help on using the changeset viewer.