이맥스 : 강조 표시 TODO * only in comments

Question

이 질문은 다른 것과 관련이 있습니다 Emacs :TODO indicator at left side. 나는 최근에 많은 것을 좋아하는 부 모드를 발견했다. FixmeMode. TODO 기호의 자동 강조 표시를 지원하고 그 사이를 탐색합니다. 그러나 전체 파일을 오염시키는 것보다는 주석에있는 "TODO"문자열을 인식하는 것이 더 중요하다고 생각합니다. 가능한가?

Answer 1

체크 아웃 도서관 fic-mode.el은, 그것은 C에서 검증 된 ++ 및 이맥스 리스프.

이 질문에 대답하기 위해 특별히 작성되었습니다. 여러 모드에 추가 할 수있는 쉬운 방법을 요청 않았다

(require 'fic-mode) 
(add-hook 'c++-mode-hook 'turn-on-fic-mode) 

Wei Hu하지만, 그래서 여기 간다 :

설치는 표준 패키지처럼

(defun add-something-to-mode-hooks (mode-list something) 
    "helper function to add a callback to multiple hooks" 
    (dolist (mode mode-list) 
    (add-hook (intern (concat (symbol-name mode) "-mode-hook")) something))) 

(add-something-to-mode-hooks '(c++ tcl emacs-lisp) 'turn-on-fic-mode) 

Answer 2

상당히 까다 롭습니다. 픽스 메 모드에서는 font-lock을 사용하여 강조 표시를하므로 키워드를 강조 표시하기 위해 유형별로 작동합니다. 글꼴 잠금은 매우 낮은 수준에서 후크합니다. 기본적으로 모든 변경 후에 버퍼의 내용이 실행됩니다. 그것은 현대 컴퓨터에서 즉각적으로 나타날 수 있도록 고도로 최적화되어 있습니다.

왼쪽 가장자리의 TODO 표시기는 고정되어 있습니다. 함수를 실행하면 현재 TODO가 모두 강조 표시됩니다. 버퍼를 변경 (TODO 추가 또는 제거)하면 프린지 인디케이터가 변경되지 않습니다. 함수가 다시 실행될 때만 변경됩니다.

접근법은 구문 표에 들어가야합니다. 먼저 주석을 작성한 다음 키워드를 찾으십시오. 까다로운 부분은 대화식으로 (즉, 입력 할 때) 이렇게하는 것입니다. 이 작업을 수행하려면 font-lock 구문을 사용할 수 있어야하지만 주석 구문 표를 검색 한 다음 키워드에 대해 제공하는 함수는 버퍼가 변경 될 때마다 실행되므로 매우 효율적입니다. 변경된 지역에서만 실행됩니다.) 이 모든 것을 font-lock-keywords이 아닌 font-lock-syntactic-keywords에 채우기를 원할 것입니다. 구문 패스가 키워드 전달 전에 발생하기 전에 구문 키워드 패스가 발생하고 주석 자체가 설정되기 전에 주석 내에 TODO를 설정해야하기 때문입니다.

Answer 3

미안해 전체 작업 코드 답이 아니다는 ..... 어쩌면이 도움이 될 것입니다 CC-모드에서 FN c-in-literal 및 CSHARP 모드에서 비슷한 csharp-in-literal이있다. 반환 값은 C 스타일의 주석 인 경우 이고, C 타입의 주석 인 경우 c++ 인 경우 스타일 주석입니다. 원하는 코드를 얻으려면 코드에 Emacs :TODO indicator at left side 을 추가하면됩니다.

(defun annotate-todo() 
    "put fringe marker on TODO: lines in the curent buffer" 
    (interactive) 
    (let (lit) 
    (save-excursion 
    (goto-char (point-min)) 
    (while (re-search-forward "TODO:" nil t) 
     (progn 
     (setq lit (c-in-literal)) ;; or csharp-in-literal 
     (if (or (eq lit 'c) (eq lit 'c++)) 
      (let ((overlay (make-overlay (- (point) 5) (point)))) 
       (overlay-put overlay 'before-string 
          (propertize "A" 
             'display 
             '(left-fringe ;; right 
             horizontal-bar 
             better-fringes-important-bitmap))))))))))