Ticket #13472: Portfile-guile16.diff

File Portfile-guile16.diff, 1.6 KB (added by macosforge.lbn@…, 17 years ago)
  • Portfile

    old new  
    1 # $Id$
     1# $Id: Portfile 31677 2007-12-02 23:13:39Z ryandesign@macports.org $
    22
    33PortSystem      1.0
    44
     
    9595
    9696                  reinplace "s|-lguile |-lguile16 |g" ${destroot}${prefix}/bin/guile16-config
    9797                  reinplace "s|${prefix}/bin/guile|${prefix}/bin/guile16|g" ${destroot}${prefix}/bin/guile16-config
    98                 }
     98                  reinplace "s|libguile\.|libguile16\.|g" ${destroot}${prefix}/lib/libguile16.la
     99                  reinplace "s|libguile.la|libguile16.la|g" ${destroot}${prefix}/lib/libguilereadline-v-12.la
     100
     101                  #
     102                  # Code to process the header files and modify their contents to point to guile16 files
     103                  #
     104                  proc process_dir { src_dir } {
     105                     foreach src_file [ glob [ file join $src_dir * ] ] {
     106                        if { [ file isdirectory $src_file ] } {
     107                           process_dir $src_file
     108                        } else {
     109                           process_file $src_file
     110                        }
     111                     }
     112                  }
     113
     114                  proc process_file { src_file } {
     115                     reinplace "s|\\<guile\\/|\<guile16\\/|g"    $src_file
     116                     reinplace "s|libguile\\.h|libguile16\\.h|g" $src_file
     117                     reinplace "s|libguile/|libguile16/|g"       $src_file
     118                  }
     119
     120                  proc process_path { src_path } {
     121                     if { [ file isdirectory $src_path ] } {
     122                        process_dir $src_path
     123                     } else {
     124                        process_file $src_path
     125                     }
     126                  }
     127
     128                  process_path ${destroot}${prefix}/include/guile16/
     129                  process_path ${destroot}${prefix}/include/libguile16/
     130                  process_path ${destroot}${prefix}/include/libguile16.h
     131                  process_path ${destroot}${prefix}/include/guile-readline/readline.h
     132        }