From: Chris Hanson <org/chris-hanson/cph>
Date: Wed, 18 Nov 1992 21:55:34 +0000 (+0000)
Subject: Change syntax definitions of brackets and braces, to make them act
X-Git-Tag: 20090517-FFI~8738
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=b883079367ceb04de195bf67f3faa63d0629de3b;p=mit-scheme.git

Change syntax definitions of brackets and braces, to make them act
like parentheses.
---

diff --git a/v7/src/edwin/schmod.scm b/v7/src/edwin/schmod.scm
index e5e41d2a7..f62b85bc3 100644
--- a/v7/src/edwin/schmod.scm
+++ b/v7/src/edwin/schmod.scm
@@ -1,6 +1,6 @@
 ;;; -*-Scheme-*-
 ;;;
-;;;	$Id: schmod.scm,v 1.29 1992/11/17 17:49:48 cph Exp $
+;;;	$Id: schmod.scm,v 1.30 1992/11/18 21:55:34 cph Exp $
 ;;;
 ;;;	Copyright (c) 1986, 1989-92 Massachusetts Institute of Technology
 ;;;
@@ -134,10 +134,10 @@ The following commands evaluate Scheme expressions:
 (modify-syntax-entry! scheme-mode:syntax-table #\space " ")
 (modify-syntax-entry! scheme-mode:syntax-table #\tab " ")
 (modify-syntax-entry! scheme-mode:syntax-table #\page " ")
-(modify-syntax-entry! scheme-mode:syntax-table #\[ " ")
-(modify-syntax-entry! scheme-mode:syntax-table #\] " ")
-(modify-syntax-entry! scheme-mode:syntax-table #\{ " ")
-(modify-syntax-entry! scheme-mode:syntax-table #\} " ")
+(modify-syntax-entry! scheme-mode:syntax-table #\[ "(]")
+(modify-syntax-entry! scheme-mode:syntax-table #\] ")[")
+(modify-syntax-entry! scheme-mode:syntax-table #\{ "(}")
+(modify-syntax-entry! scheme-mode:syntax-table #\} "){")
 (modify-syntax-entry! scheme-mode:syntax-table #\| "  23")
 
 (modify-syntax-entry! scheme-mode:syntax-table #\; "< ")