50 |
"*The buffer to insert lint messages in.") |
"*The buffer to insert lint messages in.") |
51 |
|
|
52 |
;;; |
;;; |
53 |
|
;;; Data |
54 |
|
;;; |
55 |
|
|
56 |
|
(defconst elint-standard-variables |
57 |
|
'(abbrev-mode auto-fill-function buffer-auto-save-file-name |
58 |
|
buffer-backed-up buffer-display-count buffer-display-table buffer-display-time buffer-file-coding-system buffer-file-format |
59 |
|
buffer-file-name buffer-file-number buffer-file-truename |
60 |
|
buffer-file-type buffer-invisibility-spec buffer-offer-save |
61 |
|
buffer-read-only buffer-saved-size buffer-undo-list |
62 |
|
cache-long-line-scans case-fold-search ctl-arrow cursor-type comment-column |
63 |
|
default-directory defun-prompt-regexp desktop-save-buffer enable-multibyte-characters fill-column fringes-outside-margins goal-column |
64 |
|
header-line-format indicate-buffer-boundaries indicate-empty-lines |
65 |
|
left-fringe-width |
66 |
|
left-margin left-margin-width line-spacing local-abbrev-table local-write-file-hooks major-mode |
67 |
|
mark-active mark-ring mode-line-buffer-identification |
68 |
|
mode-line-format mode-line-modified mode-line-process mode-name |
69 |
|
overwrite-mode |
70 |
|
point-before-scroll right-fringe-width right-margin-width |
71 |
|
scroll-bar-width scroll-down-aggressively scroll-up-aggressively selective-display |
72 |
|
selective-display-ellipses tab-width truncate-lines vc-mode vertical-scroll-bar) |
73 |
|
"Standard buffer local vars.") |
74 |
|
|
75 |
|
(defconst elint-unknown-builtin-args |
76 |
|
'((while test &rest forms) |
77 |
|
(insert-before-markers-and-inherit &rest text) |
78 |
|
(catch tag &rest body) |
79 |
|
(and &rest args) |
80 |
|
(funcall func &rest args) |
81 |
|
(insert &rest args) |
82 |
|
(vconcat &rest args) |
83 |
|
(run-hook-with-args hook &rest args) |
84 |
|
(message-or-box string &rest args) |
85 |
|
(save-window-excursion &rest body) |
86 |
|
(append &rest args) |
87 |
|
(logior &rest args) |
88 |
|
(progn &rest body) |
89 |
|
(insert-and-inherit &rest args) |
90 |
|
(message-box string &rest args) |
91 |
|
(prog2 x y &rest body) |
92 |
|
(prog1 first &rest body) |
93 |
|
(insert-before-markers &rest args) |
94 |
|
(call-process-region start end program &optional delete |
95 |
|
destination display &rest args) |
96 |
|
(concat &rest args) |
97 |
|
(vector &rest args) |
98 |
|
(run-hook-with-args-until-success hook &rest args) |
99 |
|
(track-mouse &rest body) |
100 |
|
(unwind-protect bodyform &rest unwindforms) |
101 |
|
(save-restriction &rest body) |
102 |
|
(quote arg) |
103 |
|
(make-byte-code &rest args) |
104 |
|
(or &rest args) |
105 |
|
(cond &rest clauses) |
106 |
|
(start-process name buffer program &rest args) |
107 |
|
(run-hook-with-args-until-failure hook &rest args) |
108 |
|
(if cond then &rest else) |
109 |
|
(apply function &rest args) |
110 |
|
(format string &rest args) |
111 |
|
(encode-time second minute hour day month year zone &rest args) |
112 |
|
(min &rest args) |
113 |
|
(logand &rest args) |
114 |
|
(logxor &rest args) |
115 |
|
(max &rest args) |
116 |
|
(list &rest args) |
117 |
|
(message string &rest args) |
118 |
|
(defvar symbol init doc) |
119 |
|
(call-process program &optional infile destination display &rest args) |
120 |
|
(with-output-to-temp-buffer bufname &rest body) |
121 |
|
(nconc &rest args) |
122 |
|
(save-excursion &rest body) |
123 |
|
(run-hooks &rest hooks) |
124 |
|
(/ x y &rest zs) |
125 |
|
(- x &rest y) |
126 |
|
(+ &rest args) |
127 |
|
(* &rest args) |
128 |
|
(interactive &optional args)) |
129 |
|
"Those built-ins for which we can't find arguments.") |
130 |
|
|
131 |
|
;;; |
132 |
;;; ADT: top-form |
;;; ADT: top-form |
133 |
;;; |
;;; |
134 |
|
|
803 |
(if list list |
(if list list |
804 |
(elint-find-builtins)))) |
(elint-find-builtins)))) |
805 |
|
|
|
;;; |
|
|
;;; Data |
|
|
;;; |
|
|
|
|
|
(defconst elint-standard-variables |
|
|
'(abbrev-mode auto-fill-function buffer-auto-save-file-name |
|
|
buffer-backed-up buffer-display-count buffer-display-table buffer-display-time buffer-file-coding-system buffer-file-format |
|
|
buffer-file-name buffer-file-number buffer-file-truename |
|
|
buffer-file-type buffer-invisibility-spec buffer-offer-save |
|
|
buffer-read-only buffer-saved-size buffer-undo-list |
|
|
cache-long-line-scans case-fold-search ctl-arrow cursor-type comment-column |
|
|
default-directory defun-prompt-regexp desktop-save-buffer enable-multibyte-characters fill-column fringes-outside-margins goal-column |
|
|
header-line-format indicate-buffer-boundaries indicate-empty-lines |
|
|
left-fringe-width |
|
|
left-margin left-margin-width line-spacing local-abbrev-table local-write-file-hooks major-mode |
|
|
mark-active mark-ring mode-line-buffer-identification |
|
|
mode-line-format mode-line-modified mode-line-process mode-name |
|
|
overwrite-mode |
|
|
point-before-scroll right-fringe-width right-margin-width |
|
|
scroll-bar-width scroll-down-aggressively scroll-up-aggressively selective-display |
|
|
selective-display-ellipses tab-width truncate-lines vc-mode vertical-scroll-bar) |
|
|
"Standard buffer local vars.") |
|
|
|
|
|
(defconst elint-unknown-builtin-args |
|
|
'((while test &rest forms) |
|
|
(insert-before-markers-and-inherit &rest text) |
|
|
(catch tag &rest body) |
|
|
(and &rest args) |
|
|
(funcall func &rest args) |
|
|
(insert &rest args) |
|
|
(vconcat &rest args) |
|
|
(run-hook-with-args hook &rest args) |
|
|
(message-or-box string &rest args) |
|
|
(save-window-excursion &rest body) |
|
|
(append &rest args) |
|
|
(logior &rest args) |
|
|
(progn &rest body) |
|
|
(insert-and-inherit &rest args) |
|
|
(message-box string &rest args) |
|
|
(prog2 x y &rest body) |
|
|
(prog1 first &rest body) |
|
|
(insert-before-markers &rest args) |
|
|
(call-process-region start end program &optional delete |
|
|
destination display &rest args) |
|
|
(concat &rest args) |
|
|
(vector &rest args) |
|
|
(run-hook-with-args-until-success hook &rest args) |
|
|
(track-mouse &rest body) |
|
|
(unwind-protect bodyform &rest unwindforms) |
|
|
(save-restriction &rest body) |
|
|
(quote arg) |
|
|
(make-byte-code &rest args) |
|
|
(or &rest args) |
|
|
(cond &rest clauses) |
|
|
(start-process name buffer program &rest args) |
|
|
(run-hook-with-args-until-failure hook &rest args) |
|
|
(if cond then &rest else) |
|
|
(apply function &rest args) |
|
|
(format string &rest args) |
|
|
(encode-time second minute hour day month year zone &rest args) |
|
|
(min &rest args) |
|
|
(logand &rest args) |
|
|
(logxor &rest args) |
|
|
(max &rest args) |
|
|
(list &rest args) |
|
|
(message string &rest args) |
|
|
(defvar symbol init doc) |
|
|
(call-process program &optional infile destination display &rest args) |
|
|
(with-output-to-temp-buffer bufname &rest body) |
|
|
(nconc &rest args) |
|
|
(save-excursion &rest body) |
|
|
(run-hooks &rest hooks) |
|
|
(/ x y &rest zs) |
|
|
(- x &rest y) |
|
|
(+ &rest args) |
|
|
(* &rest args) |
|
|
(interactive &optional args)) |
|
|
"Those built-ins for which we can't find arguments.") |
|
|
|
|
806 |
(provide 'elint) |
(provide 'elint) |
807 |
|
|
808 |
;;; arch-tag: b2f061e2-af84-4ddc-8e39-f5e969ac228f |
;;; arch-tag: b2f061e2-af84-4ddc-8e39-f5e969ac228f |