# $Copyright:	$
# Copyright (c) 1984, 1985, 1986, 1987, 1988, 1989, 1990 
# Sequent Computer Systems, Inc.   All rights reserved.
#  
# This software is furnished under a license and may be used
# only in accordance with the terms of that license and with the
# inclusion of the above copyright notice.   This software may not
# be provided or otherwise made available to, or used by, any
# other person.  No title to or ownership of the software is
# hereby transferred.
#ident "$Header: edfun 1.3 89/10/10 $@(#)ed:edfun	1.4"

if [ "$1" != "" -a -w "$1" ]
then
ed - $1 > xa <<!
	/^_msgtab/
	/^0/-
	q
!

end=`tail -1 xa`

ed - $1 > /dev/null <<!
	?^\.data?s//.text/
	/^${end}/
	/^L/
	i
.data
.
	w
	q
!
rm -f xa
fi
