src/JavaVM.st
branchjk_new_structure
changeset 964 097cdede29f1
parent 961 fba8a36db660
child 981 03ded8a12bb9
--- a/src/JavaVM.st	Thu Sep 01 21:44:08 2011 +0000
+++ b/src/JavaVM.st	Thu Sep 01 22:10:32 2011 +0000
@@ -2253,7 +2253,7 @@
     s := '' writeStream.
     Java classPath do:[:p |
         s size == 0 ifFalse:[
-            s nextPut:$:
+            s nextPut: OperatingSystem pathSeparator
         ].
         s nextPutAll:p.
     ].
@@ -2265,7 +2265,7 @@
     "
 
     "Created: / 03-01-1998 / 14:27:21 / cg"
-    "Modified: / 31-08-2011 / 22:46:39 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 01-09-2011 / 22:04:35 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 defaultExtDirs
@@ -4643,6 +4643,18 @@
     "Created: / 01-04-2011 / 23:00:06 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
+_java_io_WinNTFileSystem_canonicalizeWithPrefix0: nativeContext
+
+    <javanative: 'java/io/WinNTFileSystem' name: 'canonicalizeWithPrefix0(Ljava/lang/String;Ljava/lang/String;)Ljava/lang/String;'>
+
+    |  path |
+
+    path := Java as_ST_String: (nativeContext argAt: 2).
+    ^(Java as_String: path utf8Encoded asFilename asAbsoluteFilename pathName utf8Decoded)
+
+    "Modified: / 01-09-2011 / 21:50:47 / jv"
+!
+
 _java_io_WinNTFileSystem_createFileExclusively: nativeContext
 
     <javanative: 'java/io/WinNTFileSystem' name: 'createFileExclusively(Ljava/lang/String;)Z'>
@@ -4677,6 +4689,15 @@
     ^ self _java_io_UnixFileSystem_getLength: nativeContext
 
     "Modified: / 18-08-2011 / 14:15:36 / jv"
+!
+
+_java_io_WinNTFileSystem_list: nativeContext
+
+    <javanative: 'java/io/WinNTFileSystem' name: 'list(Ljava/io/File;)[Ljava/lang/String;'>
+
+    ^ self _java_io_UnixFileSystem_list: nativeContext
+
+    "Modified: / 01-09-2011 / 21:46:37 / jv"
 ! !
 
 !JavaVM class methodsFor:'native - java.lang'!
@@ -16480,11 +16501,11 @@
 !JavaVM class methodsFor:'documentation'!
 
 version
-    ^ '$Id: /cvs/stx/stx/libjava/JavaVM.st,v 1.186 2011/08/22 14:49:28 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libjava/JavaVM.st,v 1.186 2011/08/22 14:49:28 vrany Exp $'
 !
 
 version_CVS
-    ^ '§Header: /cvs/stx/stx/libjava/JavaVM.st,v 1.186 2011/08/22 14:49:28 vrany Exp §'
+    ^ '§Header: /cvs/stx/stx/libjava/JavaVM.st,v 1.186 2011/08/22 14:49:28 vrany Exp §'
 !
 
 version_SVN
@@ -16492,4 +16513,3 @@
 ! !
 
 JavaVM initialize!
-