# HG changeset patch
# User Mychaela Falconia <falcon@freecalypso.org>
# Date 1531692847 0
# Node ID 889745bf8615a0b163adf53ee6c632e2b1fbda9f
# Parent  294b440431feed67501d5d42d6d2f5e462e9cd5e
scripts/mk-component.sh: no more str2ind

diff -r 294b440431fe -r 889745bf8615 scripts/mk-component.sh
--- a/scripts/mk-component.sh	Sun Jul 15 22:08:52 2018 +0000
+++ b/scripts/mk-component.sh	Sun Jul 15 22:14:07 2018 +0000
@@ -65,10 +65,10 @@
 	OBJS="$OBJS $objname"
 }
 
-cfile_plain() {
+c_file() {
 	if [ $# != 1 ]
 	then
-		echo "Error: cfile_plain takes 1 argument" 1>&2
+		echo "Error: c_file takes 1 argument" 1>&2
 		exit 1
 	fi
 	objname=`basename "$1" .c`.obj
@@ -92,50 +92,6 @@
 	OBJS="$OBJS $objname"
 }
 
-cfile_str2ind() {
-	if [ $# != 1 ]
-	then
-		echo "Error: cfile_str2ind takes 1 argument" 1>&2
-		exit 1
-	fi
-	if [ "$USE_STR2IND" = 1 ]
-	then
-		objname=`basename "$1" .c`.obj
-		pp_name=`echo $1 | sed -e 's/\.c$/.pp/' | tr A-Z a-z`
-		pp__name=`echo $1 | sed -e 's/\.c$/.pp_/' | tr A-Z a-z`
-		helpers/makeline dep $objname "$1" \
-			>> $BUILD_DIR/$LIBNAME/Makefile
-		case "$objname" in
-			*[A-Z]*)
-				helpers/makeline cmd rm -f '$@' \
-					>> $BUILD_DIR/$LIBNAME/Makefile
-				;;
-		esac
-		helpers/makeline cmd ../../toolwrap/cl470 -q -po -p? -x \
-			${CPPFLAGS} "$1" >> $BUILD_DIR/$LIBNAME/Makefile
-		helpers/makeline cmd ../../toolwrap/str2ind -a \
-			-t ../str2ind.tab -l ../str2ind.log \
-			-f "$pp_name" >> $BUILD_DIR/$LIBNAME/Makefile
-		helpers/makeline cmd ../../toolwrap/cl470 -q -c ${CFLAGS} \
-			"$pp__name" >> $BUILD_DIR/$LIBNAME/Makefile
-		helpers/makeline cmd @rm -f "$pp_name" \
-			>> $BUILD_DIR/$LIBNAME/Makefile
-		helpers/makeline cmd @rm -f "$pp__name" \
-			>> $BUILD_DIR/$LIBNAME/Makefile
-		case "$objname" in
-			*[A-Z]*)
-				objname_lc=`echo $objname | tr A-Z a-z`
-				helpers/makeline cmd mv $objname_lc $objname \
-					>> $BUILD_DIR/$LIBNAME/Makefile
-				;;
-		esac
-		echo >> $BUILD_DIR/$LIBNAME/Makefile
-		OBJS="$OBJS $objname"
-	else
-		cfile_plain "$1"
-	fi
-}
-
 # invoke the recipe
 
 SRC=../../src