| 661 | | { |
|---|
| 662 | | if (element_start && (pelem > path_element)) |
|---|
| 663 | | memcpy (element_start, path_element, |
|---|
| 664 | | (pelem - path_element) * sizeof (TCHAR)); |
|---|
| 665 | | |
|---|
| 666 | | *fp = path_sep; |
|---|
| 667 | | pelem = path_element; |
|---|
| 668 | | element_start = fp; |
|---|
| 669 | | } |
|---|
| 670 | | else if (*fp == ':') |
|---|
| 671 | | { |
|---|
| 672 | | if (element_start && (pelem > path_element)) |
|---|
| 673 | | memcpy (element_start, path_element, |
|---|
| 674 | | (pelem - path_element) * sizeof (TCHAR)); |
|---|
| 675 | | |
|---|
| 676 | | pelem = path_element; |
|---|
| 677 | | element_start = fp; |
|---|
| 678 | | } |
|---|
| 679 | | else if (*fp >= 'A' && *fp <= 'Z') |
|---|
| 680 | | { |
|---|
| 681 | | *pelem = tolower (*fp); |
|---|
| 682 | | pelem++, fp++; |
|---|
| 683 | | } |
|---|
| 684 | | else if (*fp >= 'a' && *fp <= 'z') |
|---|
| 685 | | element_start = NULL; |
|---|
| 686 | | |
|---|
| 687 | | n_fp = CharNext (fp); |
|---|
| 688 | | while (n_fp > fp) |
|---|
| 689 | | *pelem++ = *fp++; |
|---|
| | 658 | *fp = path_sep; |
|---|
| | 659 | else if (_istupper(*fp)) |
|---|
| | 660 | *fp = _totlower(*fp); |
|---|