From 2bdb3fbdcd2c593c9a8745a85a78ab8caa16d092 Mon Sep 17 00:00:00 2001
From: Dave Abrahams <dave@boostpro.com>
Date: Sun, 5 Jan 2003 15:51:20 +0000
Subject: [PATCH] Allow special <test-info> feature for augmented --dump-tests
 functionality

[SVN r16753]
---
 testing.jam    | 8 +++++++-
 v1/testing.jam | 8 +++++++-
 2 files changed, 14 insertions(+), 2 deletions(-)

diff --git a/testing.jam b/testing.jam
index 3269805c7..255865485 100755
--- a/testing.jam
+++ b/testing.jam
@@ -58,7 +58,13 @@ rule boost-test ( sources + : target-type : requirements * : test-name ? )
                     ] ;
                 }
 
-                ECHO "(boost-test" \"$(test-name)\" ":" \"$(source-files)\" ")" ;
+                # Extract values of the <test-info> feature
+                local dump-test-info = [ get-values <test-info> : $(requirements) ] ;
+                
+                # Format them into a single string of quoted strings
+                dump-test-info = \"$(dump-test-info:J=\"\ \")\" ;
+                
+                ECHO "(boost-test" \"$(test-name)\" [$(dump-test-info)]  ":" \"$(source-files)\" ")" ;
             }
 
         }
diff --git a/v1/testing.jam b/v1/testing.jam
index 3269805c7..255865485 100755
--- a/v1/testing.jam
+++ b/v1/testing.jam
@@ -58,7 +58,13 @@ rule boost-test ( sources + : target-type : requirements * : test-name ? )
                     ] ;
                 }
 
-                ECHO "(boost-test" \"$(test-name)\" ":" \"$(source-files)\" ")" ;
+                # Extract values of the <test-info> feature
+                local dump-test-info = [ get-values <test-info> : $(requirements) ] ;
+                
+                # Format them into a single string of quoted strings
+                dump-test-info = \"$(dump-test-info:J=\"\ \")\" ;
+                
+                ECHO "(boost-test" \"$(test-name)\" [$(dump-test-info)]  ":" \"$(source-files)\" ")" ;
             }
 
         }