/[emacs]/emacs/lisp/progmodes/modula2.el
ViewVC logotype

Diff of /emacs/lisp/progmodes/modula2.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.22 by pj, Sun Jul 15 16:15:35 2001 UTC revision 1.22.8.1 by miles, Fri Apr 4 06:20:36 2003 UTC
# Line 1  Line 1 
1  ;;; modula2.el --- Modula-2 editing support package  ;;; modula2.el --- Modula-2 editing support package
2    
3  ;; Author: Michael Schmidt <michael@pbinfo.UUCP>  ;; Author: Michael Schmidt <michael@pbinfo.UUCP>
4  ;;      Tom Perrine <Perrin@LOGICON.ARPA>  ;;      Tom Perrine <Perrin@LOGICON.ARPA>
5  ;; Maintainer: FSF  ;; Maintainer: FSF
6  ;; Keywords: languages  ;; Keywords: languages
# Line 104  Line 104 
104      (define-key map "\C-c\C-c" 'm2-compile)      (define-key map "\C-c\C-c" 'm2-compile)
105      (setq m2-mode-map map)))      (setq m2-mode-map map)))
106    
107  (defcustom m2-indent 5  (defcustom m2-indent 5
108    "*This variable gives the indentation in Modula-2-Mode."    "*This variable gives the indentation in Modula-2-Mode."
109    :type 'integer    :type 'integer
110    :group 'modula2)    :group 'modula2)
111      
112  ;;;###autoload  ;;;###autoload
113  (defun modula-2-mode ()  (defun modula-2-mode ()
114    "This is a mode intended to support program development in Modula-2.    "This is a mode intended to support program development in Modula-2.
# Line 429  followed by the first character of the c Line 429  followed by the first character of the c
429  (defun m2-stdio ()  (defun m2-stdio ()
430    (interactive)    (interactive)
431    (insert "    (insert "
432  FROM TextIO IMPORT  FROM TextIO IMPORT
433     WriteCHAR, ReadCHAR, WriteINTEGER, ReadINTEGER,     WriteCHAR, ReadCHAR, WriteINTEGER, ReadINTEGER,
434     WriteCARDINAL, ReadCARDINAL, WriteBOOLEAN, ReadBOOLEAN,     WriteCARDINAL, ReadCARDINAL, WriteBOOLEAN, ReadBOOLEAN,
435     WriteREAL, ReadREAL, WriteBITSET, ReadBITSET,     WriteREAL, ReadREAL, WriteBITSET, ReadBITSET,

Legend:
Removed from v.1.22  
changed lines
  Added in v.1.22.8.1

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26