Method code for $smtp.RCPT_TO()

[Turn on line numbering]
arg c, address;
var lines, code, line;

.set_timeout(c, 120);
c.write("RCPT TO: <" + address + ">");
lines = (> .get_response(c) <);
[code, line] = lines[1];
if (code < 300 && code >= 200)
    return [code, lines.slice(2)];
throw(~error, lines.slice(2).join(), code);

// Created 13-Oct-1996 as a part of ColdCore, see: @help Credit

Tlon