anchor.diff:  -spec free(Path :: string()) -> {ok, integer()} | {error, term()}.
   free(Path) ->
       case statfs(Path) of
  -	{ok, #statfs{bsize=Bsize, bfree=Bfree}} ->
  -	    {ok, Bsize*Bfree};
  +	{ok, #statfs{frsize=Frsize, bfree=Bfree}} ->
  +	    {ok, Frsize*Bfree};
   	{error, Err} ->
   	    {error, Err}
       end.
  
positive.code: -spec free_pc(Path :: string()) -> {ok, float()} | {error, term()}.
  free_pc(Path) ->
      case statfs(Path) of
  	{ok, #statfs{frsize=Frsize, blocks=Blocks, bsize=Bsize, bfree=Bfree}} ->
  	    Free = (Bsize*Bfree),
  	    case (Blocks*Frsize) of
  		0 ->
  		    {ok, 0.0};
  
negative.code: %% @author Jean Parpaillon <jean.parpaillon@free.fr>
  %% @copyright 2014 Jean Parpaillon.
  %%%
  %%% This file is provided to you under the Apache License,
  %%% Version 2.0 (the "License"); you may not use this file
  %%% except in compliance with the License.  You may obtain
  %%% a copy of the License at
  %%%
  %%%   http://www.apache.org/licenses/LICENSE-2.0
  %%%
  %%% Unless required by applicable law or agreed to in writing,
  %%% software distributed under the License is distributed on an
  %%% "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
  %%% KIND, either express or implied.  See the License for the
  %%% specific language governing permissions and limitations
  %%% under the License.
  %%%
  -module(statfs).
  
  -include("statfs.hrl").
  