On Tue, Mar 11, 2014 at 04:59:19PM +0100, Pino Toscano wrote:
> +let arch_is_compatible nativearch otherarch =
> +  let nativearch = filter_arch nativearch in
> +  let otherarch = filter_arch otherarch in
> +  match nativearch, otherarch with
> +  | a, b when a = b -> true
> +  | "x86_64", "i386" -> true
> +  | "ppc64", "ppc" -> true
> +  | "sparc64", "sparc" -> true
> +  | a, b -> false

It's likely that you can add:

  | "aarch64", arch when string_prefix arch "arm" -> true

The aarch64 guys were talking about dropping 32 bit compatibility, but
my prediction is that will never happen.

> -val cache_of_name : string -> string -> int -> string
> +val cache_of_name : string -> string -> string -> int -> string
>  (** [cache_of_name cachedir name revision] returns the filename
                                   ^
                              add arch here

Rest looks fine, ACK.

Rich.

-- 
Richard Jones, Virtualization Group, Red Hat http://people.redhat.com/~rjones
virt-p2v converts physical machines to virtual machines.  Boot with a
live CD or over the network (PXE) and turn machines into KVM guests.
http://libguestfs.org/virt-v2v

_______________________________________________
Libguestfs mailing list
[email protected]
https://www.redhat.com/mailman/listinfo/libguestfs

Reply via email to