pike.git/
lib/
master.pike.in
Branch:
Tag:
Non-build tags
All tags
No tags
2013-03-16
2013-03-16 11:10:36 by Chris Angelico <rosuav@gmail.com>
1813e893d5a175eef4a2d92f5218f00e126152a7 (
7
lines) (+
4
/-
3
)
[
Show
|
Annotate
]
Branch:
7.9
Runtime: Support OS/2 path conventions.
55:
// or at least some functions that use them should be. // cf Tools.Shoot.runpike. // /grubba 2004-04-11
-
#if defined(__NT__) || defined(__amigaos__)
+
#if defined(__NT__) || defined(__amigaos__)
|| defined(__OS2__)
#define PATH_SEPARATOR ";" #else #define PATH_SEPARATOR ":"
1016:
#define IS_ABSOLUTE_PATH(X) (search((X),":")>0) return IS_ABSOLUTE_PATH(p); #else
-
#
ifdef
__NT__
+
#
if
defined(
__NT__
) || defined(__OS2__)
p=replace(p,"\\","/"); if(sscanf(p,"%[a-zA-Z]:%*c",string s)==2 && sizeof(s)==1) return 1;
1028:
#endif }
-
#
ifdef
__NT__
+
#
if
defined(
__NT__
) || defined(__OS2__)
#define EXPLODE_PATH(X) (replace((X),"\\","/")/"/") #else #define EXPLODE_PATH(X) ((X)/"/")