From 4e987026148fe65c323afbc93cd560c07bf06b3f Mon Sep 17 00:00:00 2001
From: Yale AI Dept <ai@nebula.cs.yale.edu>
Date: Wed, 14 Jul 1993 13:08:00 -0500
Subject: Import to github.

---
 com/locked | 14 ++++++++++++++
 1 file changed, 14 insertions(+)
 create mode 100755 com/locked

(limited to 'com/locked')

diff --git a/com/locked b/com/locked
new file mode 100755
index 0000000..f98fd19
--- /dev/null
+++ b/com/locked
@@ -0,0 +1,14 @@
+#!/bin/csh
+#
+#
+# identify locked source files
+#
+
+cd $Y2
+foreach i (*/*.scm */*.lisp)
+  if (-e $i:h/RCS/$i:t,v) then
+    foreach j (`rlog -R -L $i:h/RCS/$i:t,v`)
+      ls -l $i
+    end
+  endif
+end
-- 
cgit v1.2.3