Fix rule to create runtime-check directory. Link rules were broken,

and script can't assume that .bin files exist yet; we must work from
the .scm files and transform the names.

diff --git a/v7/src/etc/create-dirs.sh b/v7/src/etc/create-dirs.sh
index 4253e618b01bbe5cde5eb72bd3d661a98cc15386..44a98af5225f1ec8f671b46ab41413e22f94821f 100755 (executable)
--- a/v7/src/etc/create-dirs.sh
+++ b/v7/src/etc/create-dirs.sh
@@ -1,6 +1,6 @@
 #!/bin/sh
 #
-# $Id: create-dirs.sh,v 1.1 2000/12/07 21:50:08 cph Exp $
+# $Id: create-dirs.sh,v 1.2 2000/12/07 22:12:55 cph Exp $
 #
 # Copyright (c) 2000 Massachusetts Institute of Technology
 #
@@ -20,8 +20,6 @@
 
 # Create build directories and links.
 
-LN_S="ln -s"
-
 maybe_mkdir ()
 {
     if test ! -d ${1}; then
@@ -42,11 +40,12 @@ maybe_link ()
 maybe_mkdir runtime-check
 (
     cd runtime
-    for FN in *.bin runtime.bco runtime.bld; do
-       if test ! -f ../runtime-check/${FN}; then
-           echo "${LN_S} ../runtime/${FN} runtime-check/."
-           ${LN_S} ../runtime/${FN} runtime-check/.
-       fi
+    for FN in *.scm; do
+       FN_BIN="`basename ${FN} .scm`.bin"
+       maybe_link ../runtime-check/${FN_BIN} ../runtime/${FN_BIN}
+    done
+    for FN in runtime.bco runtime.bld; do
+       maybe_link ../runtime-check/${FN} ../runtime/${FN}
     done
 )