ieee-base.lisp 440 Bytes
Newer Older
Marco Antoniotti's avatar
Marco Antoniotti committed
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21
;;;; -*- Mode: Lisp -*-

;;;; ieee-base.lisp
;;;;
;;;; See file COPYING in the main folder for licensing information.


(in-package "CL.EXT.MATH")

(deftype rounding-modes ()
  '(member :positive ; C99 FE_UPWARD
           :negative ; C99 FE_DOWNWARD
           :zero     ; C99 FE_TOWARDZERO
           :nearest  ; C99 FE_TONEAREST
           ))


(defparameter *error-on-nan-returning-operations* nil)


;;;; end of file -- ieee-base.lisp