1 ;;; Implement current Emacs features not present in Emacs 23.4
3 (defvar compilation-filter-start (make-marker)
6 (defun compilation-filter-start (proc)
8 (set-marker compilation-filter-start (point-max)))
10 (defun compilation--put-prop (matchnum prop val)
11 (when (and (integerp matchnum) (match-beginning matchnum))
13 (match-beginning matchnum) (match-end matchnum)
16 ;; FIXME: emacs 24.x manages compilation-filter-start, emacs 23.4 does not
18 ;; gnat-core.el gnat-prj-parse-emacs-final needs:
19 ;; (add-hook 'compilation-start-hook 'ada-gnat-compilation-start))
21 ;; ada-gnat.el ada-gnat-compilation-filter needs:
22 ;; (set-marker compilation-filter-start (point)))