anchor.diff:          _:_:_ -> "-"
       end.
   
  -    
  +
   linux_info_lookup(Key, File) ->
       try [string:trim(S) || S <- string:tokens(os:cmd("grep " ++ "\"" ++ Key ++ "\"" ++ " " ++ File), [$:,$\n])] of
  -        [Key, Value | _] ->
  -            Value;
  -        _ ->
  -            "-"
  +        Info ->
  +            %% io:format("linux_info_lookup -> "
  +            %%           "~n   Key:  ~p"
  +            %%           "~n   File: ~p"
  +            %%           "~n=> "
  +            %%           "~n   ~p"
  +            %%           "~n", [Key, File, Info]),
  +            linux_info_lookup_collect(Key, Info, [])
       catch
           _:_:_ ->
               "-"
       end.
  -    
  +
  +linux_info_lookup_collect(_Key, [], Values) ->
  +    lists:reverse(Values);
  +linux_info_lookup_collect(Key, [Key, Value|Rest], Values) ->
  +    linux_info_lookup_collect(Key, Rest, [Value|Values]);
  +linux_info_lookup_collect(_, _, Values) ->
  +    lists:reverse(Values).
  +
   
   
   %% ----------------------------------------------------------------
  
positive.code: 
  linux_which_cpuinfo(wind_river) ->
      CPU =
          case linux_cpuinfo_lookup("model") of
              "-" ->
                  throw(noinfo);
              Model ->
                  case linux_cpuinfo_lookup("platform") of
                      "-" ->
                          Model;
                      Platform ->
                          Model ++ " (" ++ Platform ++ ")"
                  end
          end,
      case linux_cpuinfo_lookup("total bogomips") of
          "-" ->
              {ok, CPU};
          BMips ->
  
negative.code:             {ok, {CPU, BogoMIPS}} ->
                  io:format("CPU: "
                            "~n   Model:    ~s"
                            "~n   BogoMIPS: ~w"
                            "~n", [CPU, BogoMIPS]),
                  if
                      (BogoMIPS > 20000) ->
                          1;
                      (BogoMIPS > 10000) ->
                          2;
                      (BogoMIPS > 5000) ->
                          3;
                      (BogoMIPS > 2000) ->
                          5;
                      (BogoMIPS > 1000) ->
                          8;
                      true ->
                          10
                  end;
              {ok, CPU} ->
                  io:format("CPU: "
  