Lines Matching refs:platform
58 foreach my $platform (@platforms) {
59 my $module = "File::Spec::$platform";
68 my $v = $volumes{$platform} || '';
69 my $other_v = $other_vols{$platform} || '';
86 is $module->file_name_is_absolute($base), 1, "$base is absolute on $platform";
90 is @result, 0, "$platform->splitdir('') -> ()";
94 is $result, undef, "$platform->canonpath() -> undef";
98 is $result, undef, "$platform->canonpath(undef) -> undef";
105 if ($vms_unix_mode and $platform eq 'VMS') {
116 is $module->abs2rel($file, $base), $result, "$platform->abs2rel($file, $base)";
122 is $module->abs2rel($file, $base), $result, "$platform->abs2rel($file, $base)";
128 is $module->abs2rel($file, $base), $result, "$platform->abs2rel($file, $base)";
136 if ($vms_unix_mode and $platform eq 'VMS') {
143 is $module->abs2rel($file, $base), $result, "$platform->abs2rel($file, $base)";
150 if ($vms_unix_mode and $platform eq 'VMS') {
157 is $module->abs2rel($file, $base), $result, "$platform->abs2rel($file, $base)";
164 is $module->abs2rel($file, $base), $result, "$platform->abs2rel($file, $base)";