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

fix dir separator for win32.

Browse Source
This commit is contained in:
U-WIN-ENP104VVO3U\Vítor Santos Costa 2011-03-22 11:07:17 +00:00
parent b9b107eaa9
commit b95b332f2b
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
C/sysbits.c
View File

@ -274,13 +274,16 @@ p_dir_sp ( USES_REGS1 )
{ {
#ifdef MAC #ifdef MAC
Term t = MkIntTerm(':'); Term t = MkIntTerm(':');
Term t2 = MkIntTerm('/');
#elif ATARI || _MSC_VER || defined(__MINGW32__) #elif ATARI || _MSC_VER || defined(__MINGW32__)
Term t = MkIntTerm('\\'); Term t = MkIntTerm('\\');
Term t2 = MkIntTerm('/');
#else #else
Term t = MkIntTerm('/'); Term t = MkIntTerm('/');
Term t2 = MkIntTerm('/');
#endif #endif
return(Yap_unify_constant(ARG1,t)); return Yap_unify_constant(ARG1,t) || Yap_unify_constant(ARG1,t2) ;
} }