comparison lispref/permute-index @ 41200:c189486396ff

Don't depend on csh-specific features. Replace the interpreter name with /bin/sh.

41199:bdecbfc5cb92

#!/bin/csh -f
# Generate a permuted index of all names.
# The result is a file called index.fns.

# Copyright (C) 2001 Free Software Foundation, Inc.
#

# change {-} to char form, so ptx wont ignore it.
# delete leading \entry {
# change '\ ' to ' '
# change lines with = < > since they mess up field extraction.
# separate into fields delimited by "
cat ${MANUAL}.fn | \
	sed \
	-e 's/(\([^)]*\))/\1/' \
	-e 's/\\dots {}/(\\dots{})/' \
	-e "s/{-}/{{\\tt\\char'055}}/" \

	-e 's,\\ , ,g' \
	-e 's/{\\tt\\char61}/=/' \
	-e 's/{\\tt\\gtr}/>/' \
	-e 's/{\\tt\\less}/</' \
	-e 's/}{/"/g' \
	| awk -F\" '{print $2, $1}' >! permuted.raw

2:
# Build break file for ptx.
cat <<EOF > permuted.break
-
:
EOF
# Build the ignore file for ptx.
# We would like to ignore "and", "or", and "for", 
# but ptx ignores ignore words even if they stand alone.
cat <<EOF > permuted.ignore
the
in
to

from
by
EOF

echo "Make troff permuted index."
ptx -i permuted.ignore -b permuted.break -f -r -w 144 \
	 < permuted.raw >! permuted.t

3:
echo "Extract the desired fields."
awk -F\" '{printf "%s\"%s\"%s\n", $4,$6,$9}' permuted.t >! permuted.fields 

4:
echo "Format for texindex."
# delete lines that start with "and ", "for "
sed 	< permuted.fields \

41200:c189486396ff

#!/bin/sh
# Generate a permuted index of all names.
# The result is a file called index.fns.

# Copyright (C) 2001 Free Software Foundation, Inc.
#

# change {-} to char form, so ptx wont ignore it.
# delete leading \entry {
# change '\ ' to ' '
# change lines with = < > since they mess up field extraction.
# separate into fields delimited by "
rm -f permuted.raw
cat ${MANUAL}.fn | \
	sed \
	-e 's/(\([^)]*\))/\1/' \
	-e 's/\\dots {}/(\\dots{})/' \
	-e "s/{-}/{{\\tt\\char'055}}/" \

	-e 's,\\ , ,g' \
	-e 's/{\\tt\\char61}/=/' \
	-e 's/{\\tt\\gtr}/>/' \
	-e 's/{\\tt\\less}/</' \
	-e 's/}{/"/g' \
	| awk -F\" '{print $2, $1}' > permuted.raw

2:
# Build break file for ptx.
cat <<EOF > permuted.break
-
:
EOF
# Build the ignore file for ptx.
# We would like to ignore "and", "or", and "for",
# but ptx ignores ignore words even if they stand alone.
cat <<EOF > permuted.ignore
the
in
to

from
by
EOF

echo "Make troff permuted index."
rm -f permuted.t
ptx -i permuted.ignore -b permuted.break -f -r -w 144 \
	 < permuted.raw > permuted.t

3:
echo "Extract the desired fields."
rm -f permuted.fields
awk -F\" '{printf "%s\"%s\"%s\n", $4,$6,$9}' permuted.t > permuted.fields

4:
echo "Format for texindex."
# delete lines that start with "and ", "for "
sed 	< permuted.fields \