<> <> <> <> <> DIRECTORY AlpineEnvironment, AlpineInternal; FileControl: DEFINITIONS = BEGIN <> CommitPhase1: PROCEDURE [trans: AlpineInternal.TransHandle] RETURNS [readOnly: BOOLEAN]; <> <> CommitPhase2: PROCEDURE [trans, newTrans: AlpineInternal.TransHandle]; <> Abort: PROCEDURE [trans: AlpineInternal.TransHandle]; <> <> CallBeforeUpdatePass: PROCEDURE; <> CallAfterUpdatePass: PROCEDURE; <> <> Initialize: PROCEDURE; <> RegisterVolumeGroup: PROCEDURE [volumeGroupID: AlpineEnvironment.VolumeGroupID, volumes: LIST OF AlpineEnvironment.VolumeID]; <> <> END. <> <> <<>>