/
CDC-1.2b/
CDC-1.2b/src/
parent $user
object $guest

var $root child_index 44
var $root owners [$guest, [$sys]]
var $root fertile 0
var $has_commands commands []
var $has_commands shortcuts []
var $has_verbs verbs #[]
var $location contents []
var $located location $nowhere
var $user password "*"
var $user connected_at 0
var $user last_command_at 0
var $user connections []
var $root inited 1
var $root owned [$guest]
var $command_aliases command_aliases []
var $user modes #[]
var $mail_list letters #[]
var $mail_list letters_index #[]
var $mail_list senders 1
var $mail_list readers 1
var $mail_list notify [$guest]
var $mail_list last_letter 0
var $mail_ui subscribed #[[$guest, 791485891]]
var $gendered gender $gender_neuter
var $located obvious 1
var $described prose #[]
var $user prompt ""
var $root manager $guest
var $root writable [$guest]
var $root readable ['parameters, 'methods, 'code]
var $user parsers [$command_parser, $verb_parser]
var $user tell_traceback ['brief, 0]
var $user context #[]
var $root quota 75000
var $root dbref 'guest
var $named name ['uniq, "Generic Guest Object"]
var $named name_aliases []
var $user_data user_data #[['real_name, [1, "???"]], ['email, [1, "???"]]]
var $old_command_environment verb_cache #[]
var $old_command_environment command_cache []
var $old_command_environment shortcuts_cache []
var $help_ui current_node $help_node_summary
var $help_ui last_visited #[['pos, 1], ['nodes, [$help_node_summary]]]
var $mail_list mail []
var $mail_ui current #[['location, 0], ['list, $guest]]

method init_guest
    .perms(caller(), $root);
    .add_filter($wrap_filter);
    .set_title("a guest");
.

method logout
    arg connection;
    
    (| pass(connection) |);
    .destroy();
.

method title_cmd
    arg com, str;
    
    .perms(sender(), 'parser);
    .tell("Guests are not allowed to change their titles.");
.