with Commands;
procedure Answer (User : String := "@"; Session : String := "@") is

-- This command will answer a user that is phoning you
--
-- If the default user is selected, this command will answer any user
-- that is phoning. Otherwise an attempt is made to answer a call from
-- the specified user.
--
-- Currently the session parameter has no effect.
-- All printable characters including Carriage returns are accepted.
-- The Delete or Backspace key will remove the last character typed
-- Control-C will terminate the call whether or not you were the
-- initiator of the call or not
begin
    Commands.Answer (User, Session);
end Answer;