TAO/TAO_IDL/regen.pl

   1 eval '(exit $?0)' && eval 'exec perl -w -S $0 ${1+"$@"}'
   2     & eval 'exec perl -w -S $0 $argv:q'
   3     if 0;
   4
   5 use strict;
   6 use Env 'ACE_ROOT';
   7
   8 my %args = map { $_ => 1 } @ARGV;
   9 my $debug = exists($args{'-d'});
  10
  11 my $features = 'tao_idl_fe_gen=1';
  12 system "$ACE_ROOT/bin/mpc.pl -type gnuace -features $features tao_idl_fe.mpc";
  13 utime undef, undef, 'fe/keywords.dat';
  14
  15 my $bison_target = $debug ? 'debug_bison' : 'y.tab';
  16 system "make -f GNUmakefile.TAO_IDL_GEN $features lex.yy $bison_target all";