src/Pure/PIDE/document.ML
changeset 44330 b28e091f683a
parent 44302 0a1934c5c104
child 44338 700008399ee5
equal deleted inserted replaced
44329:6325ea1c5dfd 44330:b28e091f683a
   369                       val node' = node
   369                       val node' = node
   370                         |> fold update_entry assigns
   370                         |> fold update_entry assigns
   371                         |> set_result result;
   371                         |> set_result result;
   372                     in ((assigns, execs, [(name, node')]), node') end)
   372                     in ((assigns, execs, [(name, node')]), node') end)
   373               end))
   373               end))
   374       |> Future.join_results |> Par_Exn.release_all |> map #1;
   374       |> Future.joins |> map #1;
   375 
   375 
   376     val state' = state
   376     val state' = state
   377       |> fold (fold define_exec o #2) updates
   377       |> fold (fold define_exec o #2) updates
   378       |> define_version new_id (fold (fold put_node o #3) updates new_version);
   378       |> define_version new_id (fold (fold put_node o #3) updates new_version);
   379 
   379