comparison lisp/progmodes/ada-xref.el @ 98674:bde81f3667cd

* progmodes/ada-mode.el (ada-get-indent-end, ada-goto-matching-start): Add support for extended return statement. * progmodes/ada-xref.el (ada-gnat-parse-gpr): Don't reverse src-dir and obj-dir; keep user order.
author Juanma Barranquero <lekktu@gmail.com>
date Sun, 12 Oct 2008 23:06:29 +0000
parents 59b62ec53121
children a9dc0e7c3f2b
comparison
equal deleted inserted replaced
98673:a3c0dcf1e950 98674:bde81f3667cd
404 (point) (line-end-position))))) 404 (point) (line-end-position)))))
405 (forward-line 1)) 405 (forward-line 1))
406 406
407 ;; Set properties 407 ;; Set properties
408 (setq plist (plist-put plist 'gpr_file gpr-file)) 408 (setq plist (plist-put plist 'gpr_file gpr-file))
409 (setq plist (plist-put plist 'src_dir (reverse src-dir))) 409 (setq plist (plist-put plist 'src_dir src-dir))
410 (plist-put plist 'obj_dir (reverse obj-dir)) 410 (plist-put plist 'obj_dir obj-dir)
411 ) 411 )
412 (kill-buffer nil) 412 (kill-buffer nil)
413 (message "Parsing %s ... done" gpr-file) 413 (message "Parsing %s ... done" gpr-file)
414 ) 414 )
415 )) 415 ))