From ee0531308b0cc57f0312e1d0676635969d8a8029 Mon Sep 17 00:00:00 2001
From: Sverker Eriksson <sverker@erlang.org>
Date: Fri, 7 Oct 2016 16:55:08 +0200
Subject: kernel: Fix code_SUITE:upgrade for non-hipe

---
 lib/kernel/test/code_SUITE.erl | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

(limited to 'lib/kernel/test/code_SUITE.erl')

diff --git a/lib/kernel/test/code_SUITE.erl b/lib/kernel/test/code_SUITE.erl
index 1be4c364d5..96f8ff2c5f 100644
--- a/lib/kernel/test/code_SUITE.erl
+++ b/lib/kernel/test/code_SUITE.erl
@@ -487,9 +487,10 @@ load_binary(Config) when is_list(Config) ->
 upgrade(Config) ->
     DataDir = proplists:get_value(data_dir, Config),
 
-    T = [beam, hipe],
-    %%T = [beam],
-    %%T = [hipe],
+    T = case erlang:system_info(hipe_architecture) of
+            undefined -> [beam];
+            _ -> [beam,hipe]
+        end,
 
     [upgrade_do(DataDir, Client, T) || Client <- T],
     ok.
-- 
cgit v1.2.3