#!perl -p0
s/int /my /g;
s/^#.*$//gm;
s!^//!#!;
s/^ma.*$//m;
s/^ +/" "x(length($&)-4)/egm;
s/\}$//;
s/(\W)([abi])(?!f)/$1\$$2/g;