equal
deleted
inserted
replaced
163 my @path_parts = File::Spec->splitdir($dirs); |
163 my @path_parts = File::Spec->splitdir($dirs); |
164 while(@path_parts[-1] ne "sf") { |
164 while(@path_parts[-1] ne "sf") { |
165 pop(@path_parts); |
165 pop(@path_parts); |
166 } |
166 } |
167 $e32path = File::Spec->catdir((@path_parts,"os")); |
167 $e32path = File::Spec->catdir((@path_parts,"os")); |
168 $base_path = $e32path; # ?? |
168 $e32path .= ($on_windows ? '\\' : '/'); |
|
169 $base_path = $e32path; # Can't be quite right. |
169 $rombuildpath = File::Spec->catfile($e32path,"kernelhwsrv","kernel","eka","rombuild"); |
170 $rombuildpath = File::Spec->catfile($e32path,"kernelhwsrv","kernel","eka","rombuild"); |
170 |
171 |
171 use E32Plat; |
172 use E32Plat; |
172 { |
173 { |
173 Plat_Init($toolpath . ($on_windows ? '\\' : '/')); |
174 Plat_Init($toolpath . ($on_windows ? '\\' : '/')); |