From b116fbaeba12230fc16becf76f14d7a860b2d9b5 Mon Sep 17 00:00:00 2001
From: Richard Dale <rsd@cray.com>
Date: Fri, 6 Dec 2013 12:55:33 -0600
Subject: [PATCH 1/2] Support shared libraries in cray builds.

---
 src/tools/cray.jam | 28 ++++++++++++++++++----------
 1 file changed, 18 insertions(+), 10 deletions(-)

diff --git a/src/tools/cray.jam b/src/tools/cray.jam
index a37fe23b2..a7d3b51c3 100644
--- a/src/tools/cray.jam
+++ b/src/tools/cray.jam
@@ -1,6 +1,7 @@
 # Copyright 2001 David Abrahams.
 # Copyright 2004, 2005 Markus Schoepflin.
 # Copyright 2011, John Maddock
+# Copyright 2013, Cray, Inc.
 # Distributed under the Boost Software License, Version 1.0.
 # (See accompanying file LICENSE_1_0.txt or http://www.boost.org/LICENSE_1_0.txt)
 
@@ -47,24 +48,31 @@ generators.register-c-compiler cray.compile.c++ : CPP : OBJ : <toolset>cray ;
 generators.register-c-compiler cray.compile.c : C : OBJ : <toolset>cray ;
 
 
-
-# No static linking as far as I can tell.
+# unlike most compliers, Cray defaults to static linking.
 # flags cxx LINKFLAGS <runtime-link>static : -bstatic ;
-flags cray.compile OPTIONS <debug-symbols>on : -Gn ;
-flags cray.link OPTIONS <debug-symbols>on : -Gn ;
+flags cray.compile OPTIONS <debug-symbols>on : -G0 ;
+flags cray.link OPTIONS <debug-symbols>on : -G0 ;
 
 flags cray.compile OPTIONS <optimization>off : -O0 ;
-flags cray.compile OPTIONS <optimization>speed : -O3 ;
+flags cray.compile OPTIONS <optimization>speed : -O2 ;
 flags cray.compile OPTIONS <optimization>space : -O1 ;
 
+# flags cray.compile OPTIONS <inlining>off  : -hipa0 ;
+# flags cray.compile OPTIONS <inlining>on   : ;
+# flags cray.compile OPTIONS <inlining>full : -hipa5 ;
+
 flags cray.compile OPTIONS <cflags> ;
 flags cray.compile.c++ OPTIONS <cxxflags> ;
 flags cray.compile DEFINES <define> ;
 flags cray.compile INCLUDES <include> ;
 flags cray.link OPTIONS <linkflags> ;
 
-flags cray.compile OPTIONS <link>shared : -fPIC ;
-flags cray.link OPTIONS <link>shared : -fPIC ;
+flags cray.compile OPTIONS : -hgnu -fPIC -h system_alloc -h tolerant -h ipa0 ;
+flags cray.compile OPTIONS <link>shared : -dynamic ;
+flags cray.compile OPTIONS <link>static : -static ;
+flags cray.link OPTIONS <link>static : -static ;
+flags cray.link OPTIONS <link>shared : ;
+flags cray.link LOPTIONS <link>shared : -dynamic ;
 
 flags cray.link LIBPATH <library-path> ;
 flags cray.link LIBRARIES <library-file> ;
@@ -73,7 +81,7 @@ flags cray.link FINDLIBS-SA <find-shared-library> ;
 
 actions link bind LIBRARIES
 {
-    $(CONFIG_COMMAND) $(OPTIONS) -o "$(<)" -L$(LIBPATH) "$(>)" "$(LIBRARIES)" -l$(FINDLIBS-ST) -l$(FINDLIBS-SA)
+    $(CONFIG_COMMAND) $(OPTIONS) $(LOPTIONS) -o "$(<)" -L$(LIBPATH) "$(>)" "$(LIBRARIES)" -l$(FINDLIBS-ST) -l$(FINDLIBS-SA)
 }
 
 # When creating dynamic libraries, we don't want to be warned about unresolved
@@ -83,7 +91,7 @@ actions link bind LIBRARIES
 
 actions link.dll bind LIBRARIES
 {
-    $(CONFIG_COMMAND) -shared $(OPTIONS) -o "$(<[1])" -L$(LIBPATH)  "$(>)" "$(LIBRARIES)" -l$(FINDLIBS-ST) -l$(FINDLIBS-SA)
+    $(CONFIG_COMMAND) -o "$(<[1])" -Wl,-h -Wl,$(<[-1]:D=) -shared -L$(LIBPATH)  "$(>)" "$(LIBRARIES)" -l$(FINDLIBS-ST) -l$(FINDLIBS-SA) $(OPTIONS)
 }
 
 
@@ -103,7 +111,7 @@ actions compile.c
 
 actions compile.c++
 {
-    $(CONFIG_COMMAND) -c -h gnu $(OPTIONS) -D$(DEFINES) -I"$(INCLUDES)" -o "$(<)" "$(>)"
+    $(CONFIG_COMMAND) -c $(OPTIONS) -D$(DEFINES) -I"$(INCLUDES)" -o "$(<)" "$(>)"
 }
 
 # Always create archive from scratch. See the gcc toolet for rationale.

From 5ce453de47ba732f5a88236f302370d7bbafce18 Mon Sep 17 00:00:00 2001
From: Kohei Takahashi <flast@flast.jp>
Date: Thu, 9 Aug 2012 14:41:07 +0900
Subject: [PATCH 2/2] Fix c-scanner regex pattern

---
 src/tools/types/cpp.jam | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/tools/types/cpp.jam b/src/tools/types/cpp.jam
index 29d8faaa8..846ba5356 100644
--- a/src/tools/types/cpp.jam
+++ b/src/tools/types/cpp.jam
@@ -30,7 +30,7 @@ class c-scanner : scanner
 
     rule pattern ( )
     {
-        return "#[ \t]*include[ ]*(<(.*)>|\"(.*)\")" ;
+        return "#[ \t]*include[ \t]*(<(.*)>|\"(.*)\")" ;
     }
 
     rule process ( target : matches * : binding )