src/Doc/Tutorial/ToyList/ToyList_Test.thy

prefer explicit heading command;

theory ToyList_Test
imports BNF_Least_Fixpoint
begin

ML {*
  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 BNF_Least_Fixpoint} end
*}

end