anchor.diff:  
       io:format(CtLogFd,int_header(),[log_timestamp(now()),"Test Nodes\n"]),
       io:format(CtLogFd,"~s\n",[NodeStr]),
  -    io:format(CtLogFd,int_footer()++"\n",[]),
  +    io:put_chars(CtLogFd,[int_footer(),"\n"]),
   
       NodeDirIxFd = open_nodedir_index(RunDirAbs,Time),
       Parent ! {started,self(),{Time,RunDirAbs}},
  
positive.code:     ok.
  
  close_nodedir_index(Fd) ->
      io:format(Fd,index_footer(),[]),
      file:close(Fd).
  
  nodedir_index_header(StartTime) ->
  
negative.code: open_nodedir_index(Dir,StartTime) ->
      FullName = filename:join(Dir,?nodedir_index_name),
      {ok,Fd} = file:open(FullName,[write]),
      io:put_chars(Fd,nodedir_index_header(StartTime)),
      Fd.
  
  print_nodedir(Node,RunDir,Fd) ->
  