From 0e68e6651e7ad9d8848a39763e33269b994f23b6 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Henrik=20Grubbstr=C3=B6m=20=28Grubba=29?=
 <grubba@grubba.org>
Date: Fri, 4 Feb 2000 17:35:46 +0100
Subject: [PATCH] Now with warnings from dirnode->_indices() et al.

Rev: lib/master.pike.in:1.98
---
 lib/master.pike.in | 15 +++++++++------
 1 file changed, 9 insertions(+), 6 deletions(-)

diff --git a/lib/master.pike.in b/lib/master.pike.in
index d8952eb704..9c59103e5e 100644
--- a/lib/master.pike.in
+++ b/lib/master.pike.in
@@ -1,6 +1,6 @@
 /* -*- Pike -*-
  *	
- * $Id: master.pike.in,v 1.97 2000/02/04 11:27:21 grubba Exp $
+ * $Id: master.pike.in,v 1.98 2000/02/04 16:35:46 grubba Exp $
  * 
  * Master-file for Pike.
  *
@@ -611,18 +611,21 @@ class dirnode
     if( !files )
       files = get_dir(dirname);
     foreach(files, string fname) {
-      catch {
+      mixed err = catch {
 	if (((< ".pike", ".pmod" >)[fname[sizeof(fname)-5..]]) &&
 	    !zero_type(`[](fname[..sizeof(fname)-6]))) {
 	  continue;
-	}
-      };
-      catch {
-	if ((fname[sizeof(fname)-3..] == ".so") &&
+	} else if ((fname[sizeof(fname)-3..] == ".so") &&
 	    !zero_type(`[](fname[..sizeof(fname)-4]))) {
 	  continue;
 	}
       };
+      if (err) {
+	compile_warning(dirname+"."+fname, 0,
+			sprintf("Compilation failed:\n"
+				"%s\n",
+				describe_backtrace(err)));
+      }
     }
     _cache_full = 1;
   }
-- 
GitLab