equal
deleted
inserted
replaced
50 Dim file, filename |
50 Dim file, filename |
51 Dim rekeep, reskip |
51 Dim rekeep, reskip |
52 |
52 |
53 ' pattern for files to keep |
53 ' pattern for files to keep |
54 Set rekeep = New RegExp |
54 Set rekeep = New RegExp |
55 rekeep.Pattern = "\.h" |
55 rekeep.Pattern = "\.h(pp)?$" |
56 rekeep.Global = True |
56 rekeep.Global = True |
57 |
57 |
58 ' pattern for files to exclude |
58 ' pattern for files to exclude |
59 Set reskip = New RegExp |
59 Set reskip = New RegExp |
60 reskip.Pattern = "\.svn|\.hpp\.sq" |
60 reskip.Pattern = "\.svn" |
61 reskip.Global = True |
61 reskip.Global = True |
62 |
62 |
63 For Each file in dir.Files |
63 For Each file in dir.Files |
64 filename = Replace(file.path, srcdir, "") ' Remove */src/ |
64 filename = Replace(file.path, srcdir, "") ' Remove */src/ |
65 filename = Replace(filename, "\", "/") ' Replace separators |
65 filename = Replace(filename, "\", "/") ' Replace separators |