# HG changeset patch
# User wenzelm
# Date 1594903003 -7200
# Node ID 2c7cfd2f9b6c9bdf079df974c69519afb4094083
# Parent  efd169aed4dc273a7a105ca4a1320fb22e5a6ca1
more thorough extend/merge, notably for master_dir across Theory.join_theory (e.g. for @{file} antiquotation);

diff -r efd169aed4dc -r 2c7cfd2f9b6c src/Pure/PIDE/resources.ML
--- a/src/Pure/PIDE/resources.ML	Thu Jul 16 11:43:32 2020 +0200
+++ b/src/Pure/PIDE/resources.ML	Thu Jul 16 14:36:43 2020 +0200
@@ -121,8 +121,10 @@
 (
   type T = files;
   val empty = make_files (Path.current, [], []);
-  fun extend _ = empty;
-  fun merge _ = empty;
+  val extend = I;
+  fun merge ({master_dir, imports, provided = provided1}, {provided = provided2, ...}) =
+    let val provided' = Library.merge (op =) (provided1, provided2)
+    in make_files (master_dir, imports, provided') end
 );
 
 fun map_files f =