| branch | qmlfrontend |
| changeset 10888 | a04e04aaf599 |
| parent 10612 | eb3c1a289a23 |
| child 11461 | ab77e2ea2f82 |
| 10886:99273b7afbff | 10888:a04e04aaf599 |
|---|---|
58 |
58 |
59 tmp:= filesList; |
59 tmp:= filesList; |
60 while tmp^ <> nil do |
60 while tmp^ <> nil do |
61 begin |
61 begin |
62 s:= shortstring(tmp^); |
62 s:= shortstring(tmp^); |
63 writeln(stderr, '> ', s); |
|
64 l:= length(s); |
63 l:= length(s); |
65 if (l > 4) and (copy(s, l - 3, 4) = '.lua') then inc(scriptsNumber); |
64 if (l > 4) and (copy(s, l - 3, 4) = '.lua') then inc(scriptsNumber); |
66 inc(tmp) |
65 inc(tmp) |
67 end; |
66 end; |
68 |
67 |