1#!/bin/sh
2# copy originals of some files into the designated directory
3
4files='tcl.decls tclDecls.h tclIO.c tclStubInit.c tclStubs.c'
5
6for f in $files
7do
8	cp $f $1/$f.orig
9done
10exit
11
12