DFLogImpl.mesa
last edited by Levin on October 4, 1983 10:36 am
DIRECTORY
DFToolInternal USING [],
IO USING [STREAM],
Rope USING [ROPE];
DFLogImpl:
CEDAR
PROGRAM
EXPORTS DFToolInternal =
BEGIN
OPEN Tool: DFToolInternal;
ROPE: TYPE = Rope.ROPE;
User profile fields:
DFTool.MaxLogBytes: <maximum length of long-term log before wraparound>
AcquireLog:
PUBLIC
PROC
RETURNS [
IO.
STREAM] = {
RETURN[NIL]
};
ReleaseLog:
PUBLIC
PROC [log:
IO.
STREAM] = {
IF log ~= NIL THEN ERROR;
};
END.