diff options
author | Glenn Morris <rgm@gnu.org> | 2015-02-23 23:13:49 -0800 |
---|---|---|
committer | Glenn Morris <rgm@gnu.org> | 2015-02-23 23:13:49 -0800 |
commit | e8a11db943dfc7a469a761f98d606a4072a6ca43 (patch) | |
tree | df3dbf44246f94e78b0a204c44a4a13d1d75cecf /test | |
parent | eaf9499a7fe485a57ab54c665f0548d4eb1a2e88 (diff) | |
download | emacs-e8a11db943dfc7a469a761f98d606a4072a6ca43.tar.gz |
f90.el: add some support for continued strings without leading '&'
* lisp/progmodes/f90.el (f90-beginning-of-subprogram)
(f90-end-of-subprogram, f90-match-end):
Handle continued strings where the continuation does not start
with "&" and happens to match our regexp.
* test/automated/f90.el (f90-test-bug-19809): New test.
Fixes: debbugs:19809
Diffstat (limited to 'test')
-rw-r--r-- | test/ChangeLog | 4 | ||||
-rw-r--r-- | test/automated/f90.el | 16 |
2 files changed, 20 insertions, 0 deletions
diff --git a/test/ChangeLog b/test/ChangeLog index abc582c20fa..7ba14964c0a 100644 --- a/test/ChangeLog +++ b/test/ChangeLog @@ -1,3 +1,7 @@ +2015-02-24 Glenn Morris <rgm@gnu.org> + + * automated/f90.el (f90-test-bug-19809): New test. + 2015-02-22 Michael Albinus <michael.albinus@gmx.de> * automated/tramp-tests.el (tramp-test17-insert-directory): diff --git a/test/automated/f90.el b/test/automated/f90.el index c6bc41f799a..1cb2f035a6b 100644 --- a/test/automated/f90.el +++ b/test/automated/f90.el @@ -173,4 +173,20 @@ end program prog") (f90-indent-subprogram) (should (= 0 (current-indentation))))) +(ert-deftest f90-test-bug-19809 () + "Test for http://debbugs.gnu.org/19809 ." + (with-temp-buffer + (f90-mode) + ;; The Fortran standard says that continued strings should have + ;; '&' at the start of continuation lines, but it seems gfortran + ;; allows them to be absent (albeit with a warning). + (insert "program prog + write (*,*), '& +end program prog' +end program prog") + (goto-char (point-min)) + (f90-end-of-subprogram) + (should (= (point) (point-max))))) + + ;;; f90.el ends here |