This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Add a Configure question for mad (Misc Attribute Decoration - Larry's
authorNicholas Clark <nick@ccl4.org>
Tue, 7 Mar 2006 22:16:55 +0000 (22:16 +0000)
committerNicholas Clark <nick@ccl4.org>
Tue, 7 Mar 2006 22:16:55 +0000 (22:16 +0000)
perl5 to perl[56] convertor), which if set defines PERL_MAD in config.h

p4raw-id: //depot/perl@27407

16 files changed:
Configure
Cross/config.sh-arm-linux
NetWare/config.wc
Porting/Glossary
config_h.SH
configure.com
epoc/config.sh
perl.c
plan9/config_sh.sample
symbian/config.sh
uconfig.sh
win32/config.bc
win32/config.gc
win32/config.vc
win32/config.vc64
wince/config.ce

index be4a11b..b66e790 100755 (executable)
--- a/Configure
+++ b/Configure
@@ -1159,6 +1159,7 @@ usenm=''
 useperlio=''
 userelocatableinc=''
 usesocks=''
+mad=''
 d_oldpthreads=''
 use5005threads=''
 useithreads=''
@@ -3549,6 +3550,27 @@ esac
 set usesocks
 eval $setvar
 
+case "$mad" in
+$define|true|[yY]*)    dflt='y';;
+*) dflt='n';;
+esac
+cat <<EOM
+
+Would you like to build with Misc Attribute Decoration? This is development
+work leading to a Perl 5 to Perl 6 convertor, which imposes a space and speed
+overhead on the interpreter.
+
+If this doesn't make any sense to you, just accept the default '$dflt'.
+EOM
+rp='Build Perl with MAD?'
+. ./myread
+case "$ans" in
+y|Y)   val="$define" ;;     
+*)      val="$undef" ;;
+esac
+set mad
+eval $setvar
+
 case "$usesocks" in
 $define|true|[yY]*) useperlio="$define";;
 esac
@@ -21872,6 +21894,7 @@ lpr='$lpr'
 ls='$ls'
 lseeksize='$lseeksize'
 lseektype='$lseektype'
+mad='$mad'
 mail='$mail'
 mailx='$mailx'
 make='$make'
index fc90d08..de83224 100644 (file)
@@ -753,6 +753,7 @@ lpr=''
 ls='ls'
 lseeksize='8'
 lseektype='off_t'
+mad='undef'
 mail=''
 mailx=''
 make='make'
index 4897e44..005a1d2 100644 (file)
@@ -726,6 +726,7 @@ lpr=''
 ls='dir'
 lseeksize='4'
 lseektype='off_t'
+mad='undef'
 mail=''
 mailx=''
 make='nmake'
index 7d3ff3f..b3500b6 100644 (file)
@@ -3507,6 +3507,10 @@ lseektype (lseektype.U):
        or whatever type is used to declare lseek offset's type in the
        kernel (which also appears to be lseek's return type).
 
+mad (mad.u):
+       This variable indicates that the Misc Attribute Definition code is to
+       be compiled.
+
 mail (Loc.U):
        This variable is defined but not used by Configure.
        The value is a plain '' and is not useful.
index bf87d0a..19cab45 100644 (file)
@@ -3041,6 +3041,13 @@ sed <<!GROK!THIS! >$CONFIG_H -e 's!^#undef\(.*/\)\*!/\*#define\1 \*!' -e 's!^#un
  */
 #define PERL_INC_VERSION_LIST $inc_version_list_init           /**/
 
+
+/* PERL_MAD:
+ *     This symbol, if defined, indicates that the Misc Attribution
+ *     Declaration code should be conditionally compiled.
+ */
+#$mad  PERL_MAD                /**/
+
 /* INSTALL_USR_BIN_PERL:
  *     This symbol, if defined, indicates that Perl is to be installed
  *     also as /usr/bin/perl.
index 3fb580f..41103db 100644 (file)
@@ -6163,6 +6163,7 @@ $   WC "lseeksize='4'"
 $   WC "lseektype='int'"
 $ ENDIF
 $ WC "mab='" + "'"
+$ WC "mad='undef'"
 $ WC "make='" + make + "'"
 $ WC "malloctype='void *'"
 $ WC "usemallocwrap='" + usemallocwrap + "'"
index 89f75e1..d7e9469 100644 (file)
@@ -661,6 +661,7 @@ lpr=''
 ls='ls'
 lseeksize='8'
 lseektype='off_t'
+mad='undef'
 mail=''
 mailx=''
 make='make'
diff --git a/perl.c b/perl.c
index 11a62e7..a931a78 100644 (file)
--- a/perl.c
+++ b/perl.c
@@ -1800,6 +1800,9 @@ S_parse_body(pTHX_ char **env, XSINIT_t xsinit)
 #  ifdef PERL_IMPLICIT_SYS
                             " PERL_IMPLICIT_SYS"
 #  endif
+#  ifdef PERL_MAD
+                            " PERL_MAD"
+#  endif
 #  ifdef PERL_MALLOC_WRAP
                             " PERL_MALLOC_WRAP"
 #  endif
index 4f6bb01..ddf15cc 100644 (file)
@@ -735,6 +735,7 @@ lpr=''
 ls='ls'
 lseeksize='8'
 lseektype='off_t'
+mad='undef'
 mail=''
 mailx=''
 make='make'
index dddaea7..9de5e03 100644 (file)
@@ -627,6 +627,7 @@ longlongsize=8
 longsize='4'
 lseeksize=4
 lseektype=int
+mad='undef'
 make='make'
 malloctype='int*'
 malloctype='void *'
index af4c297..bc6c27c 100755 (executable)
@@ -592,6 +592,7 @@ longlongsize=8
 longsize='4'
 lseeksize=4
 lseektype=int
+mad='undef'
 malloctype='int*'
 malloctype='void *'
 modetype='mode_t'
index 854f035..c528ba1 100644 (file)
@@ -746,6 +746,7 @@ lpr=''
 ls='dir'
 lseeksize='4'
 lseektype='long'
+mad='undef'
 mail=''
 mailx=''
 make='dmake'
index 82c3651..e197529 100644 (file)
@@ -746,6 +746,7 @@ lpr=''
 ls='dir'
 lseeksize='8'
 lseektype='long long'
+mad='undef'
 mail=''
 mailx=''
 make='dmake'
index 6463ff8..1e210c5 100644 (file)
@@ -746,6 +746,7 @@ lpr=''
 ls='dir'
 lseeksize='8'
 lseektype='__int64'
+mad='undef'
 mail=''
 mailx=''
 make='nmake'
index 1b73ce0..0baee63 100644 (file)
@@ -746,6 +746,7 @@ lpr=''
 ls='dir'
 lseeksize='8'
 lseektype='__int64'
+mad='undef'
 mail=''
 mailx=''
 make='nmake'
index e4d0971..9e1bf1d 100644 (file)
@@ -720,6 +720,7 @@ lpr=''
 ls='dir'
 lseeksize='4'
 lseektype='long'
+mad='undef'
 mail=''
 mailx=''
 make='nmake'