bsrdp@daisy.warwick.ac.uk (Mr H Boothroyd) (06/09/88)
A recent query raised the problem of not being able to preserve big
environments for children. The rest of this file is a UUENCODED ARC of a
utility, ENV.COM, that I wrote for myself about 6 months ago.
ENV.COM is used
to add up to 100 dummy variables to fill any unused space in the
environment, so that the environment will be copied full-size when
an application is called,
to delete additional variables from the newly copied environment.
ENV.DOC illustrates the use of ENV.COM, and also illustrates how to
tackle the related problem that
PATH has its results recorded in the environment,
APPEND does not.
ENV.CMP is source of ENV.COM written as a DEBUG command file. It is
needed only if you wish to re-compile ENV.COM. To do so simply type
DEBUG < ENV.CMP
The ARC should show
Name Length Stowage SF Size now Date Time CRC
============ ======== ======== ==== ======== ========= ====== ====
ENV.CMP 3987 Crunched 47% 2134 27 Jan 88 10:05a 9647
ENV.COM 768 Crunched 18% 636 27 Jan 88 10:06a A718
ENV.DOC 5325 Crunched 48% 2774 9 Jun 88 1:36a B369
==== ======== ==== ========
Total 3 10080 45% 5544
=====uudecode=====
begin 644 env.arc
M&@A%3E8N0TU0``0```3?5@@``#L0N5!'EI,/```,;D`4<6+%Q9`F4$"8>2,'
M1)@Y<\JT$<,F#P@Q%D$0*2*DRA$0/`02-(BP@8*`4.K(@?,FH@X0<,*0>5''
M34PR(.B@*0.BC!L[:>2\<=/&)QT0=]+H%&G%C9L>)@/ZM.-BS)LV)LV`B`$#
M!H@:74&,F6%2SA@\)F=T-6DRS-:U"G9PA6$2A)HV<$#(&$,W+M<9/7\Z)$-&
M3AF(=<F(`0$B;-@39<J<,"D7QHW`=N:DT5,F\>(3$"?[A9$#,YTW<#R#.$&'
MCNC*BZ?"H2-']0DX<%YSQ=GF#4Z9A0_/40T"A]?';=KHAC0`IDR:-F6JABLW
MAHR<A^FP2>.FLP(0BE?7O'FB<=_J.!2^J4EF>M^V6V7TA5EG#AKPP_W*B)$`
M$@$SW.%T6EY#/-%$$T$X081!!M;5FQT.X<'"%C'8T(6#;T!(QAPLA('6=V/@
MA11#OTE(H85UJ=%=?#%09MT8_?T7(`A*S0%"&V%PAUE00Q7E!AV)E3%&A!AJ
MR*&'=0$WHAPE3CC#A=]Q-R22WSV(7X<?WICADCB)8>*318K%!@LTU&4?&Q=)
M.`8;=4E)Y'<LY;5AF!22U@4+7M+)U0UW>IE``COHQ!,;/IVQE(X8T7&8GC#4
M<*>'?^X0T1E34>;&&W>`@$88=O`T%0B3OO"&&3:&<52=CNI0YY,@U$6HC62D
M,>%?4&H)X5FS6E:KE1ZR<%X,-=B@I6$@&`9'&:;F5VP9<*PXQQ@/B1'DD&>9
M">T<TGZG(D_`"LNH&'=6^QT90H*7!J,YW!EK788!J0!\,=SPJ[R@TL;=&3<^
MI&A#"S5DE!QYV#:0%3#$T$,88HQ!KAEGE'<<6PJX%8-QK?IE7(R=RI&&&1;-
M05L=8]"ADG>V,H;K?$J*.:%QM:K!$W,Q*-;?`#O$48=2-&IU:4XYLOG=JXS%
MFBL9M:8LM+@E1\B"?&;2T=YWQO+T;+0IOCQ`S&+,7//-1VWL$!MHSA'3&"2[
M*5:65IK+`@XM@LC&T\L>"^JUV=+HQI!GAPG"%BRSL&:DA+IAZ'VCYJ1Q<F7@
MY+'&@D\;]+E5;KGW;NJF$2E+<P14.(!R>"S6IK5%#N'7$\9:*T,@,!?&F$R+
MSAB%S#V*)B0&[&"854R"L'E0GA/:6AFA@_"VC:#*6B?1>HL!!PLQQ$`6B"*J
M_+Q=5L<P5O++Q\!<72'FI7(-*:ZXE6(NCL48&V^@YJIOV+9Y]^/NXZU\7:BK
MSOI\W3.V^H3*UXH^:MRZGK;$AS6]]2I>\TG;\1Z%-LGM#W8#J-6:QI"BZ,6,
M@GX)SZ6.\H8U-`V#<B'#D,J`!Z6PJPSN@A<9S."B%3I'<66PF5'2L+J*($4I
M]QE8P5C`%!C(@(<UH4,:T&2&.H"->S74"USL,B28B1")8-.+#<KVOD3QA$(W
MH($$163%R67Q3C,(0_BXM<+X720/BO(BF%RW/[7HZ8L=\IE=1!0S%KXK8DH\
MCWR\`B`W*&XS/"D<'`P3D1\%AC8!<QO<@*:V!4:JCS@)W.!TIQ4F(&$*>L/5
MNEQ'NAG`S5C.HIN9ZK`8M2%-*`U16]O`4RYS)4]"F]S!?F00(U`ARRSW$=2.
MA$(4HZBG(3BBPQC0D$D3<25=KMH08S0S-/\=YG&Y6J/=\*89RNQ'*\)+7U[Z
ME2\=120,N'1<\=:WH;J!4FJBA%-][H,T.*QSG.JTCRLYB:L\08U9/.E>^^"$
MFGG"I)_5Y&=>D*:&L^A!+S6PHUU6=$UKSB`&R[SE,'\9&+A9B9F;+)F7_-9`
M"/5J/N><&]6^,P=2IHFC=<'#,/&%4<B)90XOX94Q[33*Q?3*GB]]B9)Z903'
M42FG8A%1G?B$I13A308V$&,\[[,H@09-6>3"6T;-=DIF,>9!^V2E5%TZ!IB6
MK$[I8D%&)UA![R%5J;),:%W<*<^NKK6?^#$@+%V:,IYR+WI#9:`UDUJQ9:40
MCTCUCBRG.!B<="=3_THD4*VT)A;T%$1>'5[QFAFFC58U+UBM6U3]:26P5NZ$
M?W6+#(QC38J-1SILG"F?*BLADL4*0A0QXT\[VSRBKJZT0SIM)+4)133M<:WO
M=.M27_I6[\W)J3U1EHJ.FH,;E)4Q,A!#VV397#-V$8M:O&M>KALO+;(@C&/4
M"\*LB\8KQDN:O!J3&UV'7=E9<[SC*A=WX]4RAN(`A-%=9;L@)EJ^6),OJ6,`
M@I+@!!!`00I/.((4@G"@(NBM3F8(EXUVT)O?$(:0-N(F$X@PA1<PH0A3$$L-
ME06M*%K'*[3;`20Q(X:'\"0,?L2,9CC3VZU0+,7#%-(:0&"'U:4A5G2P2.$J
M_,M@AN^H9$M=[;RV01[[&"<NV)ZVHB>#,J"X=E%N#@EQ!A2WS"$//_(0"%``
MO(:,(`8I^._+%J!=_8V)7O[9`9/?<)2;@"#+X=4+&2Z3XBR#X`QT?@,(=%OC
M.BIY!W;&\Y3-2@:W])DY#HGQEMTERSVG;@$[(#2(DCA:/3;ZTCN8-`B>L(0Q
MEQD$(X!!FCFY/T]C,&EA0`.9FD@`2=$!QHW.G:C-()0VP$0H9Y!#&!#G/CKL
MAS*I>\!`B#!J(X!@P`4^<((7W&#^ZL7*!I1U:2!1`$0S[BA?#C,>(HV32>N-
M#!)2RWRX<Q2]K#)M^UOE71C=Q`)86]V4P?>X%@,#M\``)R>8`IAOC8>7?.HF
M?-"MPW#2;[V4:=^K0<$04K"5'.`@/4C(`QM.$Q`AI$\G0LD#&7A8!3>D(6.:
M"3(E07`%<"9E#&L@@</\#;?PG"`E*VE)&5YB9UU.A4>]-&12EC(PISA98PA[
M%0M.T/!_VP9UY/+=BZ-8](#T&.D4>>9#2EH4`0G:8^`\RM!S2)""R1QB=S!)
M'"`&&@A%3E8N0T]-``,```3??`(``#L0SU`8IP`#```,Z7H%``"@3)DY<^C0
M@0,'$(`V;0#4<0,G#!F"PR`=\!#*`@!'V'88\%BG'A*0`PP,```$Y"(/*V,1
MF#8.R(=$'A($P'D@P*@"`8CY&!!@D8.>N`C*<Y7$51U]B1PL"/`DD0^=&1<4
M<6(%1HP>8<2,(5/&S!F,N0@*<."0CA2A#0($>(8+!(!^\US1(1+D5R``_/(&
M0<060%4?<1458`!"5(0`Q6S$[34A`*!\`^@@Z/7X<H$Z&%@=*<)8AQ$`X>S5
M88`+CL^XH![C6Q<@7\8!Z#P`D(,/W2$`_@S0L>QCN(XZ[8+/"0`+AJCAZ\3=
MY@=W9SY8/9:F>!;M6=5]1G5&CBN4J!$GK)9&L7(E4;9YIKYXR3(.1AUWB?PE
M6I84@/9EA]SC0B@ZI8"-"P4\```2+N1@0$]R:&#`!T\$,0\I3[A@E4ZS+>#`
M3?@D"("#/65$@`NQ/.#">#LM<^%A6(72TRX.`&#//$"(<D$`Z,3QCP,?'C"'
M`.MH$-QP@!07P'$)*,><<\/YX\".=6R3T0.,./``CUGX@XXM_@RYC@0\P%%'
M`>@H\,\ZN)GR#RP`T,)$,R'0DH`N``Q`)RP!K!-/1A4HT,`4>;A!1QAXZ`!"
M&6[8`4)%9/`Q$:0-*$`""D.D`$(,.>"``PA(Y,$&'6^X`8(0;[Q!!QIRO)$'
M&2R`4(4;:=A1AAQSI$%''B"\808(5X0AQQUIC+$&"8)"48<<<+PQ1QF*0@K"
MJF4LVF@:K;K1!J-T@$#LJB!L984;IMHA;!IAL7$0"X*^(0<(9*E+1[5AL,%&
MN%R1"X*Y<J`KAKIS@!`&0G5L2\:T;X"0D+#=?HL&OEW%0$)&10`:"$5.5BY$
M3T,`!```!-_6"@``R1"2#&FSS10```Q%G%AQ0>3)D`8*$$ZITJ1)$"E9$/:`
M=``A%31E0)A)PR9CP(%#GC0!<2?,'))RTM"A4\:-QC=R0-29D_&.2C1I7+H0
M$H2*1HYE3M9Q0Z9,S"93"DX!,<.%#!@@$+YQ&<8E%I]CV$PMXP)$$CH@T)@$
M00>-G#(99P;5$36A`A"0!H1)`>(C""A!B,`=L)$-FY-ET[I12P;$'#AAQF3,
M218CB#%UY)QU`[:EG31RIK9I"18A7`AGY"0N8Z:.WSP@&,>@T4),'I8@Q&@=
ML^:DS;(@[(1)&49V4,^0*'R$$:-'[S%%S9P!+EP@#!G&Q2`GO?QM\.$SHD]7
M#MP"6Q!LX^H`/D`,7;M5G.#5>[;-&SM!ZSJ/P4*^E>?U7<35F+E-XXR02<89
M")9AIAEG]0$'`0ITO$$23F.@\1]J8L$'@ALPM1'&:;&AY=(8NZ541F&N@5!5
M6W!%$`8<<+"1!HATI#'58QNRD0)Y8YPG$`@\5/4:3FZ<0>!?9?@``AEI',9&
M&'F<%$9L(IIA6!Z4A8$'".WE5)0<+@#7@$6.(2;:9BS)X>19--+40DXTN3&'
M2FG`UZ5;'[D0TDAWP%1;;*C1(=H8.0DI1F)K-)99'6=(N)E[<J!VV9-BQ@C9
MDC&YQM))C`765H1A,/:&E%!,`<4)3A+U'X%N7):9&YM1!IA88,%QEF)%_>??
M4#&RD1I8&Q%5:EL%KMHJ6'=`*&&2IV[56!C$<J2K&`"&F,:(,L%1DAQD8$J5
M2PBMV.*+S,KX88U=`1<!0G7>&=98&((%;4MD!<528;=)^$9@,<%GIK@G?0H"
M4DIU]950-)%T4UN!^5<4'"UEBVJ,9[&!VHS%EH'OOR]F-L>G8(EUDH8YT=&I
M&]0^.<94;\[!$F5M)9<3G#/ZJZE:(/AK:7R,A3IJJ84%>Z"KY;I5Q11%@/"$
M$?;9*9)$D#B`T!48;6LBBR["*&YJ)X'HUXCU`?S$4B!*-JU0UN[FL,^L<F:;
ML6U-)?&Z%JHQ4V48(BHA36<,"YB#:+S!1F&:ZL:;;VN_*&&%&;WK$DV=*8!"
M587!\<8<;\J&FLEOP#&QE)JJG%*0-/H5Z*G>5AWN5"D$K5#?<H#E[UDMW)%2
MC*!KJD)<6IWQXNT#U"REUU/4IZG;J)74IX-A-]I6'65C^RO:P_I^ZIMZ9,1X
M:BZ%Y(0121SAPA19+%6BIB^4P=8<MT78MI3`33`%$D4PP40//)"1$GP^\(!8
M63[<Z9`31%#:2,JG`S=`@@`(H4D9VK"W#I'%02JK@QFDI!*-F(8-(0`!""["
M+*P]J(/I$LF1WA"4.2&D"F[H".5`D(<W1.8QD9D,W53U,[`@:T-G"0,94%,:
MO]2GA76@T>+0<BK2F*$,8VB<OT(X$GVAI@PFX0AJ&(.D68'%/;4:7Q[@,+KV
M$8T*[;/+>KQ8!#!:9P+H44]>R.B3KD#"`PA)@DN,B$0;VO`D;VI#BRY'E3HT
M2$/SRHU1WA0S,[#1/C"`@7:2PYSP$"`\!AB/`N18,VP9Y8$CW-5)U/`&,>QJ
M70WTTVAB0ZC4;$UW,0)D&=YFAMT8RH6):LNB8'*\GYA*4]`;4%DZ:!._.#!Y
MTRH,\Z[EL!*=J%M4`U>,IB(PL`3&)56LX]M&I))7=3"7+,/;L%0W29D4C(G8
M,Y$OVX":0=%!?7V)C]Q4UB$SP"0CD`/!.L$2!C.4Z50@XY8"2J?,JVGM+UVY
M2$;<Z9<WV*1V9B%B5=K%+&J9031Y4QL(=&<A32'D#"TQRH924Y0P",PEFGIH
M&"+J*J]X,R,\`(&1&H0]),$H(T7IR#+=)#T-<3(F")'-&VC3+RF=K`T:\M6#
M)@=3BW7J+R9"4[NPM,HRZ(9E+"T+LMI5AOK$$R$=T>'H3J85FJ)`!W1Q9TPP
M)`<-Z0IXCWD#4`?D(I+-@9L:C$%7@E`%*CRA"%@HPA!VTA//`*<`/"C";MX6
MJ9Y.3V2M:P'SL.1"VA4).`;`"Q60`((AZ(`+2MF!93'[-2X\X0I.L.L3F#`%
MS5Y6*5P0+6E-RP4A),$)._BK#L9P63$PYF158I,X=:4I<Z(3*"<1:^C:*B1^
M6@UED!5C7E`$"<`.H4:&M2E,-C@%*4SM6\?UJG#+@(<PZ+$C=QF":J>0`A\D
M=T?I&:-U`"L%>4DO#'XD(1Z0Z`)SFM<M<"G`5SRXL<V`P#V400,><Z(8D[))
M9%L#'$YX9B)G.B:5&?'77V55!C&-3JHGH:I)0>2&$X"E/0N$5DPJ=C$,DV0L
MC#G+85"6D;^R-(>\%4T=-%3)!UD,(S&I8$F<),^YM:!!K2E#"^90SZ**C"/A
M_.N!:W1AQRSI4F"!@GB?,-HI9!`AG@&!#.;JA"`<00I!:`)??=*"E\3D"D^0
M`A%(92(WC'1,MMP26TQ\0ZHD,[O,+<!#U?H@PUFP=3B^KNEFFK6%WNN7-1I1
M,R^$%@4;A33OS#/Q_AN&-60D,WP6;C5724$*WM%W1SQ+89[40XD-F0X2/&)A
M_HI-.L"UN3PXV1S(]**P0!%)09K#??.;1O7F5[)(Z,%FT:SFV*XW"%"`0D"(
M(.S+$IL(?TT"TII;@A@`H0<]`$)EG9UF(G`A"%W^<IBCC30G/,$GU;YVMK?-
MA6=_.]Q@'DFUL8Q?IG1E"4600A.20(4QU\=$8GA/3=A6&D!?TKBGHRF'.V15
M4W$,7G_=356'R[4VTXMM^(*T4AO=0,2L<)AF,U%LTB"DEL!20JQ.E8'21IE7
M%T"@:*JSB<B`I)EN5%:=[(A_6`JM(T&1#<TJ2U>:D+')<0P$';%GGI&M;`#6
MS(_2PZ7*A34@S]4AB9'A"@BFX*`-E>7D/C\R4B6\WOT)V#`6X]-=>D)9B9LH
MOH`$%X=4W"!1F\B>![<S=A.>YW\*+TS,.OOU2L3T92<U(TNE^SN%F<*@G$0%
M25!!)O_:WQN/KC>-M557N&[27BGXFDYDM,IZ`UZ$SS3/)!O1'-A";[@HX,5(
MA$EAJGG=AIVZH1:/ER]I'R&.V*\E";+.ZQU$89K(H:*.\9;M1P\;?]'>H"X1
MTX#BJ?B8N[HMT09I\MW`4$*;E,(K^SQ8\*UO?H\Y]^3?=[_Q6K2%4YYAE3:S
MK6C"!OB<I/6PEC6MQV!K'1IEUP>D`Q$#1073.8A18'=0!B=@(8HS47'2$G_5
M:VMD'8]4?$9A(4\R*[(G/<7202X4$]+',JGG,#.!263@()I&!W_U14;#!$10
M>`#4`R4`@T10`L!1@2IV@?#$5">#+1P(*R11$\[":"7C!JC1>W\S&2;H(//$
M7(^D0=`B5AD1&!023X-"&Y@T$RM81B!`@SU`@^R6?OS&6JX%6S>H`R?X2<+U
M@?1G?WT&7@DH1'\U@\FV;#:X7L#6;*WU6JPEAE3`6IFU6:@U7H#869\56E2V
M6IME;'#Q2!$T0:A"0RP'%H<Q2K=E$C61$8CS&#B1A!"X7LJE%Y!@`F?(&9>D
M*?DD:/TT%7^U67[(!7X(`M4FBS(@BS,@BS1PAA4R.F>!:G)`,H6Q9SN7?'>6
M</6A(9;&6'P656FP0]42@>BE1M!&@0(H+Y'&$GC`*T`!`F877-/U@=PH<2R#
M`C\55)$3>+8QA#UWAAH$7W\4+O^$&M5'+26"5A6C?<CB6Q*23K:4)!@Q!S>R
M7B4P6B]8AP!TAXVH`T7@<%+BA^?W.+>$8QJGB5982BP5@G00D`C1`DV#+@R9
(-`5Q$&X!&@!T
`
end
-----------------------
Hylton Boothroyd Janet: h.boothroyd@uk.ac.warwick.cu
Warwick Business School Darpa: h.boothroyd%cu.warwick.ac.uk@cunyvm.cuny.edu
University of Warwick Uucp: h.boothroyd%sol@warwick.uucp
COVENTRY Earn/Bitnet: <Janet address>@UKACRL
England CV4 7AL Phone: +44 203 523523 Extension 2428
-----------------------