view move-if-change @ 26941:8584ef89a2bd

Don't put optimization info on `eql'. (side-effect-free-fns): Add gethash, hash-table-count. (side-effect-and-error-free-fns): Add hash-table-p.
author Dave Love <fx@gnu.org>
date Sat, 18 Dec 1999 17:28:36 +0000
parents 354e0c45cedf
children 14a97ab281d5
line wrap: on
line source

#!/bin/sh
if
test -r $2
then
if
cmp $1 $2 > /dev/null
then
echo $2 is unchanged
rm -f $1
else
mv -f $1 $2
fi
else
mv -f $1 $2
fi