;****************************************************************************
; Filename: MEMORY.ASM
;   Author: Peter Andersson
;  Version: 0.0
;  Created: 1994.12.25
;  Updated: -
;****************************************************************************
; Copyright Peter Andersson, 1994-1995.
; All rights reserved.
;****************************************************************************

        Include STDDEF.INC
        Include "MEMORY.INC"

        Dataseg

Label   BlockTable FreeBlock
BitSize = 0
        Rept    MEMBLOCK
        FreeBlock {PrevFree=Offset BlockTable+BitSize*Size FreeBlock,NextFree=Offset BlockTable+BitSize*Size FreeBlock}
BitSize = BitSize + 1
        Endm
Label   BlockTableEnd FreeBlock

        End