Warn about .el files that are not compiled.

1 files changed, 17 insertions, 2 deletions

diff --git a/make-dist b/make-dist
index 6b924b1f6b0..67aaffe9d4d 100755
--- a/make-dist
+++ b/make-dist
@@ -144,8 +144,8 @@ them, and try again." >&2
 fi
 
 ### Check for .elc files with no corresponding .el file.
-ls -1 lisp/*.el | sed 's/\.el$/.elc/' > /tmp/el
-ls -1 lisp/*.elc > /tmp/elc
+ls -1 lisp/[a-z]*.el | sed 's/\.el$/.elc/' > /tmp/el
+ls -1 lisp/[a-z]*.elc > /tmp/elc
 bogosities="`comm -13 /tmp/el /tmp/elc`"
 if [ "${bogosities}" != "" ]; then
   echo "The following .elc files have no corresponding .el files:"
@@ -153,6 +153,21 @@ if [ "${bogosities}" != "" ]; then
 fi
 rm -f /tmp/el /tmp/elc
 
+### Check for .el files with no corresponding .elc file.
+(cd lisp; ls -1 [a-z]*.el) > /tmp/el
+(cd lisp; ls -1 [a-z]*.elc) | sed 's/\.elc$/.el/' > /tmp/elc
+losers="`comm -23 /tmp/el /tmp/elc`"
+for file in $losers; do
+  if ! grep -q "dontcompilefiles:.* $file\($\| \)" lisp/Makefile; then
+    bogosities="$file $bogosities"
+  fi
+done
+if [ "${bogosities}" != "" ]; then
+  echo "The following .elc files have no corresponding .el files:"
+  echo "${bogosities}"
+fi
+rm -f /tmp/el /tmp/elc
+
 ### Check for .el files that would overflow the 14-char limit if compiled.
 long=`find lisp -name '[a-zA-Z0-9]??????????*.el' -print`
 if [ "$long" != "" ]; then