openwatcopts - " Warning: This Watcom compiler...

Info iconThis preview shows pages 1–2. Sign up to view the full content.

View Full Document Right Arrow Icon
# $Revision: 1.1.6.4 $ use mexutils; sub openwatcopts { my $input = shift; my $default_location = "C:\\watcom"; my @language_handled = ('C'); my $version; my $envExecutable = "$ENV{'WATCOM'}\\binnt\\wcc386.exe"; my $defaultExecutable = "$default_location\\binnt\\wcc386.exe"; if (-e $envExecutable) { $version = `$envExecutable -v`; } elsif (-e $defaultExecutable) { $version = `$defaultExecutable -v`; } else { $version = ""; } my $locate_fcn = sub { my @watcom_roots = (); { push(@watcom_roots, $ENV{'WATCOM'}); } if (-e $defaultExecutable) { push(@watcom_roots, $default_location); } return @watcom_roots; }; my $root_val = sub { if (!($version =~ /Version 1.7/)) { my $supportedCompilerListLocation = mexSupportedCompilerListLocation; print "\n***************************************************************************\n" .
Background image of page 1

Info iconThis preview has intentionally blurred sections. Sign up to view the full version.

View Full DocumentRight Arrow Icon
Background image of page 2
This is the end of the preview. Sign up to access the rest of the document.

Unformatted text preview: " Warning: This Watcom compiler is not supported. Use at your own risk. \n" . " For a list of currently supported compilers see: \n" . " $supportedCompilerListLocation\n" . "**************************************************************** ***********\n"; } return shift; }; my $verNumber; if ($version =~ /Version (1\.7)/) { $verNumber = $1; } return { "vendor_name" => "Open WATCOM C++", "version" => "$verNumber", "group_id" => "WATCOMC", "serial" => 2.0, "root_var" => "WATCOM", "optfile_name" => "openwatcopts.bat", "default_location" => $default_location, "language_handled" => \@language_handled, "root_val" => $root_val, "locate" => $locate_fcn }; } 1;...
View Full Document

This document was uploaded on 01/17/2011.

Page1 / 2

openwatcopts - " Warning: This Watcom compiler...

This preview shows document pages 1 - 2. Sign up to view the full document.

View Full Document Right Arrow Icon
Ask a homework question - tutors are online