anchor.diff:  	 check_timer/1,
   
   	 read/1,
  -	 read_files/1
  +	 read_files/1,
  +
  +         fd_leak_check/1
   	]).
   
   
  
positive.code:      check_sec_model2,
       check_sec_level,
       check_timer, 
       read, read_files
      ].
  
  groups() -> 
  
negative.code:                 _ ->
                      {skip, "Not proc fd"}
              end;
          {unix, solaris} ->
              ?IPRINT("init_per_testcase -> solaris: check pfiles"),
              case os:cmd("type pfiles") of
                  [] ->
                      {skip, "pfiles not found"};
                  _ ->
                      [{num_open_fd, fun num_open_fd_using_pfiles/0} |
                       Config]
              end;
          {unix, BSD} when (BSD =:= freebsd) orelse (BSD =:= openbsd) ->
              ?IPRINT("init_per_testcase -> ~w: check fstat", [BSD]),
              case os:cmd("which fstat") of
                  [] ->
                      {skip, "fstat not found"};
                  _ ->
                      [{num_open_fd, fun num_open_fd_using_fstat/0} |
                       Config]
              end;
          {win32, _} ->
              ?IPRINT("init_per_testcase -> windows: no check"),
              {skip, "Not implemented"};
          _ ->
              ?IPRINT("init_per_testcase -> no check"),
              {skip, "Not implemented"}
      end;
  init_per_testcase(_Case, Config) when is_list(Config) ->
  