diff options
| author | Dmitry Antipov <dmantipov@yandex.ru> | 2012-08-01 12:18:22 +0400 |
|---|---|---|
| committer | Dmitry Antipov <dmantipov@yandex.ru> | 2012-08-01 12:18:22 +0400 |
| commit | 015a2738eb575f9dc07ea5e589eb88c8e071930a (patch) | |
| tree | 1571cdc2a68996fdc40123d32fd15d8df69899cc /admin | |
| parent | 8271d59040b3d83fb3fc8cb23723538183b12ad4 (diff) | |
| download | emacs-015a2738eb575f9dc07ea5e589eb88c8e071930a.tar.gz | |
Commit forgotten admin/coccinelle/symbol.cocci.
Diffstat (limited to 'admin')
| -rw-r--r-- | admin/coccinelle/symbol.cocci | 32 |
1 files changed, 32 insertions, 0 deletions
diff --git a/admin/coccinelle/symbol.cocci b/admin/coccinelle/symbol.cocci new file mode 100644 index 00000000000..c988fabc256 --- /dev/null +++ b/admin/coccinelle/symbol.cocci @@ -0,0 +1,32 @@ +// Change direct access to Lisp_Object fields of struct Lisp_Symbol to SVAR. +@@ +struct Lisp_Symbol *S; +Lisp_Object O; +@@ +( +- S->xname ++ SVAR (S, xname) +| +- S->val.value ++ SVAR (S, val.value) +| +- S->function ++ SVAR (S, function) +| +- S->plist ++ SVAR (S, plist) + +| + +- XSYMBOL (O)->xname ++ SVAR (XSYMBOL (O), xname) +| +- XSYMBOL (O)->val.value ++ SVAR (XSYMBOL (O), val.value) +| +- XSYMBOL (O)->function ++ SVAR (XSYMBOL (O), function) +| +- XSYMBOL (O)->plist ++ SVAR (XSYMBOL (O), plist) +) |