Mercurial > hg > buildtools
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 } |