https://gitorious.org/ocamlp3l/ocamlp3l_cvs.git
Revision 95fa9ec3a9de4b4c4440d349d6ce427e2a38e871 authored by weis on 06 October 2006, 13:03:17 UTC, committed by weis on 06 October 2006, 13:03:17 UTC
1 parent f883cad
Raw File
Tip revision: 95fa9ec3a9de4b4c4440d349d6ce427e2a38e871 authored by weis on 06 October 2006, 13:03:17 UTC
Forgotten server sources for both models.
Tip revision: 95fa9ec
ocamlp3lcc
#!###PERL###
use Getopt::Long;

$DEFAULTVERSION="###VERSION###";
$INSTALLDIR="###INSTALLDIR###";

$opt_version=$DEFAULTVERSION;

Getopt::Long::config("pass_through"); ### pass relevant options to the called script...

$result =GetOptions ("-version:s","-model:s");

if (! defined($opt_model)) {$opt_model="process";}; ### default execution model is process

$bin  = "$INSTALLDIR/$opt_version/ocamlp3l-v$opt_model/bin/ocamlp3lcc";

if (!(-f $bin)) {print "Version or model unsupported in $bin"; exit 1;};
 
print "Compiling using $opt_model model, version $opt_version\n";

$out = `$bin @ARGV`;
print $out;

exit;
back to top