1 /* BEGIN INCLUDE FILE ... mlsys_delete_mailbox.incl.pl1 */ 2 /* Created: June 1983 by G. Palter */ 3 4 /* Options for the mlsys_utils_$delete_mailbox entrypoint */ 5 6 dcl 1 delete_mailbox_options aligned based (delete_mailbox_options_ptr), 7 2 version character (8) unaligned, 8 2 flags, 9 3 force bit (1) unaligned, /* ON => delete the mailbox without asking permission */ 10 3 query bit (1) unaligned, /* ON => do not delete protected mailboxes unless the user 11 says it's OK (not in the forseeable future) */ 12 3 chase bit (1) unaligned, /* ON => chase links if given pathname is a link */ 13 3 mbz bit (33) unaligned; /* must be set to ""b by the caller */ 14 15 dcl DELETE_MAILBOX_OPTIONS_VERSION_1 character (8) static options (constant) initial ("mlsdmbx1"); 16 17 dcl delete_mailbox_options_ptr pointer; 18 19 /* END INCLUDE FILE ... mlsys_delete_mailbox.incl.pl1 */