src/Pure/PIDE/resources.ML
changeset 58851 897f266c44b3
parent 58849 ef7700ecce83
child 58862 63a16e98cc14
     1.1 --- a/src/Pure/PIDE/resources.ML	Fri Oct 31 21:10:11 2014 +0100
     1.2 +++ b/src/Pure/PIDE/resources.ML	Fri Oct 31 21:20:06 2014 +0100
     1.3 @@ -15,7 +15,6 @@
     1.4    val parse_files: string -> (theory -> Token.file list) parser
     1.5    val provide: Path.T * SHA1.digest -> theory -> theory
     1.6    val provide_parse_files: string -> (theory -> Token.file list * theory) parser
     1.7 -  val loaded_files: theory -> Path.T list
     1.8    val loaded_files_current: theory -> bool
     1.9    val begin_theory: Path.T -> Thy_Header.header -> theory list -> theory
    1.10    val load_thy: bool -> (Toplevel.transition -> Time.time option) -> int -> Path.T ->
    1.11 @@ -116,11 +115,6 @@
    1.12          NONE => false
    1.13        | SOME ((_, id'), _) => id = id'));
    1.14  
    1.15 -(*Proof General legacy*)
    1.16 -fun loaded_files thy =
    1.17 -  let val {master_dir, provided, ...} = Files.get thy
    1.18 -  in map (File.full_path master_dir o #1) provided end;
    1.19 -
    1.20  
    1.21  (* load theory *)
    1.22