From 78afa937314431a90b1fd34c145fe7dfe799c0d4 Mon Sep 17 00:00:00 2001
From: Rickard Green <rickard@erlang.org>
Date: Mon, 30 May 2016 18:53:31 +0200
Subject: Update TS platform_id with off-heap msgq

---
 lib/common_test/test_server/ts_install.erl | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

(limited to 'lib/common_test')

diff --git a/lib/common_test/test_server/ts_install.erl b/lib/common_test/test_server/ts_install.erl
index b906eb21f5..5734bd0787 100644
--- a/lib/common_test/test_server/ts_install.erl
+++ b/lib/common_test/test_server/ts_install.erl
@@ -332,11 +332,12 @@ platform(Vars) ->
     LC = lock_checking(),
     MT = modified_timing(),
     AsyncThreads = async_threads(),
+    OffHeapMsgQ = off_heap_msgq(),
     Debug = debug(),
     CpuBits = word_size(),
     Common = lists:concat([Hostname,"/",OsType,"/",CpuType,CpuBits,LinuxDist,
 			   Schedulers,BindType,KP,IOTHR,LC,MT,AsyncThreads,
-			   Debug,ExtraLabel]),
+			   OffHeapMsgQ,Debug,ExtraLabel]),
     PlatformId = lists:concat([ErlType, " ", Version, Common]),
     PlatformLabel = ErlType ++ Common,
     PlatformFilename = platform_as_filename(PlatformId),
@@ -400,6 +401,12 @@ async_threads() ->
 	_ -> ""
     end.
 
+off_heap_msgq() ->
+    case catch erlang:system_info(message_queue_data) of
+	off_heap -> "/OffHeapMsgQ";
+	_ -> ""
+    end.
+
 schedulers() ->
     case catch erlang:system_info(smp_support) of
 	true ->
-- 
cgit v1.2.3