Peter,
I think I was unclear with my post.
When a program is running, it has a 72 byte R13 area that is "ready" to
be used by a called program/routine. During the 'current' program, this
area is unused and available If I have a macro that needs a little work
area, I just use something like:
ST Rx,8(,R13)
code
L Rx,8(,R13)
No GETMAIN/FREEMAIN involved. It's 64 free bytes to use anytime, just
don't expect it to survive outside your macro. (And don't use bytes 0-7.)
Tony Thigpen
Peter Hunkeler wrote on 01/15/2017 01:29 PM:
I sure have useing one GETMAIN/STORAGE OBTAIN to allocate storage for the new save
area as well as the workarea for the code as long as I can remember (I do admit,
however, that I cannot remember how far back I can remember <grin>). Anyway I
think this is pretty much standard coding for reentrant code.
--
Peter Hunkeler
