Charles:

Why would the contents of a free CPOOL element be of any value to you?

It's been a very long time ago, but when I implemented the quickcell pool functions for the first release of MVS back in 1973, the first word of an individual pool element was a link address to the next free cell in the pool, as I remember. So, yes, it's fair to say that once you free a pool element it's contents won't be expected to have any relationship to what it contained when you owned it.

Mike Myers

On 11/18/2014 08:32 PM, Charles Mills wrote:
I am trying to shoot a bug. I *know* I have a design/logic error in that I
am referencing a cell *after* returning it with CPOOL FREE. But I am trying
to figure out if I have another error also. Does anyone know: does CPOOL
FREE use the first four or so bytes of a cell for its own purposes following
FREE? In other words, does CPOOL FREE clobber the first few bytes of a cell?
Maybe with a cell or related address?

          CPOOL BUILD,PCELLCT=(R2),SCELLCT=(R4),                        +
                CSIZE=(R3),SP=SP_ToUse,KEY=0,                           +
                LOC=(31,31),CPID=AV_Cell_Recd,                          +
                MF=(E,CPOOLMFL)

          CPOOL FREE,CPID=AV_Cell_Recd,CELL=(R8),REGS=USE

Charles

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN


----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to