TrickleCharge411.cr
Tim Diebert: September 15, 1989 9:58:59 am PDT
Copyright Ó 1989, 1992 by Xerox Corporation. All rights reserved.
TrickleCharge: PROGRAM 9813 VERSION 411 = BEGIN
DEPENDS UPON
BulkData (0) VERSION 1;
Types
Remote procedures
EnumerateForInfo: PROCEDURE [pattern: STRING, info: BulkData.Sink]
REPORTS [Error] = 1;
FileInfo: PROCEDURE [name: STRING, wantedCreatedTime: LONG INTEGER]
RETURNS [fullFName: STRING, bytes: LONG INTEGER, created: LONG INTEGER]
REPORTS [Error, FileNotFound] = 2;
Retrieve: PROCEDURE [name: STRING, wantedCreatedTime: LONG INTEGER,
data: BulkData.Sink]
REPORTS [Error, FileNotFound] = 3;
AnyBodyHome: PROCEDURE [] RETURNS [mayBe: INTEGER]
REPORTS [Error] = 4;
Remote errors
Error: ERROR [description: STRING] = 5;
FileNotFound: ERROR [file: STRING] = 6;
END.