comparison lisp/progmodes/tcl.el @ 7633:ba9345d99767

Even more compile stuff.
author Tom Tromey <tromey@redhat.com>
date Sun, 22 May 1994 20:18:28 +0000
parents 89a1e55c615d
children b5acd78a49e3
comparison
equal deleted inserted replaced
7632:8abb5c77cc2a 7633:ba9345d99767
4 4
5 ;; Maintainer: Tom Tromey <tromey@busco.lanl.gov> 5 ;; Maintainer: Tom Tromey <tromey@busco.lanl.gov>
6 ;; Author: Tom Tromey <tromey@busco.lanl.gov> 6 ;; Author: Tom Tromey <tromey@busco.lanl.gov>
7 ;; Chris Lindblad <cjl@lcs.mit.edu> 7 ;; Chris Lindblad <cjl@lcs.mit.edu>
8 ;; Keywords: languages tcl modes 8 ;; Keywords: languages tcl modes
9 ;; Version: $Revision: 1.12 $ 9 ;; Version: $Revision: 1.13 $
10 10
11 ;; This file is part of GNU Emacs. 11 ;; This file is part of GNU Emacs.
12 12
13 ;; GNU Emacs is free software; you can redistribute it and/or modify 13 ;; GNU Emacs is free software; you can redistribute it and/or modify
14 ;; it under the terms of the GNU General Public License as published by 14 ;; it under the terms of the GNU General Public License as published by
49 ;;; Commentary: 49 ;;; Commentary:
50 50
51 ;; LCD Archive Entry: 51 ;; LCD Archive Entry:
52 ;; tcl|Tom Tromey|tromey@busco.lanl.gov| 52 ;; tcl|Tom Tromey|tromey@busco.lanl.gov|
53 ;; Major mode for editing Tcl| 53 ;; Major mode for editing Tcl|
54 ;; $Date: 1994/05/22 20:14:59 $|$Revision: 1.12 $|~/modes/tcl.el.Z| 54 ;; $Date: 1994/05/22 20:17:15 $|$Revision: 1.13 $|~/modes/tcl.el.Z|
55 55
56 ;; CUSTOMIZATION NOTES: 56 ;; CUSTOMIZATION NOTES:
57 ;; * tcl-proc-list can be used to customize a list of things that 57 ;; * tcl-proc-list can be used to customize a list of things that
58 ;; "define" other things. Eg in my project I put "defvar" in this 58 ;; "define" other things. Eg in my project I put "defvar" in this
59 ;; list. 59 ;; list.
63 ;; * tcl-type-alist can be used to minimally customize indentation 63 ;; * tcl-type-alist can be used to minimally customize indentation
64 ;; according to context. 64 ;; according to context.
65 65
66 ;; Change log: 66 ;; Change log:
67 ;; $Log: tcl.el,v $ 67 ;; $Log: tcl.el,v $
68 ; Revision 1.13 1994/05/22 20:17:15 tromey
69 ; Moved emacs version checking code to very beginning.
70 ;
68 ; Revision 1.12 1994/05/22 20:14:59 tromey 71 ; Revision 1.12 1994/05/22 20:14:59 tromey
69 ; Compile fixes. 72 ; Compile fixes.
70 ; 73 ;
71 ; Revision 1.11 1994/05/22 20:12:44 tromey 74 ; Revision 1.11 1994/05/22 20:12:44 tromey
72 ; Fixed mark-defun for 19.23. 75 ; Fixed mark-defun for 19.23.
226 229
227 ;; When compiling under GNU Emacs, load imenu during compilation. If 230 ;; When compiling under GNU Emacs, load imenu during compilation. If
228 ;; you have 19.22 or earlier, comment this out, or get imenu. 231 ;; you have 19.22 or earlier, comment this out, or get imenu.
229 (and (fboundp 'eval-when-compile) 232 (and (fboundp 'eval-when-compile)
230 (eval-when-compile 233 (eval-when-compile
231 (if (and tcl-using-emacs-19 234 (if (and (string-match "19\\." emacs-version)
232 (not tcl-using-lemacs-19)) 235 (not (string-match "Lucid" emacs-version)))
233 (require 'imenu)) 236 (require 'imenu))
234 ())) 237 ()))
235 238
236 (defconst tcl-version "$Revision: 1.12 $") 239 (defconst tcl-version "$Revision: 1.13 $")
237 (defconst tcl-maintainer "Tom Tromey <tromey@busco.lanl.gov>") 240 (defconst tcl-maintainer "Tom Tromey <tromey@busco.lanl.gov>")
238 241
239 ;; 242 ;;
240 ;; User variables. 243 ;; User variables.
241 ;; 244 ;;