コード例 #1
0
ファイル: hyper.c プロジェクト: lamby/pkg-swi-prolog
static status
initialiseHyper(Hyper h, Any from, Any to, Name fname, Name bname)
{ Any av[2];

  initialiseProgramObject(h);

  if ( isDefault(fname) )
    fname = NAME_hypered;
  if ( isDefault(bname) )
    bname = fname;

  assign(h, from, from);
  assign(h, to, to);
  assign(h, forward_name, fname);
  assign(h, backward_name, bname);

  av[0] = h;
  av[1] = to;

  TRY(sendv(from,  NAME_attachHyper, 2, av));
  av[1] = from;
  return sendv(to, NAME_attachHyper, 2, av);
}
コード例 #2
0
ファイル: Requestor.cpp プロジェクト: fast01/winner
	bool Requestor::send(const char* data, const int64_t data_len){
		const MEMORY_SLICE slice { const_cast< char* >(data), data_len };
		return sendv(&slice, 1);
	}