mit-scheme-devel
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: 11.0.90: make tags fails


From: Matt Birkholz
Subject: Re: 11.0.90: make tags fails
Date: Wed, 24 Jun 2020 08:55:14 -0700
User-agent: Evolution 3.36.2-0ubuntu1

On Tue, 2020-06-23 at 23:22 -0700, Chris Hanson wrote:
Thanks Matt.

I should have checked — I tried it on macOS which of course is unlike GNU.

With an Internet army at your back, that's all you need to do (and merge patches :-).

I still like to build in a dirtree of symlinks e.g. created by lndir(1). Even git clean -xf does not get me sparkly clean. There's just nothing like lndiring a fresh build tree. But this ran afoul of find with -type f (in src/etc/Tags.sh) so it would seem I am alone in this.

Y'all just trying to make do with make maintainer-clean?  git clean -xf? git clone --shared?! idiotic (idiosyncratic) maintenance script? Your GUI cc app magics it? Your AI patiently humors you, maintaining a therapeutic illusion that you are still a programmer?

On Jun 23, 2020, 5:19 PM -0700, Matt Birkholz <matt@birchwood-abbey.net>, wrote:
I could not `make tags` on Ubuntu 20.04 because my find(1) doesn't like
"-depth 0". I had to change that to "-maxdepth 0" and move the option
to the front of the line.

A patch follows, in the forlorn hope that it will work on other
planets.

diff --git a/src/Tags.sh b/src/Tags.sh
index a42a1f1db..6ea8ed2f0 100755
--- a/src/Tags.sh
+++ b/src/Tags.sh
@@ -28,7 +28,7 @@

set -e

-EXCLUDED_DIRS=(etc relnotes tools)
+EXCLUDED_DIRS=(etc relnotes tools autom4te.cache)

function excluded_dir ()
{
@@ -44,7 +44,7 @@ function excluded_dir ()
return 1
}

-ALL_SUBDIRS=($(find * -type d -depth 0))
+ALL_SUBDIRS=($(find * -maxdepth 0 -type d))
SUBDIRS=()

for SUBDIR in "${ALL_SUBDIRS[@]}"; do
diff --git a/src/etc/Tags.sh b/src/etc/Tags.sh
index 929f09719..be7f75611 100755
--- a/src/etc/Tags.sh
+++ b/src/etc/Tags.sh
@@ -26,6 +26,6 @@
# Utility to make TAGS file for an MIT/GNU Scheme build directory.
# The working directory must be the build directory.

-rm TAGS
-find * -type f \( -name \*.scm -o -name \*.sld -o -name \*.pkg \)
-depth 0 -print0 \
+rm -f TAGS
+find * -maxdepth 0 \( -name \*.scm -o -name \*.sld -o -name \*.pkg \)
-print0 \
| xargs -0 etags --append --language=scheme



reply via email to

[Prev in Thread] Current Thread [Next in Thread]