luke
/
ngspice
mirror of https://git.code.sf.net/p/ngspice/ngspice
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

rewrite-rw, rewrite-sw.cocci, .cocci script

This commit is contained in:
rlar 2018-03-08 18:05:10 +01:00
parent 3dd2115291
commit c6d7f59920
1 changed files with 55 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

55
rewrite-sw.cocci Normal file
View File

@ -0,0 +1,55 @@
// (compile "git ls-files -- 'src/spicelib/devices/sw/*.c' 'src/spicelib/devices/csw/*.c' | xargs -P8 -n1 spatch --smpl-spacing --sp-file rewrite-sw.cocci --in-place && git commit -am 'rewrite-sw, coccinelle semantic patch #1'")
// (compile "git ls-files -- 'src/spicelib/devices/sw/*.c' 'src/spicelib/devices/csw/*.c' | xargs -P8 -n1 spatch --smpl-spacing --sp-file rewrite-sw.cocci")
@r1@
expression e;
symbol ckt, CKTrhsOld;
@@
- *(ckt->CKTrhsOld + e)
+ ckt->CKTrhsOld[e]
@r2@
expression e;
constant int c;
identifier here;
identifier Wstate = {SWstate, CSWstate};
symbol ckt, CKTstates, CKTstate0, CKTstate1;
@@
(
- *(ckt->CKTstates[c] + (here->Wstate))
+ ckt->CKTstates[c][here->Wstate + 0]
|
- *(ckt->CKTstate0 + (here->Wstate))
+ ckt->CKTstates[0][here->Wstate + 0]
|
- *(ckt->CKTstate1 + (here->Wstate))
+ ckt->CKTstates[1][here->Wstate + 0]
|
- *(ckt->CKTstates[c] + here->Wstate + e)
+ ckt->CKTstates[c][here->Wstate + e]
|
- *(ckt->CKTstate0 + (here->Wstate + e))
+ ckt->CKTstates[0][here->Wstate + e]
|
- *(ckt->CKTstate1 + (here->Wstate + e))
+ ckt->CKTstates[1][here->Wstate + e]
)
@r3@
identifier i;
@@
- return(i);
+ return i;
@r4@
statement S;
identifier x;
@@
for (...;
- x != NULL;
+ x;
...) S