anchor.diff:              "-"
       end.
   
  +linux_cpuinfo_cpu() ->
  +    case linux_cpuinfo_lookup("cpu") of
  +        [Model] ->
  +            Model;
  +        _ ->
  +            "-"
  +    end.
  +
  +linux_cpuinfo_motherboard() ->
  +    case linux_cpuinfo_lookup("motherboard") of
  +        [MB] ->
  +            MB;
  +        _ ->
  +            "-"
  +    end.
  +
   linux_cpuinfo_processor() ->
       case linux_cpuinfo_lookup("Processor") of
           [P] ->
               P;
           _ ->
               "-"
  +    end.
  +
  +linux_cpuinfo_clock() ->
  +    %% This is written as: "3783.000000MHz"
  +    %% So, check unit MHz (handle nothing else).
  +    %% Also, check for both float and integer
  +    case linux_cpuinfo_lookup("clock") of
  +        [C] when is_list(C) ->
  +            case lists:reverse(string:to_lower(C)) of
  +                "zhm" ++ CRev ->
  +                    try trunc(list_to_float(lists:reverse(CRev))) of
  +                        I ->
  +                            I
  +                    catch
  +                        _:_:_ ->
  +                            try list_to_integer(lists:reverse(CRev)) of
  +                                I ->
  +                                    I
  +                            catch
  +                                _:_:_ ->
  +                                    0
  +                            end
  +                    end;
  +                _ ->
  +                    0
  +            end;
  +        _ ->
  +            0
       end.
   
   linux_which_cpuinfo(montavista) ->
  
positive.code: linux_cpuinfo_lookup(Key) when is_list(Key) ->
      linux_info_lookup(Key, "/proc/cpuinfo").
  
  linux_cpuinfo_cpu() ->
      case linux_cpuinfo_lookup("cpu") of
          [Model] ->
              Model;
          _ ->
              "-"
      end.
  
  linux_cpuinfo_motherboard() ->
      case linux_cpuinfo_lookup("motherboard") of
          [MB] ->
              MB;
          _ ->
              "-"
      end.
  
  linux_cpuinfo_bogomips() ->
      case linux_cpuinfo_lookup("bogomips") of
          BMips when is_list(BMips) ->
  
negative.code:                 %% ARM (at least some distros...)
                  case linux_cpuinfo_processor() of
                      "-" ->
                          %% POWER (at least some distros...)
                          case linux_cpuinfo_cpu() of
                              "-" ->
                                  %% Ok, we give up
                                  throw(noinfo);
                              C ->
                                  C
                          end;
                      Proc ->
                          Proc
                  end;
  