idontknow

This commit is contained in:
norayr 2017-04-15 00:37:20 +04:00
parent 18e5461ccf
commit 62d62e59d7
2 changed files with 2 additions and 0 deletions

View file

@ -241,6 +241,7 @@ VAR
BEGIN
formJoinLine(str, inst.channelList^[0]);
b := Send(inst, str);
(*b := Internet.Write(inst.connection, str);*)
END Join;
PROCEDURE processResponse(VAR inst: instance; VAR line: ARRAY OF CHAR): BOOLEAN;

View file

@ -32,6 +32,7 @@ BEGIN
IF IRC.Connect(inst) # FALSE THEN
b := IRC.Auth(inst);
IRC.Loop(inst);
END;
END testBot;