<> <> <> <> DIRECTORY AlpineEnvironment USING[OwnerName, OwnerPropertyValuePair, PageCount]; AccessControlLight: CEDAR DEFINITIONS = BEGIN ApplyMinsDefaultsAndFilterRequestedWriteProperties: PROCEDURE[ownerProperties: LIST OF AlpineEnvironment.OwnerPropertyValuePair, ownerName: AlpineEnvironment.OwnerName, supplyDefaults: BOOLEAN] RETURNS[quotaPresent: BOOLEAN, quota: AlpineEnvironment.PageCount, newOwnerProperties: LIST OF AlpineEnvironment.OwnerPropertyValuePair]; <> SetAccessControlLightInitialized: PROCEDURE[alpineWheels: AlpineEnvironment.OwnerName]; <> END. Edit Log Initial: Kolling: 30-Nov-81 13:13:12: defs file private to AccessControl; exported by AccessControlLight. Hauser: March 7, 1985: Nodified, added copyright.