comparison autopoop @ 6:5665a846d227

Also catch ':=' assignments.
author Matti Hamalainen <ccr@tnsp.org>
date Wed, 24 Sep 2008 02:13:39 +0300
parents d72d5d73b93a
children 86a7054b01d5
comparison
equal deleted inserted replaced
5:cdd7f7b6d4b0 6:5665a846d227
232 addhash($usenames, $confsubsts, $filename, $1, $line); 232 addhash($usenames, $confsubsts, $filename, $1, $line);
233 } 233 }
234 234
235 if (/^ifdef\s+([A-Za-z0-9_]+)/g) { 235 if (/^ifdef\s+([A-Za-z0-9_]+)/g) {
236 addhash($usenames, $substs, $filename, $1, $line); 236 addhash($usenames, $substs, $filename, $1, $line);
237 } elsif (/^([A-Za-z][A-Za-z0-9_]+)\s*[\+]?=/) { 237 } elsif (/^([A-Za-z][A-Za-z0-9_]+)\s*[\+:]?=/) {
238 addhash($usenames, $defines, $filename, $1, $line); 238 addhash($usenames, $defines, $filename, $1, $line);
239 } 239 }
240 elsif (/^include (\S+)/) { 240 elsif (/^include (\S+)/) {
241 scanfile($mypath, "$1", $scanned, $substs, $confsubsts, $defines, $usenames, $recurse); 241 scanfile($mypath, "$1", $scanned, $substs, $confsubsts, $defines, $usenames, $recurse);
242 } 242 }