Mercurial > emacs
changeset 53699:859030e39b53
(f90-break-delimiters): Doc fix.
(f90-no-break-re): Add some extra tokens. Doc fix.
| author | Glenn Morris <rgm@gnu.org> |
|---|---|
| date | Sun, 25 Jan 2004 23:42:35 +0000 |
| parents | 4216782b9c14 |
| children | 444062830592 |
| files | lisp/progmodes/f90.el |
| diffstat | 1 files changed, 11 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/progmodes/f90.el Sun Jan 25 16:27:44 2004 +0000 +++ b/lisp/progmodes/f90.el Sun Jan 25 23:42:35 2004 +0000 @@ -1,6 +1,6 @@ ;;; f90.el --- Fortran-90 mode (free format) -;; Copyright (C) 1995, 1996, 1997, 2000 Free Software Foundation, Inc. +;; Copyright (C) 1995, 1996, 1997, 2000, 2004 Free Software Foundation, Inc. ;; Author: Torbj\"orn Einarsson <Torbjorn.Einarsson@era.ericsson.se> ;; Maintainer: Glenn Morris <gmorris@ast.cam.ac.uk> @@ -224,7 +224,10 @@ :group 'f90) (defcustom f90-break-delimiters "[-+\\*/><=,% \t]" - "*Regexp holding list of delimiters at which lines may be broken." + "*Regexp matching delimiter characters at which lines may be broken. +There are certain tokens comprised entirely of characters +matching this regexp that should not be split, and these are +specified by the constant `f90-no-break-re'." :type 'regexp :group 'f90) @@ -574,8 +577,12 @@ "Regexp matching the definition of a derived type.") (defconst f90-no-break-re - (regexp-opt '("**" "//" "=>") 'paren) - "Regexp specifying where not to break lines when filling.") + (regexp-opt '("**" "//" "=>" ">=" "<=" "==" "/=") 'paren) + "Regexp specifying where not to break lines when filling. +This regexp matches certain tokens comprised entirely of +characters matching the regexp `f90-break-delimiters' that should +not be split by filling. Each element is assumed to be two +characters long.") (defvar f90-cache-position nil "Temporary position used to speed up region operations.")