equal
deleted
inserted
replaced
72 ]. |
72 ]. |
73 ^ substrings asArray |
73 ^ substrings asArray |
74 |
74 |
75 "Created: / 07-02-2011 / 11:18:03 / Marcel Hlopko <hlopik@gmail.com>" |
75 "Created: / 07-02-2011 / 11:18:03 / Marcel Hlopko <hlopik@gmail.com>" |
76 "Modified: / 08-02-2011 / 01:08:15 / Marcel Hlopko <hlopik@gmail.com>" |
76 "Modified: / 08-02-2011 / 01:08:15 / Marcel Hlopko <hlopik@gmail.com>" |
|
77 ! ! |
|
78 !UserPreferences methodsFor:'accessing-java-devel'! |
|
79 |
|
80 javaTestsDirectory |
|
81 |
|
82 ^self at:#javaTestsDirectory ifAbsent:[ |
|
83 | nm | |
|
84 nm := OperatingSystem getLoginName. |
|
85 nm = 'jv' ifTrue:['/home/jv/Projects/libjava/sources/libjava/branches/jk_new_structure/tests'] ifFalse:[ |
|
86 nm = 'jk' ifTrue:['path for Jan'] ifFalse:[ |
|
87 nm = 'mh' ifTrue:['path for Marcel'] ifFalse:[ |
|
88 self error:'No tests path specified' |
|
89 ]]] |
|
90 ] |
|
91 |
|
92 " |
|
93 UserPreferences current javaTestsDirectory |
|
94 " |
|
95 |
|
96 "Created: / 07-05-2011 / 17:43:31 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
97 ! ! |
|
98 !UserPreferences methodsFor:'accessing-java-devel'! |
|
99 |
|
100 javaTestsDirectory: aStringOrFilename |
|
101 |
|
102 self at:#javaTestsDirectory put: aStringOrFilename asString. |
|
103 |
|
104 "Created: / 07-05-2011 / 17:45:12 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
77 ! ! |
105 ! ! |
78 !ZipArchive methodsFor:'reading - java support'! |
106 !ZipArchive methodsFor:'reading - java support'! |
79 |
107 |
80 nextBytes: bytesToRead of: zmember startingAt: pos into: b startingAt: off |
108 nextBytes: bytesToRead of: zmember startingAt: pos into: b startingAt: off |
81 |
109 |
632 |
660 |
633 javaName |
661 javaName |
634 |
662 |
635 ^'['. |
663 ^'['. |
636 ! ! |
664 ! ! |
637 |
|
638 |
|