DIRECTORY BasicTime USING [GMT, nullGMT, Unpacked]; Time: DEFINITIONS = BEGIN Packed: TYPE = BasicTime.GMT; Unpacked: TYPE = BasicTime.Unpacked; defaultTime: Packed = BasicTime.nullGMT; Current: PROCEDURE RETURNS [time: Packed]; Unpack: PROCEDURE [time: Packed _ defaultTime] RETURNS [unpacked: Unpacked]; Invalid: ERROR; Pack: PROCEDURE [unpacked: Unpacked] RETURNS [time: Packed]; Append: PROCEDURE [s: LONG STRING, unpacked: Unpacked, zone: BOOLEAN _ FALSE]; AppendCurrent: PROCEDURE [s: LONG STRING, zone: BOOLEAN _ FALSE]; END. NTime.mesa Cedar PilotBridge version last edited by: Smokey 12-Jul-81 15:59:12 McJones August 5, 1980 2:31 PM Loretta 17-Sep-82 13:23:04 Johnsson 1-Jul-83 12:05:25 Marzullo 1-Jul-83 11:20:57 Plass September 4, 1984 1:05:09 pm PDT Copyright (C) Xerox Corporation 1982. All rights reserved. N.B.: Not the same format as Pilot. ÊH˜Jšœ ™ J™Jšœ™Jšœ™Jšœ™Jšœ™Jšœ™Jšœ™J™&J˜Jšœ:™:J˜šÏk œ œœ˜3J˜—šœ œ˜Jš˜J˜šœœ œ˜J™#—J˜šœ œ˜$J˜—šœ(˜(J˜—JšÏnœ œœ˜*Jšžœ œœ˜LJšœ œ˜Jšžœ œœ˜