   "A face used to highlight expression for a brief time after they have been
 evaluated.")
 
-(defface todo-face
+(defface zomp-todo-face
   '((t (:foreground "#A00")))
   "A face for todo items")
-(defvar todo-face 'todo-face)
+(defvar zomp-todo-face 'zomp-todo-face)
 
 (defface zomp-testsuite-directive-face
   '((t (:inherit font-lock-doc-face :weight bold)))

  (interactive)
  (backward-sexp) )


(unless (boundp 'current-line)
  (defun current-line ()
    "Return number of current line in current buffer
    (provided by `zomp.el` because it was not defined)"
    (count-lines (point-min) (if (eobp) (point) (1+ (point))))) )

(defun zomp-indent-line ()
  (interactive)

    ("/\\*\\*[^\\*]*\\*/" 0 font-lock-doc-face t t)
    ("'[^']'" 0 font-lock-string-face)

    ("// *\\(TODO\\)" 1 zomp-todo-face t t)

    ("\\(\\b[a-zA-Z0-9_]+\\b:\\) +[^ \n]" 1 font-lock-keyword-face)
    ("\\bconst\\b" 0 font-lock-keyword-face)
