anchor.diff:  begin
     writeln('host :: tobyOnLoad called');
     Form1.Memo2.Lines.Add('host :: tobyOnLoad called');
  -  toby.run(PAnsiChar('setInterval(function(){toby.hostCall("dory", num++);},1000);'));
  +
  +  // dummy loop
  +  toby.run(PAnsiChar('setInterval(function(){},1000);'));
     toby.run(PAnsiChar('console.log("node :: hi~");'));
   end;
   procedure tobyOnUnload(isolate: Pointer; exitCode: Integer); cdecl;
  
positive.code: 
  procedure TForm1.Button1Click(Sender: TObject);
  begin
    toby.start(PAnsiChar('toby'), PAnsiChar(Memo1.Text));
  end;
  
  procedure TForm1.Button2Click(Sender: TObject);
  
negative.code: 
  procedure TForm1.FormCreate(Sender: TObject);
  begin
    // start Toby
    toby := TToby.Create;
    toby.onLoad := @tobyOnLoad;
  