From 2904a393d79c369a827fbc22d1b4e93462a4508f Mon Sep 17 00:00:00 2001 From: toy <toy> Date: Sun, 13 Jan 2002 18:27:43 +0000 Subject: [PATCH] Initial revision --- bootfiles/18c/boot7.lisp | 10 ++++++++++ 1 file changed, 10 insertions(+) create mode 100644 bootfiles/18c/boot7.lisp diff --git a/bootfiles/18c/boot7.lisp b/bootfiles/18c/boot7.lisp new file mode 100644 index 000000000..92124a06e --- /dev/null +++ b/bootfiles/18c/boot7.lisp @@ -0,0 +1,10 @@ +;; Add the constants for precision control on x86. +;; +#+x86 +(in-package :x86) +#+x86 +(progn + (defconstant float-precision-24-bit 0) + (defconstant float-precision-53-bit 2) + (defconstant float-precision-64-bit 3)) + -- GitLab