(Vdebug_on_signal): Renamed from Vdebug_force.
[bpt/emacs.git] / lisp / progmodes / icon.el
index 10882da..85e30a7 100644 (file)
@@ -2,7 +2,7 @@
 
 ;; Copyright (C) 1989 Free Software Foundation, Inc.
 
-;; Author: Chris Smith <convex!csmith>
+;; Author: Chris Smith <csmith@convex.com>
 ;; Created: 15 Feb 89
 ;; Keywords: languages
 
@@ -19,8 +19,9 @@
 ;; GNU General Public License for more details.
 
 ;; You should have received a copy of the GNU General Public License
-;; along with GNU Emacs; see the file COPYING.  If not, write to
-;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
+;; along with GNU Emacs; see the file COPYING.  If not, write to the
+;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+;; Boston, MA 02111-1307, USA.
 
 ;;; Commentary:
 
   (modify-syntax-entry ?| "." icon-mode-syntax-table)
   (modify-syntax-entry ?\' "\"" icon-mode-syntax-table))
 
-(defconst icon-indent-level 4
+(defvar icon-indent-level 4
   "*Indentation of Icon statements with respect to containing block.")
-(defconst icon-brace-imaginary-offset 0
+(defvar icon-brace-imaginary-offset 0
   "*Imagined indentation of a Icon open brace that actually follows a statement.")
-(defconst icon-brace-offset 0
+(defvar icon-brace-offset 0
   "*Extra indentation for braces, compared with other text in same context.")
-(defconst icon-continued-statement-offset 4
+(defvar icon-continued-statement-offset 4
   "*Extra indent for lines not starting new statements.")
-(defconst icon-continued-brace-offset 0
+(defvar icon-continued-brace-offset 0
   "*Extra indent for substatements that start with open-braces.
 This is in addition to icon-continued-statement-offset.")
 
-(defconst icon-auto-newline nil
+(defvar icon-auto-newline nil
   "*Non-nil means automatically newline before and after braces
 inserted in Icon code.")
 
-(defconst icon-tab-always-indent t
+(defvar icon-tab-always-indent t
   "*Non-nil means TAB in Icon mode should always reindent the current line,
 regardless of where in the line point is when the TAB command is used.")
 \f