With existing flights these are $r{arch} and GUEST_arch.
Nothing uses these yet.

Signed-off-by: Ian Jackson <ian.jackson@eu.citrix.com>
---
 Osstest/TestSupport.pm | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/Osstest/TestSupport.pm b/Osstest/TestSupport.pm
index 6ab64d56..16c17e37 100644
--- a/Osstest/TestSupport.pm
+++ b/Osstest/TestSupport.pm
@@ -1164,6 +1164,7 @@ sub selecthost ($) {
         NestingLevel => 0,
         Info => [],
     };
+    $ho->{Arch} = target_var($ho, 'arch') or warn "unknown arch for $ident";
     if (defined $job) {
 	$ho->{Suite} = target_var($ho, "suite") // $c{DebianSuite};
 	$ho->{DiVersion} = target_var($ho, "di_version")
@@ -1795,6 +1796,7 @@ sub selectguest ($$) {
 	Host => $ho,
 	Suite => $r{"${gn}_suite"},
     };
+    $ho->{Arch} = target_var($ho, 'arch') or warn "unknown arch for $gn";
     foreach my $opt (guest_var_commalist($gho,'options')) {
         $gho->{Options}{$opt}++;
     }
-- 
2.11.0


_______________________________________________
Xen-devel mailing list
Xen-devel@lists.xenproject.org
https://lists.xenproject.org/mailman/listinfo/xen-devel