TrickleCharge: PROGRAM 9813 VERSION 411 = BEGIN DEPENDS UPON BulkData (0) VERSION 1; 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; Error: ERROR [description: STRING] = 5; FileNotFound: ERROR [file: STRING] = 6; END. ด TrickleCharge411.cr Tim Diebert: September 15, 1989 9:58:59 am PDT Copyright ำ 1989, 1992 by Xerox Corporation. All rights reserved. Types Remote procedures Remote errors สX•NewlineDelimiter –(cedarcode) style™šœ™Icode™.Kšœ ฯeœ7™B—K˜Kšะln œฯkœŸœŸ˜/šŸœŸ˜ Jšœ Ÿœฯl˜—J˜head2™K™—™KšฯnœŸ œ ŸœŸœ ˜WKšกœŸ œŸœŸœŸœŸœ Ÿœ ŸœŸœ ŸœŸœŸœ˜ฎKš กœŸ œŸœŸœŸœŸœ˜{Kš ก œŸ œŸœ ŸœŸœ ˜G—™ KšกœŸœŸœ˜'Kšก œŸœŸœ˜'K˜KšŸœ˜——…—x„