From 7a873388b0b10be51666d8f82538f1983b12adf6 Mon Sep 17 00:00:00 2001
From: Stephen Adams <edu/mit/csail/zurich/adams>
Date: Tue, 17 Jan 1995 22:59:43 +0000
Subject: [PATCH] Added COMPILER:GURU?

---
 v8/src/compiler/base/switch.scm | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/v8/src/compiler/base/switch.scm b/v8/src/compiler/base/switch.scm
index 223f3b2ce..b0ca3488a 100644
--- a/v8/src/compiler/base/switch.scm
+++ b/v8/src/compiler/base/switch.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: switch.scm,v 1.3 1994/12/15 02:34:42 adams Exp $
+$Id: switch.scm,v 1.4 1995/01/17 22:59:43 adams Exp $
 
 Copyright (c) 1988-1994  Massachusetts Institute of Technology
 
@@ -71,6 +71,9 @@ MIT in each case. |#
 (define compiler:compress-top-level? false)
 (define compiler:avoid-scode? true)
 
+;; True if being used by a guru
+(define compiler:guru? false)
+
 ;; If true, the compiler is allowed to assume that fixnum operations
 ;; are only applied to inputs for which the operation is closed, i.e.
 ;; generates a valid fixnum.  If false, the compiler will ensure that
-- 
2.25.1