# Do a real simple test of the `svms close' command:
rm -rf close_basic
svms new -R close_basic close_basic
echo Hello > close_basic/hello.txt
cd close_basic ; svms create hello.txt
cat close_basic/SVMS/h.hello.txt
H "SVMS_History_File" 1. 0.
N "hello.txt"  "{timestamp}"
V 0. "close_basic"  "{timestamp}" F  "{timestamp}"
L 1.
T "Hello"
D 1. |0:0!1.
C 0.
I 0.
X 0. 0. "File" "close_basic"  "{timestamp}"  "{timestamp}" 0. "Wayne C. Gramlich" F F
cd close_basic ; svms open hello.txt
echo Goodbye > close_basic/hello.txt
cd close_basic ;	svms close -n hello.txt
cat close_basic/SVMS/h.hello.txt
H "SVMS_History_File" 1. 0.
N "hello.txt"  "{timestamp}"
V 0. "close_basic"  "{timestamp}" F  "{timestamp}"
L 1.
T "Hello"
D 1. |0:0!1.
C 0.
I 0.
X 0. 0. "File" "close_basic"  "{timestamp}"  "{timestamp}" 0. "Wayne C. Gramlich" F F
V 1. "close_basic"  "{timestamp}" F  "{timestamp}"
L 1.
T "Goodbye"
D 1. |1:0!1.
C 0.
I 0.
X 1. 1. "File" "close_basic"  "{timestamp}"  "{timestamp}" 1. "Wayne C. Gramlich" T 0. F
cd close_basic ; svms open hello.txt
echo Hello > close_basic/hello.txt
echo Hula > close_basic/hello.txt
echo Goodbye > close_basic/hello.txt
cd close_basic ;	svms close -n hello.txt
cat close_basic/hello.txt
Goodbye
# Capture directory structure:
ls -R close_basic
SVMS
hello.txt

close_basic/SVMS:
h.hello.txt
p.listing
p.project
if [ -w close_basic/hello.txt ] ;			\
    then echo "File is writable (incorrect)" ;	\
    else echo "File is read-only (correct)" ;	\
    fi
File is read-only (correct)
cat close_basic/SVMS/h.hello.txt
H "SVMS_History_File" 1. 0.
N "hello.txt"  "{timestamp}"
V 0. "close_basic"  "{timestamp}" F  "{timestamp}"
L 1.
T "Hello"
D 1. |0:0!1.
C 0.
I 0.
X 0. 0. "File" "close_basic"  "{timestamp}"  "{timestamp}" 0. "Wayne C. Gramlich" F F
V 1. "close_basic"  "{timestamp}" F  "{timestamp}"
L 1.
T "Goodbye"
D 1. |1:0!1.
C 0.
I 0.
X 1. 1. "File" "close_basic"  "{timestamp}"  "{timestamp}" 1. "Wayne C. Gramlich" T 0. F
V 2. "close_basic"  "{timestamp}" F  "{timestamp}"
L 0.
D 1. |1:0!1.
C 0.
I 0.
X 2. 2. "File" "close_basic"  "{timestamp}"  "{timestamp}" 2. "Wayne C. Gramlich" T 1. F
rm -rf close_basic