-- RemotePageTransfer.mesa (last edited by: Redell on: August 18, 1979 6:11 PM)

DIRECTORY

Environment: FROM "Environment" USING [PageNumber],

FilePageTransfer: FROM "FilePageTransfer" USING [Operation, Request],

File: FROM "File" USING [ID, PageNumber],

System: FROM "System" USING [NetworkAddress];

RemotePageTransfer: DEFINITIONS =

BEGIN

PageOp: TYPE = RECORD[

op: FilePageTransfer.Operation,

file: File.ID,

fPage: File.PageNumber,

mPage: Environment.PageNumber];

Suggest: PROCEDURE [sPop: PageOp];

Initiate: PROCEDURE [FilePageTransfer.Request, System.NetworkAddress];

END.

LOG

Time: March 20, 1978 9:16 AMBy: RedellAction: Created file

Time: September 22, 1978 4:08 PMBy: RedellAction: Added ’Suggest’ mechanism to eliminate Alto file bottleneck.

Time: March 1, 1979 10:56 AMBy: RedellAction: Changed name from "Server" to "RemotePageTransfer".