+ if (my ($vendor, $family, $model) = parse_cpuinfo()) {
+ # In x86-64 world, the detection is somewhat easier so far...
+ if ($vendor eq "AuthenticAMD") {
+ $arch = "athlon64";
+ } elsif ($vendor eq "GenuineIntel") {
+ $arch = "nocona";
+ }
+ Log (($arch ne "") ? "(using /proc/cpuinfo) " : "(don't understand /proc/cpuinfo) ");
+ }
+ return $arch ? $arch : "x86-64";