From 699347d5edd654ccc991d943beee0785be709050 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Lawrence=20Vel=C3=A1zquez?= <larryv@macports.org>
Date: Thu, 1 Dec 2016 16:34:21 -0500
Subject: [PATCH] supported-archs: Print all archs instead of nothing

When a port omits "supported_archs", it is implying that it supports all
architectures. In this case, output an explicit list instead of nothing.
---
 tools/supported-archs.tcl | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/tools/supported-archs.tcl b/tools/supported-archs.tcl
index 8bbdff2..6f76623 100755
--- a/tools/supported-archs.tcl
+++ b/tools/supported-archs.tcl
@@ -57,6 +57,7 @@ if {[info exists portinfo(porturl)]} {
     if {[catch {set mport [mportopen $portinfo(porturl) [list subport $portname] {}]}]} {
         ui_warn "failed to open port: $portname"
     } else {
-        puts [_mportkey $mport supported_archs]
+        set archs [_mportkey $mport supported_archs]
+        puts [expr {$archs ne "" ? $archs : "x86_64 i386 ppc64 ppc"}]
     }
 }