#
#	this scripts builds the archive for section 1 of the
#	manual into this directory.  It assumes that the .tcs files are
#	in directories /src and /rsx on this disk.
#
ls /src/.tcs | ch "%?*$" "get /src/& t.w; ar xv t.w | find -x .fmt | rm" | sh -v
ls /rsx/.tcs | ch "%?*$" "get /rsx/& t.w; ar xv t.w | find -x .fmt | rm" | sh -v
ls .fmt | ch .fmt | tee temp | ch "%?*$" "format &.fmt >&" | sh -v
ar uv sect1 <temp - | ch "%?*$" "&@n&.fmt" | rm
ar dv sect1 esh d
rm temp t.w
