1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
|
+ String {
absolutePath {
var first, sep;
sep = thisProcess.platform.pathSeparator;
// 2 styles of absolute path:
// C:\... or \\machine_name\...
if((this[0].isAlpha and: { this[1] == $: and: { this[2] == sep } })
or: { this[0] == sep and: { this[1] == sep } }) {
^this
} {
// let's also try to convert unix-style dirs
// assume starting from root dir of drive letter where SC is installed
if(this[0] == $/ and: { this[1] != $/ }) {
^File.getcwd[..1] ++ this
};
// currently we can't support this on windows
// though it would be nice to have a primitive to get the user's home dir
// if(first == $~){^this.standardizePath};
^File.getcwd ++ sep ++ this;
}
}
}
+ PathName {
isAbsolutePath {
var sep = thisProcess.platform.pathSeparator;
^(fullPath[0].isAlpha and: { fullPath[1] == $: and: { fullPath[2] == sep } })
or: { fullPath[0] == sep and: { fullPath[1] == sep } }
or: { fullPath[0] == $/ and: { fullPath[1] != $/ } }
}
}
|
