Rev 5606 | Rev 7422 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 5606 | Rev 5631 | ||
---|---|---|---|
Line 31... | Line 31... | ||
31 | { |
31 | { |
32 | filename1 = file_mas[j]*304 + buf+72; |
32 | filename1 = file_mas[j]*304 + buf+72; |
33 | filename2 = file_mas[b]*304 + buf+72; |
33 | filename2 = file_mas[b]*304 + buf+72; |
Line 34... | Line 34... | ||
34 | 34 | ||
35 | n=strlen(filename1)-1; |
35 | n=strlen(filename1)-1; |
36 | WHILE (n>0) && (ESBYTE[filename1+n]<>'.') n--; |
36 | WHILE (n>0) && (ESBYTE[filename1+n]!='.') n--; |
37 | if (n) ext1 = filename1+n+1; else ext1=0; |
37 | if (n) ext1 = filename1+n+1; else ext1=0; |
- | 38 | n=strlen(filename2); |
|
38 | n=strlen(filename2)-1; |
39 | n--; |
39 | WHILE (n>0) && (ESBYTE[filename2+n]<>'.') n--; |
40 | WHILE (n>0) && (ESBYTE[filename2+n]!='.') n--; |
Line 40... | Line 41... | ||
40 | if (n) ext2 = filename2+n+1; else ext2=0; |
41 | if (n) ext2 = filename2+n+1; else ext2=0; |
41 | 42 | ||
42 | n=strcmp(ext1, ext2); |
43 | n=strcmp(ext1, ext2); |
43 | if (n<0) { file_mas[isn] >< file_mas[j]; isn++;} |
44 | if (n<0) { file_mas[isn] >< file_mas[j]; isn++;} |
44 | if (n==0) && (strcmp(filename1, filename2)<=0) { file_mas[isn] >< file_mas[j]; isn++;} |
45 | if (!n) && (strcmp(filename1, filename2)<=0) { file_mas[isn] >< file_mas[j]; isn++;} |
45 | } |
46 | } |
46 | Sort_by_Type(a, isn-2); |
47 | Sort_by_Type(a, isn-2); |