From 66c8bc911f15885f688683b494659965b2f5569a Mon Sep 17 00:00:00 2001
From: Chris Hanson <org/chris-hanson/cph>
Date: Sat, 8 May 1999 19:22:58 +0000
Subject: [PATCH] Delete definitions of FIX:MIN and FIX:MAX, which are now
 defined by the runtime system.

---
 v7/src/edwin/bufwin.scm | 8 +-------
 v7/src/edwin/screen.scm | 5 +----
 2 files changed, 2 insertions(+), 11 deletions(-)

diff --git a/v7/src/edwin/bufwin.scm b/v7/src/edwin/bufwin.scm
index bcb842372..0a479f0bd 100644
--- a/v7/src/edwin/bufwin.scm
+++ b/v7/src/edwin/bufwin.scm
@@ -1,6 +1,6 @@
 ;;; -*-Scheme-*-
 ;;;
-;;; $Id: bufwin.scm,v 1.306 1999/01/02 06:11:34 cph Exp $
+;;; $Id: bufwin.scm,v 1.307 1999/05/08 19:22:58 cph Exp $
 ;;;
 ;;; Copyright (c) 1986, 1989-1999 Massachusetts Institute of Technology
 ;;;
@@ -626,12 +626,6 @@
 
 (define-integrable (%window-modeline-event! window type)
   (window-modeline-event! (window-superior window) type))
-
-(define-integrable (fix:max x y)
-  (if (fix:> x y) x y))
-
-(define-integrable (fix:min x y)
-  (if (fix:< x y) x y))
 
 ;;;; Standard Methods
 
diff --git a/v7/src/edwin/screen.scm b/v7/src/edwin/screen.scm
index 34d14c6c6..df63837cf 100644
--- a/v7/src/edwin/screen.scm
+++ b/v7/src/edwin/screen.scm
@@ -1,6 +1,6 @@
 ;;; -*-Scheme-*-
 ;;;
-;;; $Id: screen.scm,v 1.116 1999/01/02 06:11:34 cph Exp $
+;;; $Id: screen.scm,v 1.117 1999/05/08 19:22:54 cph Exp $
 ;;;
 ;;; Copyright (c) 1989-1999 Massachusetts Institute of Technology
 ;;;
@@ -864,9 +864,6 @@
 				 screen x y nline x x* face)
 				(find-mismatch x**))))))))))))
 
-(define-integrable (fix:min x y) (if (fix:< x y) x y))
-(define-integrable (fix:max x y) (if (fix:> x y) x y))
-
 (define-integrable (substring-non-space-start string start end)
   (do ((index start (fix:+ index 1)))
       ((or (fix:= end index)
-- 
2.25.1