From: Taylor R. Campbell <net/mumble/campbell>
Date: Sat, 14 Mar 2009 19:52:18 +0000 (+0000)
Subject: Upcase the switch `on' in `#pragma STDC FENV_ACCESS ON'.  Fixes
X-Git-Tag: 20090517-FFI~54
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=c7997a20a68fb8ea954379b5a7bc1f1e30d7b4e1;p=mit-scheme.git

Upcase the switch `on' in `#pragma STDC FENV_ACCESS ON'.  Fixes
Savannah bug #25867.
---

diff --git a/v7/src/microcode/sysprim.c b/v7/src/microcode/sysprim.c
index 5147a7e28..1e6c2f03f 100644
--- a/v7/src/microcode/sysprim.c
+++ b/v7/src/microcode/sysprim.c
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Id: sysprim.c,v 9.59 2009/02/22 09:00:47 cph Exp $
+$Id: sysprim.c,v 9.60 2009/03/14 19:52:18 riastradh Exp $
 
 Copyright (C) 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, 1994,
     1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005,
@@ -208,7 +208,7 @@ DEFINE_PRIMITIVE ("CC-BLOCK-LINKAGE-INFO", Prim_cc_block_linkage_info, 1, 1, 0)
 }
 
 #ifndef __GNUC__
-#  pragma STDC FENV_ACCESS on
+#  pragma STDC FENV_ACCESS ON
 #endif
 
 enum { FRMODE_NEAREST, FRMODE_TOWARD_ZERO, FRMODE_DOWNWARD, FRMODE_UPWARD };