[inseparable changes from patch from perl5.003_08 to perl5.003_09]

 CORE LANGUAGE CHANGES

Subject: Lexical locales
From: Chip Salzenberg <chip@atlantic.net>
Files: too many to list

    make effectiveness of locales depend on C<use locale>

Subject: Lexical scoping cleanup
From: Chip Salzenberg <chip@atlantic.net>
Files: many... but mostly perly.y and toke.c

    tighten scoping of lexical variables, somewhat on the
    new constructs and somewhat on the old

Subject: memory corruption / security bug in sysread,syswrite + patch
Date: Mon, 25 Nov 1996 21:46:31 +0200 (EET)
From: Jarkko Hietaniemi <jhi@cc.hut.fi>
Files: MANIFEST pod/perldiag.pod pod/perlfunc.pod pp_sys.c t/op/sysio.t
Msg-ID: <199611251946.VAA30459@alpha.hut.fi>

    (applied based on p5p patch as commit d7090df90a9cb89c83787d916e40d92a616b146d)

 DOCUMENTATION

Subject: perldiag documentation patch.
Date: Wed, 20 Nov 96 16:07:28 GMT
From: Paul Marquess <pmarquess@bfsec.bt.co.uk>
Files: pod/perldiag.pod

    private-msgid: <9611201607.AA12729@claudius.bfsec.bt.co.uk>

Subject: a missing perldiag entry
Date: Thu, 21 Nov 1996 15:24:02 -0500
From: Gurusamy Sarathy <gsar@engin.umich.edu>
Files: pod/perldiag.pod

    private-msgid: <199611212024.PAA15758@aatma.engin.umich.edu>

Subject: perlfunc patch
Date: Wed, 20 Nov 96 14:04:08 GMT
From: Paul Marquess <pmarquess@bfsec.bt.co.uk>
Files: pod/perlfunc.pod

    Following on from the patch to make uc, lc etc default to $_ (as per
    Camel II), here is a followup patch to perlfunc that documents the
    change. I think I have documented all the other cases where $_
    defaulting works as well.
    
    p5p-msgid: <9611201404.AA12477@claudius.bfsec.bt.co.uk>

 OTHER CORE CHANGES

Subject: Properly prototype safe{malloc,calloc,realloc,free}.
From: Chip Salzenberg <chip@atlantic.net>
Files: proto.h

Subject: UnixWare 2.1 fix for perl5.003_08 - cope with fp->_cnt < -1, allow debugging
Date: Wed, 20 Nov 1996 14:27:06 +0100
From: John Hughes <john@AtlanTech.COM>
Files: sv.c

    UnixWare 2.1 has no fp->_base so most of the debugging stuff in sv_gets just
    core dumps.
    
    Also, for some unknown reason fp->_cnt is sometimes < -1, screwing up the
    initial SvGROW in svgets.
    
    Appart from that its io is std.
    
    p5p-msgid: <01BBD6EE.E915C860@malvinas.AtlanTech.COM>

Subject: die -> croak
Date: Thu, 21 Nov 1996 16:11:21 -0500
From: Gurusamy Sarathy <gsar@engin.umich.edu>
Files: pp_ctl.c

    private-msgid: <199611212111.QAA17070@aatma.engin.umich.edu>

Subject: Cleanup of {,un}pack('w').
From: Chip Salzenberg <chip@atlantic.net>
Files: pp.c

Subject: Cleanups from Ilya.
From: Chip Salzenberg <chip@atlantic.net>
Files: gv.c malloc.c pod/perlguts.pod pp_ctl.c

Subject: Fix for unpack('w') on 64-bit systems.
From: Chip Salzenberg <chip@atlantic.net>
Files: pp.c

Subject: Re: LC_NUMERIC support is ready + performance
Date: Mon, 25 Nov 1996 22:08:27 -0500 (EST)
From: Ilya Zakharevich <ilya@math.ohio-state.edu>
Files: sv.c

    Chip Salzenberg writes:
    > 
    > Having thought about the use of our own gcvt() and atof(), I've run
    > away in horror.  It's just too hairy.
    > 
    > So I've implemented the only viable alternative I know of: Toggling
    > LC_NUMERIC to/from "C" as needed.
    > 
    > Patch follows.
    > 
    > I think _09 is *very* close.
    
    Since _09 is going to be alpha anyway, I reiterate my question:
    	Is there any reason to not include my hash/array performance
    		patches in _09?
    
    Btw, here is the next performance patch. It makes PADTMP values
    stealable too. I do not do by setting TEMP flags on them, since it
    would be a very distributed patch, and it would break some places
    which check for TEMP for some other reasons (yes, I checked ;-).
    
    This patch decreases *twice* the memory usage of
    	perl -e '$a = "a" x 1e6; 1'
    
    Enjoy,
    
    p5p-msgid: <199611260308.WAA02677@monk.mps.ohio-state.edu>

Subject: Hash key sharing improvements from Ilya.
From: Chip Salzenberg <chip@atlantic.net>
Files: hv.c hv.h proto.h

Subject: Mortal stack pre-allocation from Ilya.
From: Chip Salzenberg <chip@atlantic.net>
Files: pp.c pp.h pp_ctl.c pp_hot.c pp_sys.c

 PORTABILITY

Subject: VMS patches post-5.003_08
Date: Fri, 22 Nov 1996 18:16:31 -0500 (EST)
From: Charles Bailey <bailey@hmivax.humgen.upenn.edu>
Files: lib/ExtUtils/MM_Unix.pm lib/ExtUtils/MM_VMS.pm lib/ExtUtils/MakeMaker.pm lib/File/Path.pm mg.c pp_ctl.c utils/h2xs.PL vms/config.vms vms/descrip.mms vms/gen_shrfls.pl vms/genconfig.pl vms/perlvms.pod vms/vms.c vms/vmsish.h

    Here're diffs to bring a base 5.003_08 up to the current VMS working
    sources.  Nearly all of the changes are VMS-specific, and comprise
    miscellaneous bugfixes accumulated since 5.003_07, rather than any
    particular problem with 5.003_08.  I'm posting them here since some
    of the patches change core files, and I'd like to insure that I
    haven't accidentally created problems for anyone else.
    
    With these and a couple of of the small patches already send to p5p,
    5.003_08 builds clean and passes all tests under VMS.
    
    Thanks, Chip, for all the work.
    
    p5p-msgid: <1996Nov22.181631.1603238@hmivax.humgen.upenn.edu>

1 files changed, 24 insertions, 7 deletions

diff --git a/embed.h b/embed.h
index edad0094a9..faa1d5ac5f 100644
--- a/embed.h
+++ b/embed.h
@@ -41,6 +41,11 @@
 #define bufptr		Perl_bufptr
 #define bxor_amg	Perl_bxor_amg
 #define check		Perl_check
+#define collation_ix	Perl_collation_ix
+#define collation_name	Perl_collation_name
+#define collation_standard	Perl_collation_standard
+#define collxfrm_base	Perl_collxfrm_base
+#define collxfrm_mult	Perl_collxfrm_mult
 #define compcv		Perl_compcv
 #define compiling	Perl_compiling
 #define compl_amg	Perl_compl_amg
@@ -79,6 +84,7 @@
 #define filter_del	Perl_filter_del
 #define filter_read	Perl_filter_read
 #define fold		Perl_fold
+#define fold_locale	Perl_fold_locale
 #define freq		Perl_freq
 #define ge_amg		Perl_ge_amg
 #define gid		Perl_gid
@@ -92,7 +98,6 @@
 #define last_lop	Perl_last_lop
 #define last_lop_op	Perl_last_lop_op
 #define last_uni	Perl_last_uni
-#define lc_collate_active	Perl_lc_collate_active
 #define le_amg		Perl_le_amg
 #define lex_brackets	Perl_lex_brackets
 #define lex_brackstack	Perl_lex_brackstack
@@ -157,6 +162,9 @@
 #define nomemok		Perl_nomemok
 #define nomethod_amg	Perl_nomethod_amg
 #define not_amg		Perl_not_amg
+#define numeric_local	Perl_numeric_local
+#define numeric_name	Perl_numeric_name
+#define numeric_standard	Perl_numeric_standard
 #define numer_amg	Perl_numer_amg
 #define oldbufptr	Perl_oldbufptr
 #define oldoldbufptr	Perl_oldoldbufptr
@@ -189,7 +197,6 @@
 #define regendp		Perl_regendp
 #define regeol		Perl_regeol
 #define regflags	Perl_regflags
-#define regfold		Perl_regfold
 #define reginput	Perl_reginput
 #define regkind		Perl_regkind
 #define reglastparen	Perl_reglastparen
@@ -261,6 +268,7 @@
 #define vtbl_amagicelem	Perl_vtbl_amagicelem
 #define vtbl_arylen	Perl_vtbl_arylen
 #define vtbl_bm		Perl_vtbl_bm
+#define vtbl_collxfrm	Perl_vtbl_collxfrm
 #define vtbl_dbline	Perl_vtbl_dbline
 #define vtbl_env	Perl_vtbl_env
 #define vtbl_envelem	Perl_vtbl_envelem
@@ -338,9 +346,9 @@
 #define ck_eof		Perl_ck_eof
 #define ck_eval		Perl_ck_eval
 #define ck_exec		Perl_ck_exec
-#define ck_formline	Perl_ck_formline
 #define ck_ftst		Perl_ck_ftst
 #define ck_fun		Perl_ck_fun
+#define ck_fun_locale	Perl_ck_fun_locale
 #define ck_glob		Perl_ck_glob
 #define ck_grep		Perl_ck_grep
 #define ck_gvconst	Perl_ck_gvconst
@@ -355,6 +363,7 @@
 #define ck_retarget	Perl_ck_retarget
 #define ck_rfun		Perl_ck_rfun
 #define ck_rvconst	Perl_ck_rvconst
+#define ck_scmp		Perl_ck_scmp
 #define ck_select	Perl_ck_select
 #define ck_shift	Perl_ck_shift
 #define ck_sort		Perl_ck_sort
@@ -475,8 +484,10 @@
 #define hv_store_ent	Perl_hv_store_ent
 #define hv_undef	Perl_hv_undef
 #define ibcmp		Perl_ibcmp
+#define ibcmp_locale	Perl_ibcmp_locale
 #define ingroup		Perl_ingroup
 #define instr		Perl_instr
+#define intro_my	Perl_intro_my
 #define intuit_more	Perl_intuit_more
 #define invert		Perl_invert
 #define jmaybe		Perl_jmaybe
@@ -507,6 +518,7 @@
 #define magic_setamagic	Perl_magic_setamagic
 #define magic_setarylen	Perl_magic_setarylen
 #define magic_setbm	Perl_magic_setbm
+#define magic_setcollxfrm	Perl_magic_setcollxfrm
 #define magic_setdbline	Perl_magic_setdbline
 #define magic_setenv	Perl_magic_setenv
 #define magic_setfm	Perl_magic_setfm
@@ -1062,6 +1074,8 @@
 #define sv_clean_objs	Perl_sv_clean_objs
 #define sv_clear	Perl_sv_clear
 #define sv_cmp		Perl_sv_cmp
+#define sv_cmp_locale	Perl_sv_cmp_locale
+#define sv_collxfrm	Perl_sv_collxfrm
 #define sv_dec		Perl_sv_dec
 #define sv_derived_from	Perl_sv_derived_from
 #define sv_dump		Perl_sv_dump
@@ -1097,12 +1111,14 @@
 #define sv_setref_pvn	Perl_sv_setref_pvn
 #define sv_setsv	Perl_sv_setsv
 #define sv_setuv	Perl_sv_setuv
+#define sv_taint	Perl_sv_taint
+#define sv_tainted	Perl_sv_tainted
 #define sv_unmagic	Perl_sv_unmagic
 #define sv_unref	Perl_sv_unref
+#define sv_untaint	Perl_sv_untaint
 #define sv_upgrade	Perl_sv_upgrade
 #define sv_usepvn	Perl_sv_usepvn
 #define taint_env	Perl_taint_env
-#define taint_not	Perl_taint_not
 #define taint_proper	Perl_taint_proper
 #define too_few_arguments	Perl_too_few_arguments
 #define too_many_arguments	Perl_too_many_arguments
@@ -1247,7 +1263,6 @@
 #define rs		(curinterp->Irs)
 #define runlevel	(curinterp->Irunlevel)
 #define sawampersand	(curinterp->Isawampersand)
-#define sawi		(curinterp->Isawi)
 #define sawstudy	(curinterp->Isawstudy)
 #define sawvec		(curinterp->Isawvec)
 #define screamfirst	(curinterp->Iscreamfirst)
@@ -1400,7 +1415,6 @@
 #define Irs		rs
 #define Irunlevel	runlevel
 #define Isawampersand	sawampersand
-#define Isawi		sawi
 #define Isawstudy	sawstudy
 #define Isawvec		sawvec
 #define Iscreamfirst	screamfirst
@@ -1434,6 +1448,8 @@
 #define Iunsafe		unsafe
 #define Iwarnhook	warnhook
 
+#ifdef EMBED
+
 #define Argv		Perl_Argv
 #define Cmd		Perl_Cmd
 #define DBgv		Perl_DBgv
@@ -1551,7 +1567,6 @@
 #define rs		Perl_rs
 #define runlevel	Perl_runlevel
 #define sawampersand	Perl_sawampersand
-#define sawi		Perl_sawi
 #define sawstudy	Perl_sawstudy
 #define sawvec		Perl_sawvec
 #define screamfirst	Perl_screamfirst
@@ -1585,4 +1600,6 @@
 #define unsafe		Perl_unsafe
 #define warnhook	Perl_warnhook
 
+#endif /* EMBED */
+
 #endif /* MULTIPLICITY */