Searched refs:vms_info (Results 1 – 2 of 2) sorted by relevance
125 my $vms_info = {};126 sub vms_info {132 if (%$vms_info && $vms_info->{pointer_size} ne $pointer_size_str) {133 $vms_info = {};136 unless (%$vms_info) {137 $vms_info->{disable_warns} = [140 $vms_info->{pointer_size} = $pointer_size_str;144 push @{$vms_info->{disable_warns}}, "MAYLOSEDATA3";151 $vms_info->{zlib} = $withargs{zlib_lib} || "$default_zlib/SHARE";153 $vms_info->{def_zlib} = $withargs{zlib_lib} || $default_zlib;[all …]