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