[Guile-commits] 65/437: fix some problems (not all) with lightningize

[Andy Wingo]

wingo pushed a commit to branch lightning
in repository guile.

commit ec2d8b3092ca49a0e955b769bbcc8b43b49d026e
Author: Paolo Bonzini <address@hidden>
Date:   Sun Mar 16 21:13:56 2008 +0100

    fix some problems (not all) with lightningize
    
    2008-03-14  Paolo Bonzini  <address@hidden>
    
        * lightningize.in: Fix some problems (not all).
---
 ChangeLog       |  4 ++++
 lightningize.in | 18 ++++++++++--------
 2 files changed, 14 insertions(+), 8 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index c4e2001..868d0eb 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,9 @@
 2008-03-14  Paolo Bonzini  <address@hidden>
 
+       * lightningize.in: Fix some problems (not all).
+
+2008-03-14  Paolo Bonzini  <address@hidden>
+
        * lightning/i386/core-32.h: Avoid some "value computed is not used"
        warnings; reported by Sam Steingold.
 
diff --git a/lightningize.in b/lightningize.in
index 830b103..8abff21 100644
--- a/lightningize.in
+++ b/lightningize.in
@@ -32,10 +32,11 @@ address@hidden@
 address@hidden@
 
 # Directory names.
address@hidden@
address@hidden@
address@hidden@
address@hidden@
+prefix="@prefix@"
+datarootdir="@datarootdir@"
+datadir="@datadir@"
+includedir="@includedir@"
+pkgincludedir=$includedir/$PACKAGE
 aclocaldir=${datadir}/aclocal
 
 BACKENDS="@BACKENDS@"
@@ -190,16 +191,17 @@ for i in $file_base_names; do
   files="$files lightning:$pkgincludedir/$i-common.h"
 done
 for j in $BACKENDS; do
-  dir=`expr $j : '\([^:]*\)' `
-  suffix=`expr $j : '.*:\(.*\)' `
+  dir=`echo $j | sed -e 's,:.*,,' `
+  suffix=`echo $j | sed -ne 's,.*:,,p' `
   dirs="$dirs lightning/$dir"
   for i in $file_base_names; do
-    files="$files lightning/$j:$pkgincludedir/$j/$i$suffix.h"
+    files="$files lightning/$dir:$pkgincludedir/$dir/$i$suffix.h"
   done
 done
 
 for dir in $dirs; do
-  if $mkdir $dir; then :
+  if test -d $dir; then :
+  elif $mkdir $dir; then :
   else
     echo "$progname: cannot create \`$dir'" 1>&2
     status=1