Lines Matching full:platform
54 } elsif ($flag =~ /^(CCTYPE|FILETYPE|PLATFORM|TARG_DIR|CONFIG_H)=(.+)$/) {
60 my @PLATFORM = qw(aix win32 os2 vms test);
61 my %PLATFORM;
62 @PLATFORM{@PLATFORM} = ();
64 die "PLATFORM undefined, must be one of: @PLATFORM\n"
65 unless defined $ARGS{PLATFORM};
66 die "PLATFORM must be one of: @PLATFORM\n"
67 unless exists $PLATFORM{$ARGS{PLATFORM}};
70 use constant PLATFORM => $ARGS{PLATFORM};
74 $define{uc $ARGS{'PLATFORM'}} = 1;
81 if PLATFORM ne 'win32';
93 print STDERR "Options: (@options)\n" unless PLATFORM eq 'test';
104 my $exportperlmalloc = PLATFORM eq 'os2';
214 unless PLATFORM eq 'test';
219 if (PLATFORM eq 'os2') {
269 if (PLATFORM ne 'os2') {
282 if (PLATFORM eq 'vms') {
290 if (PLATFORM ne 'aix') {
302 if (PLATFORM ne 'vms') {
309 if (PLATFORM ne 'win32') {
318 if (PLATFORM ne 'win32') {
575 if (PLATFORM eq 'vms') {
582 if (PLATFORM eq 'vms' && !$define{KILL_BY_SIGPRC}) {
840 if (PLATFORM eq 'win32') {
1005 elsif (PLATFORM eq 'vms') {
1090 elsif (PLATFORM eq 'os2') {
1166 if (PLATFORM eq 'win32') {
1175 if (PLATFORM eq 'os2') {
1191 # Start with platform specific headers:
1193 if (PLATFORM eq 'win32') {
1204 elsif (PLATFORM eq 'os2') {
1220 elsif (PLATFORM eq 'aix') {
1236 if (PLATFORM eq 'win32') {
1245 elsif (PLATFORM eq 'os2') {
1257 # Then platform specific footers.
1259 if (PLATFORM eq 'os2') {