That was my test, I just didn't put all the code in my sample. The first getmain put 100 x's into the area and then freemained it. The second getmain was at the same address but on 1.9 it was zeroed out and on 1.10 it wasn't.
Jon L. Veilleux [EMAIL PROTECTED] (860) 636-2683 -----Original Message----- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Tom Harper Sent: Friday, November 21, 2008 12:58 PM To: [email protected] Subject: Re: z/OS upgrade Jon, If you are trying to infer a difference in GETMAIN behavior here, this test does not do that. I'm fairly certain that in the 1.10 case, the storage was obtained from an existing page, and thus was not cleared. Depending on the storage layout, this could happen in 1.9 as well. If you change the test to do two GETMAINs, alter the storage to non-zeroes in the second area, do a FREEMAIN, and they re-obtain the same amount of storage again, I think you would see that it is not cleared in 1.9 either. Tom Harper IMS Utilities Development Team Neon Enterprise Software, Inc. Sugar Land, TX -----Original Message----- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Veilleux, Jon L Sent: Friday, November 21, 2008 11:46 AM To: [email protected] Subject: Re: z/OS upgrade Wayne, I ran a test on both z/OS 1.9 and z/OS 1.10 using the following code and on 1.9 the area was initialized to zeroes and on 1.10 it wasn't: L R6,=F'1000' GETMAIN R,LV=(6) LTR R15,R15 BNZ GETERR LR R4,R1 * PUT IN WORKREG LA R5,100(R4) ********************* BEGIN SNAP ROUTINE OPEN (SNAP,OUTPUT) SNAP DCB=SNAP,PDATA=REGS,ALL,STORAGE=((R4),(R5)) Jon L. Veilleux [EMAIL PROTECTED] (860) 636-2683 ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html This e-mail may contain confidential or privileged information. If you think you have received this e-mail in error, please advise the sender by reply e-mail and then delete this e-mail immediately. Thank you. Aetna ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
