packages/std/bbs/boxes/bbPrependPackageDataPath.bbs

   1 load std
   2
   3 # --- Black Box Description ---
   4 define PrependPackageDataPath std
   5   author "laurent.guigues at creatis.insa-lyon.fr"
   6   description "Prepends the input file name 'In' with the path to the data directory of the package 'Package'"
   7   category "misc"
   8 # ---                       ---
   9
  10   # For getting bbtk Data Path
  11   new Configuration c
  12
  13   # For making a full path name, avoiding troubles with / or \
  14   new MakeFileName mfn1
  15   new MakeFileName mfn2
  16
  17   connect c.DataPath mfn1.Directory
  18   connect mfn1.Out   mfn2.Directory
  19
  20 # --- inputs / outputs ---
  21   input  In        mfn2.File "Last Filename"
  22   input  Package   mfn1.File "Package name"
  23   output Out       mfn2.Out  "Full path Filename"
  24 # ---                  ---
  25 endefine
  26