ceph/src/boost/tools/build/test/project-test4/jamroot.jam

   1 # Copyright 2002, 2003, 2005 Vladimir Prus
   2 # Distributed under the Boost Software License, Version 1.0.
   3 # (See accompanying file LICENSE_1_0.txt or http://www.boost.org/LICENSE_1_0.txt)
   4
   5 import os ;
   6 import gcc ;
   7 import property ;
   8
   9 rule properties-as-path ( properties * )
  10 {
  11     local r ;
  12     for local p in $(properties)
  13     {
  14             if $(p:G) != <action>
  15             {
  16                 r += $(p) ;
  17             }
  18     }
  19     return [ property.as-path
  20         [ property.remove incidental : $(r) ] ] ;
  21 }
  22
  23
  24 rule yfc-compile ( target : sources * : property-set * )
  25 {
  26     PROPERTIES on $(target) = [ properties-as-path $(property-set) ] ;
  27 }
  28
  29 actions yfc-compile
  30 {
  31     echo $(PROPERTIES) > $(<)
  32     echo $(>) >> $(<)
  33 }
  34
  35 rule yfc-link ( target : sources * : property-set * )
  36 {
  37     PROPERTIES on $(target) = [ properties-as-path $(property-set) ] ;
  38 }
  39
  40 actions yfc-link
  41 {
  42     echo $(PROPERTIES) > $(<)
  43     echo $(>) >> $(<)
  44 }
  45
  46 if [ os.name ] = VMS
  47 {
  48     actions yfc-compile
  49     {
  50         PIPE WRITE SYS$OUTPUT "$(PROPERTIES)" | TYPE SYS$INPUT /OUT=$(<:W)
  51         PIPE WRITE SYS$OUTPUT "$(>:J= ",")" | APPEND /NEW SYS$INPUT $(<:W)
  52     }
  53
  54     actions yfc-link
  55     {
  56         PIPE WRITE SYS$OUTPUT "$(PROPERTIES)" | TYPE SYS$INPUT /OUT=$(<:W)
  57         OPEN /APPEND FOUT $(<:W)
  58         WRITE FOUT "$(>:J= ",")"
  59         CLOSE FOUT
  60     }
  61 }
  62
  63 IMPORT $(__name__) : yfc-compile yfc-link : : yfc-compile yfc-link ;