cri-getplatforms: Give names to xenarch and suite

No functional change.  This will be useful in a moment.

Signed-off-by: Ian Jackson <iwj@xenproject.org>

diff --git a/cri-getplatforms b/cri-getplatforms
index 2b8cee0ba6e368d3e10d1f9a1bafb203f622c34c..1f206908c004dfb08ac606aa6aa72d93ee2c050f 100755 (executable)
--- a/cri-getplatforms
+++ b/cri-getplatforms
@@ -17,9 +17,11 @@
 # along with this program.  If not, see <http://www.gnu.org/licenses/>.
 
 getplatforms () {
+       local xenarch=$1
+       local suite=$2
         perl -e '
                 use Osstest;
                 csreadconfig();
-                print join " ", $mhostdb->get_arch_platforms("'$blessing'", "'$1'", "'$2'") or die $!;
+                print join " ", $mhostdb->get_arch_platforms("'$blessing'", "'$xenarch'", "'$suite'") or die $!;
         '
 }