Libguestfs - Nov 2016 - [PATCH] Add hppa, hppa64, ppc64el architectures

---
 src/kernel.ml | 2 ++
 src/utils.ml  | 2 ++
 2 files changed, 4 insertions(+)

diff --git a/src/kernel.ml b/src/kernel.ml
index 356ac4b..9b0e8a2 100644
--- a/src/kernel.ml
+++ b/src/kernel.ml
@@ -30,6 +30,8 @@ let patt_of_cpu host_cpu      | "ppc" |
"powerpc" | "powerpc64" -> ["ppc";
"powerpc"; "powerpc64"]
     | "sparc" | "sparc64" -> ["sparc";
"sparc64"]
     | "amd64" | "x86_64" -> ["amd64";
"x86_64"]
+    | "parisc" | "parisc64" -> ["hppa";
"hppa64"]
+    | "ppc64el" -> ["powerpc64le"]
     | _ when host_cpu.[0] = 'i' && host_cpu.[2] = '8'
&& host_cpu.[3] = '6' -> ["?86"]
     | _ when String.length host_cpu >= 5 && String.sub host_cpu 0 5
= "armv7" ->  ["armmp"]
     | _ -> [host_cpu]
diff --git a/src/utils.ml b/src/utils.ml
index 4223be4..e3b8742 100644
--- a/src/utils.ml
+++ b/src/utils.ml
@@ -183,6 +183,8 @@ let compare_architecture a1 a2      | a when string_prefix
"armv6" a -> 32
     | a when string_prefix "armv7" a -> 32
     | a when string_prefix "armv8" a -> 64
+    | "hppa" | "parisc" -> 32
+    | "hppa64" | "parisc64" -> 64
     | "ppc" | "ppc32" -> 32
     | a when string_prefix "ppc64" a -> 64
     | "sparc" | "sparc32" -> 32
-- 
2.10.2

On Fri, Nov 11, 2016 at 10:50:28AM +0100, Hilko Bengen
wrote:
> ---
>  src/kernel.ml | 2 ++
>  src/utils.ml  | 2 ++
>  2 files changed, 4 insertions(+)
> 
> diff --git a/src/kernel.ml b/src/kernel.ml
> index 356ac4b..9b0e8a2 100644
> --- a/src/kernel.ml
> +++ b/src/kernel.ml
> @@ -30,6 +30,8 @@ let patt_of_cpu host_cpu >      | "ppc" |
"powerpc" | "powerpc64" -> ["ppc";
"powerpc"; "powerpc64"]
>      | "sparc" | "sparc64" -> ["sparc";
"sparc64"]
>      | "amd64" | "x86_64" -> ["amd64";
"x86_64"]
> +    | "parisc" | "parisc64" -> ["hppa";
"hppa64"]
> +    | "ppc64el" -> ["powerpc64le"]
>      | _ when host_cpu.[0] = 'i' && host_cpu.[2] =
'8' && host_cpu.[3] = '6' -> ["?86"]
>      | _ when String.length host_cpu >= 5 && String.sub host_cpu
0 5 = "armv7" ->  ["armmp"]
>      | _ -> [host_cpu]
> diff --git a/src/utils.ml b/src/utils.ml
> index 4223be4..e3b8742 100644
> --- a/src/utils.ml
> +++ b/src/utils.ml
> @@ -183,6 +183,8 @@ let compare_architecture a1 a2 >      | a when
string_prefix "armv6" a -> 32
>      | a when string_prefix "armv7" a -> 32
>      | a when string_prefix "armv8" a -> 64
> +    | "hppa" | "parisc" -> 32
> +    | "hppa64" | "parisc64" -> 64
>      | "ppc" | "ppc32" -> 32
>      | a when string_prefix "ppc64" a -> 64
>      | "sparc" | "sparc32" -> 32
Thanks, I have pushed both patches.

Rich.

-- 
Richard Jones, Virtualization Group, Red Hat http://people.redhat.com/~rjones
Read my programming and virtualization blog: http://rwmj.wordpress.com
Fedora Windows cross-compiler. Compile Windows programs, test, and
build Windows installers. Over 100 libraries supported.
http://fedoraproject.org/wiki/MinGW