diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

YAP added / to WIN32 file names (obs from Jose Santos).

Browse Source
This commit is contained in:
Vitor Santos Costa 2009-12-11 09:49:47 +00:00
parent 933f96a80d
commit 1486b97e75
1 changed files with 2 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
C/sysbits.c
View File

@ -1761,7 +1761,7 @@ int Yap_getcwd(const char *buf, int len)
static int static int
TrueFileName (char *source, char *root, char *result, int in_lib) TrueFileName (char *source, char *root, char *result, int in_lib)
{ {
char *res0 = result, *work; char *work;
char ares1[YAP_FILENAME_MAX]; char ares1[YAP_FILENAME_MAX];
result[0] = '\0'; result[0] = '\0';
@ -1799,6 +1799,7 @@ TrueFileName (char *source, char *root, char *result, int in_lib)
} else { } else {
#if HAVE_GETPWNAM #if HAVE_GETPWNAM
struct passwd *user_passwd; struct passwd *user_passwd;
char *res0 = result;
source++; source++;
while (!dir_separator((*res0 = *source)) && *res0 != '\0') while (!dir_separator((*res0 = *source)) && *res0 != '\0')
@ -1832,19 +1833,6 @@ TrueFileName (char *source, char *root, char *result, int in_lib)
} else { } else {
strncpy (result, source, YAP_FILENAME_MAX); strncpy (result, source, YAP_FILENAME_MAX);
} }
#if defined(_WIN32)
{
int ch;
res0 = result;
/* step 2 WINDOWS: replacing \ by / */
while ((ch = *res0++)) {
if (ch == '\\' && dir_separator('\\')) {
res0[-1] = '/';
}
}
}
#endif
/* step 3: get the full file name */ /* step 3: get the full file name */
if (!dir_separator(result[0]) && !volume_header(result)) { if (!dir_separator(result[0]) && !volume_header(result)) {
if (!Yap_getcwd(ares1, YAP_FILENAME_MAX)) if (!Yap_getcwd(ares1, YAP_FILENAME_MAX))