|
DataMuseum.dkPresents historical artifacts from the history of: Bogika Butler |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Bogika Butler Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 1280 (0x500)
Types: TextFile
Names: »UNMAP.SA«
└─⟦909f4eb2b⟧ Bits:30009789/_.ft.Ibm2.50006622.imd Mogens Pelles Zilog 80,000 / EOS projekt
└─⟦this⟧ »UNMAP.SA«
└─⟦ddcd65152⟧ Bits:30009789/_.ft.Ibm2.50006617.imd Mogens Pelles Zilog 80,000 / EOS projekt
└─⟦this⟧ »UNMAP.SA«
NOLIST
INCLUDE RR.FIOEQU.SA
LIST
NOFORMAT
TTL V 0.02 68K EOS PASCAL UNMAP A SEGMENT
UNMP IDNT 0,02 68K EOS PASCAL UNMAP A SEGMENT
SECTION 8
*
*****************************************************************************
*
*
* FUNCTION:
* THE ROUTINE UNMAPS A SEGMENT, AND ITS MAP DESCRIPTOR
*
* REGISTERS:
* ON ENTRY:
*
*
* A4 ADDRESS OF MAP DESCRIPTOR
*
* MODIFIED REGISTERS
*
* 0 1 2 3 4 5 6 7
* A:
* D:
*
* EXTERNALS:
*
* .PUNMP DEF
*
*
***************************************************************************
*
XDEF .PUNMP
.PUNMP EQU * ENTRY POINT
TSTOUT 'UNMP-ENTER',(A4),PMD+4(A4),TSTRTS3
MOVE.B MMUNO(A4),NMMU(A5) NEXTMMU:= MMU
MOVE.L REQADDR(A4),NRA(A5) NEXT REQ ADDR:= REQ ADDR
MOVE.L PMD(A4),TMD(A5) TOP MAP DESC:= PRIOR MAP DESC
TSTOUT 'UNMAP11',NRA(A5),FUNC1(A5),TSTRTS1
RTS
END
«eof»