-set TMPSTOR = /tmp/tmpstor # Temporary area for user . files
-set USERTAR = /tmp/proto.tar # Tarfile for user . files
-
-# Give ourselves a fresh work area
-rm -rf $USERTAR
-rm -rf $TMPSTOR
-mkdir $TMPSTOR
-if ($status) exit $SMS_PROTO
-
-# Make a tarfile containing the user prototype files for future use.
-(cd /usr/prototype_user;tar cf - .) | (cd $TMPSTOR; tar xpf -)
-(cd $TMPSTOR; tar cf $USERTAR .)
-if ($status) exit $SMS_PROTO
-rm -rf $TMPSTOR