1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-20 18:17:20 +00:00
emacs/admin/coccinelle/process.cocci
Dmitry Antipov 3193acd258 Use INTERNAL_FIELD for processes.
* src/process.h (PVAR): New macro.  Adjust style.
(struct Lisp_Process): Change Lisp_Object members to INTERNAL_FIELD.
* src/print.c, src/process.c, src/sysdep.c, src/w32.c:
* src/xdisp.c: Users changed.
* admin/coccinelle/process.cocci: Semantic patch to replace direct
access to Lisp_Object members of struct Lisp_Process to PVAR.
2012-08-01 10:23:24 +04:00

111 lines
1.7 KiB
Plaintext

// Change direct access to Lisp_Object fields of struct Lisp_Process to PVAR.
@@
struct Lisp_Process *P;
Lisp_Object O;
@@
(
- P->tty_name
+ PVAR (P, tty_name)
|
- P->name
+ PVAR (P, name)
|
- P->command
+ PVAR (P, command)
|
- P->filter
+ PVAR (P, filter)
|
- P->sentinel
+ PVAR (P, sentinel)
|
- P->log
+ PVAR (P, log)
|
- P->buffer
+ PVAR (P, buffer)
|
- P->childp
+ PVAR (P, childp)
|
- P->plist
+ PVAR (P, plist)
|
- P->type
+ PVAR (P, type)
|
- P->mark
+ PVAR (P, mark)
|
- P->status
+ PVAR (P, status)
|
- P->decode_coding_system
+ PVAR (P, decode_coding_system)
|
- P->decoding_buf
+ PVAR (P, decoding_buf)
|
- P->encode_coding_system
+ PVAR (P, encode_coding_system)
|
- P->encoding_buf
+ PVAR (P, encoding_buf)
|
- P->write_queue
+ PVAR (P, write_queue)
|
- XPROCESS (O)->tty_name
+ PVAR (XPROCESS (O), tty_name)
|
- XPROCESS (O)->name
+ PVAR (XPROCESS (O), name)
|
- XPROCESS (O)->command
+ PVAR (XPROCESS (O), command)
|
- XPROCESS (O)->filter
+ PVAR (XPROCESS (O), filter)
|
- XPROCESS (O)->sentinel
+ PVAR (XPROCESS (O), sentinel)
|
- XPROCESS (O)->log
+ PVAR (XPROCESS (O), log)
|
- XPROCESS (O)->buffer
+ PVAR (XPROCESS (O), buffer)
|
- XPROCESS (O)->childp
+ PVAR (XPROCESS (O), childp)
|
- XPROCESS (O)->plist
+ PVAR (XPROCESS (O), plist)
|
- XPROCESS (O)->type
+ PVAR (XPROCESS (O), type)
|
- XPROCESS (O)->mark
+ PVAR (XPROCESS (O), mark)
|
- XPROCESS (O)->status
+ PVAR (XPROCESS (O), status)
|
- XPROCESS (O)->decode_coding_system
+ PVAR (XPROCESS (O), decode_coding_system)
|
- XPROCESS (O)->decoding_buf
+ PVAR (XPROCESS (O), decoding_buf)
|
- XPROCESS (O)->encode_coding_system
+ PVAR (XPROCESS (O), encode_coding_system)
|
- XPROCESS (O)->encoding_buf
+ PVAR (XPROCESS (O), encoding_buf)
|
- XPROCESS (O)->write_queue
+ PVAR (XPROCESS (O), write_queue)
)