[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
fortran-blink-matching-do fails
From: |
Roland Winkler |
Subject: |
fortran-blink-matching-do fails |
Date: |
Sat, 13 Apr 2002 21:19:45 +0200 |
In GNU Emacs 21.2.1 (i386-pc-linux-gnu, X toolkit, Xaw3d scroll bars)
of 2002-04-09 on tfkp12
configured using `configure --prefix=/nfs/common --libexecdir=/nfs/common/lib
--bindir=/nfs/common/lib/emacs/21.2/bin/i686-Linux
--mandir=/nfs/common/share/man --infodir=/nfs/common/share/info --with-gcc
--with-pop --with-x --with-x-toolkit=athena i386-pc-linux'
Important settings:
value of $LC_ALL: nil
value of $LC_COLLATE: POSIX
value of $LC_CTYPE: nil
value of $LC_MESSAGES: nil
value of $LC_MONETARY: nil
value of $LC_NUMERIC: nil
value of $LC_TIME: nil
value of $LANG: en_US
locale-coding-system: iso-latin-1
default-enable-multibyte-characters: nil
Please describe exactly what actions triggered the bug
and the precise symptoms of the bug:
In emacs 21.2 the regexp in fortran-beginning-do for finding the
matching `DO' has been modified such that now it is matching DO
statements with a statement number. -- But `END DO' statements refer
to `DO' statements without a statement number so that now
fortran-blink-matching-do fails. Could you please go back to the
correct behavior of emacs 21.1?
Or am I missing here anything?
Thanks a lot,
Roland
diff -c emacs/21.2/lisp/progmodes/fortran.el
emacs/21.1/lisp/progmodes/fortran.el
*** 1101,1107 ****
(fortran-check-end-prog-re))))
(skip-chars-forward " \t0-9")
(cond ((looking-at
! "\\(\\(\\sw\\|\\s_\\)+:[ \t]*\\)?do[ \t]+[0-9]")
(setq count (1- count)))
((looking-at "end[ \t]*do\\b")
(setq count (1+ count)))))
--- 1097,1103 ----
(fortran-check-end-prog-re))))
(skip-chars-forward " \t0-9")
(cond ((looking-at
! "\\(\\(\\sw\\|\\s_\\)+:[ \t]*\\)?do[ \t]+[^0-9]")
(setq count (1- count)))
((looking-at "end[ \t]*do\\b")
(setq count (1+ count)))))
***************
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- fortran-blink-matching-do fails,
Roland Winkler <=