anchor.diff:  init(_VM) ->
   	ok.
   
  -exports(_VM) ->
  +exports(VM) ->
  +	Node = erlv8_vm:taint(VM, fun new_node/2),
  +	Node:set_value("prototype", prototype_Node()),
  +	erlv8_vm:stor(VM,{?MODULE, ctor_Node}, Node),
    	?V8Obj([{"node", fun node/2},
  +			{"Node", Node},
   			{"ping", erlv8_fun:new(fun ping/2, 
   								   ?V8Obj([{"__doc__", 
   											"<code>ping(nodename)</code>\n\n"
  
positive.code: 												 "the -name command line flag, it will return a fully qualified name."}]))},
  			{"nodes", fun nodes/2}]).
  
  
  node(#erlv8_fun_invocation{},[]) ->
  	node().
  
  
  ping(#erlv8_fun_invocation{},[Node]) when is_list(Node) ->
  	case net_adm:ping(list_to_atom(Node)) of
  		pong ->
  			true;
  		pang ->
  
negative.code: localhost(#erlv8_fun_invocation{}, []) ->
  	net_adm:localhost().
  
  nodes(#erlv8_fun_invocation{ vm = VM },[]) ->
  	NodeCtor = erlv8_vm:retr(VM, {?MODULE, ctor_Node}),
  	?V8Arr(lists:map(fun (Node) ->
  							 NodeObj = NodeCtor:instantiate([atom_to_list(Node)]),
  							 NodeObj:set_prototype(prototype_Node()),
  							 NodeObj
  					 end, nodes())).
  