Expunge revision histories in files.
[u/mdw/catacomb] / gengctab
index 3211b42..9c8c17b 100755 (executable)
--- a/gengctab
+++ b/gengctab
@@ -17,7 +17,8 @@ cat <<EOF
 
 EOF
 for i in $list; do
 
 EOF
 for i in $list; do
-  echo "#include \"$i.h\""
+  name=`echo $i | sed 's/=.*$//'`
+  echo "#include \"$name.h\""
 done
 
 cat <<EOF
 done
 
 cat <<EOF
@@ -25,7 +26,7 @@ cat <<EOF
 const $type *const ${include}tab[] = {
 EOF
 for i in $list; do
 const $type *const ${include}tab[] = {
 EOF
 for i in $list; do
-  c=`echo $i | sed 's/[^A-Za-z0-9_][^A-Za-z0-9_]*/_/g'`
+  c=`echo $i | sed 's/^.*=//; s/[^A-Za-z0-9_][^A-Za-z0-9_]*/_/g'`
   echo "  &$c,"
 done
 cat <<EOF
   echo "  &$c,"
 done
 cat <<EOF