| Newsgroups |
gmane.comp.emulators.hercules390.mvs |
| Message-ID |
<[email protected]> |
---In [email protected], <gdblodgett@...> wrote :
> I'm out of town at the moment, so I can't
> check the source.
If I make ikfcbl00.txt available on the web,
can you access that?
> why it thinks memory is too fragmented.
I saw this code, containing the only GETMAIN:
GETMAIN R,LV=(0) 45100021
L R15,TBAPRIME 45120021
ST R1,GETTABLE+NX28 45140021
LR R0,R6 45160021
* 45180021
* TEST IF NEW AREA IS CONTIGUOUS TO AN OLD ONE. 45200021
* 45220021
LA R6,TBMASTAM GET FIRST MASTAM. 45240021
LR R9,R1 45260021
AR R9,R0 45280021
TBGET06 C R9,TBDBEGAR(R6) 45300021
BE TBGET05 LOW CORE CONTIGUITY. 45320021
L R10,TBDBEGAR(R6) 45340021
A R10,TBDLENG(R6) 45360021
CR R1,R10 45380021
BE TBGET55 HIGH CORE CONTIGUITY. 45400021
C R6,TBLASMTM 45420021
BE TBGET07 NO CONTIGUITY AT ALL. 45440021
LA R6,TBMSTMLG(R6) 45460021
B TBGET06 TRY NEXT AREA. 45480021
SPACE 2 45500021
* NO CONTIGUITY - SET A NEW MASTAM. 45520021
It seems that it is trying to join GETMAIN
areas together. But isn't there some
overhead placed before each GETMAINed
block? Perhaps in MVS, but not in MVT?
I don't think a user application can join
memory areas together in MVS.
BFN. Paul.