U/perl/mad.U

   1 ?RCS: $Id: mad.U,v $
   2 ?RCS:
   3 ?RCS: Copyright (c) 2006 H.Merijn Brand, Nicholas Clark
   4 ?RCS:
   5 ?RCS: You may distribute under the terms of either the GNU General Public
   6 ?RCS: License or the Artistic License, as specified in the README file.
   7 ?RCS:
   8 ?RCS: $Log: mad.U,v $
   9 ?RCS:
  10 ?MAKE:mad madlyh madlyobj madlysrc: Myread Setvar
  11 ?MAKE:  -pick add $@ %<
  12 ?S:mad:
  13 ?S:     This variable indicates that the Misc Attribute Definition code is to
  14 ?S:     be compiled.
  15 ?S:.
  16 ?S:madlyh:
  17 ?S:     If the Misc Attribute Decoration is to be compiled, this variable is
  18 ?S:     set to the name of the extra header files to be used, else it is ''
  19 ?S:.
  20 ?S:madlyobj:
  21 ?S:     If the Misc Attribute Decoration is to be compiled, this variable is
  22 ?S:     set to the name of the extra object files to be used, else it is ''
  23 ?S:.
  24 ?S:madlysrc:
  25 ?S:     If the Misc Attribute Decoration is to be compiled, this variable is
  26 ?S:     set to the name of the extra C source files to be used, else it is ''
  27 ?S:.
  28 ?C:PERL_MAD:
  29 ?C:     This symbol, if defined, indicates that the Misc Attribution
  30 ?C:     Declaration code should be conditionally compiled.
  31 ?C:.
  32 ?H:#$mad        PERL_MAD                /**/
  33 ?H:.
  34 ?LINT:set mad madlyh madlyobj madlysrc
  35
  36 case "$mad" in
  37 $define|true|[yY]*)     dflt='y' ;;
  38 *)                      dflt='n' ;;
  39 esac
  40 cat <<EOM
  41
  42 Would you like to build with Misc Attribute Decoration? This is development
  43 work leading to a Perl 5 to Perl 6 convertor, which imposes a space and speed
  44 overhead on the interpreter.
  45
  46 If this doesn't make any sense to you, just accept the default '$dflt'.
  47 EOM
  48 rp='Build Perl with MAD?'
  49 . ./myread
  50 case "$ans" in
  51 y|Y)    val="$define"
  52         madlyh='madly.h madly.act madly.tab'
  53         madlysrc='madly.c'
  54         madlyobj="madly$_o" ;;
  55 *)      val="$undef"
  56         madlyh=''
  57         madlysrc=''
  58         madlyobj='' ;;
  59 esac
  60 set mad
  61 eval $setvar
  62