equal
deleted
inserted
replaced
470 val imports = map (apsnd Future.join) deps; |
470 val imports = map (apsnd Future.join) deps; |
471 val updated_imports = exists (is_some o #3 o #1 o #2) imports; |
471 val updated_imports = exists (is_some o #3 o #1 o #2) imports; |
472 val required = is_required name; |
472 val required = is_required name; |
473 in |
473 in |
474 if updated_imports orelse AList.defined (op =) edits name orelse |
474 if updated_imports orelse AList.defined (op =) edits name orelse |
475 required andalso not (stable_finished_theory node) |
475 not (stable_finished_theory node) |
476 then |
476 then |
477 let |
477 let |
478 val node0 = node_of old_version name; |
478 val node0 = node_of old_version name; |
479 fun init () = init_theory imports node; |
479 fun init () = init_theory imports node; |
480 val proper_init = |
480 val proper_init = |