src/Doc/Tutorial/ToyList/ToyList_Test.thy

field "kind" is always present, with default "writeln";

theory ToyList_Test
imports Main
begin

ML \<open>
  let val text =
    map (File.read o Path.append (Resources.master_directory @{theory}) o Path.explode)
      ["ToyList1.txt", "ToyList2.txt"]
    |> implode
  in Thy_Info.script_thy Position.start text @{theory} end
\<close>

end