Lines Matching defs:regexp
59 ;; current file matches the regexp:
212 :type '(choice (repeat (list regexp (choice (repeat string) function)))
273 :type '(repeat (list regexp (choice (repeat string) function)))
282 :type '(repeat (list regexp (choice (repeat string) function)))
389 (let (match ;; matching regexp for this file
390 suffixes ;; set of replacing regexps for the matching regexp
524 (let (match ;; matching regexp for this file
525 suffixes ;; set of replacing regexps for the matching regexp
749 (defun ff-string-match (regexp string &optional start)
753 (if regexp
754 (string-match regexp string start))))
780 (regexp (car elem))
783 (if (and (looking-at regexp) match)
787 (setq regexp (car elem))
949 (defvar ada-procedure-start-regexp)
950 (defvar ada-package-start-regexp)
957 (if (or (re-search-backward ada-procedure-start-regexp nil t)
958 (re-search-backward ada-package-start-regexp nil t))