DMMemoryModel.mesa
Written By: Pradeep Sindhu, August 19, 1985 4:57:12 pm PDT
Pradeep Sindhu August 22, 1985 3:45:30 pm PDT
DIRECTORY
DM
,
DMMBusModel;
DMMemoryModel
:
CEDAR
DEFINITIONS
=
BEGIN
Memory Related Types
MemorySpecific
:
TYPE
=
REF
MemorySpecificRec;
MemorySpecificRec
:
TYPE
=
RECORD
[
mbus:
DM
.Component ←
NIL
,
memAdrs: MemAdrs ← 0,
ram:
ARRAY
MemAdrs
OF
DM
.Word ←
ALL
[
DM
.ZerosWord]
];
nWords:
INT
= 1024;
MemAdrs
:
TYPE
= [0..nWords);
The memory procedures
Create
:
PUBLIC
PROC
[mbus:
DM
.Component]
RETURNS
[memory:
DM
.Component];
END
.