#!/bin/sh
set -x
if [ -w $1 ]
   then	echo $1 is writeable
	exit 1
   fi
first=1
for i in `sccs prs -e -d":I:" SCCS/s.$1 | sort -t. +1n +2n`; do
	echo === $i ===
	if [ "$first" = "1" ]
	   then sccs get -k -r$i $1
		svms create $1
		first=0
	   else	svms open $1
		rm $1
		sccs get -k -r$i $1
		chmod +w $1
		svms close -n $1
	   fi
	done
sccs get $1