src/Doc/Tutorial/ToyList/ToyList_Test.thy
author wenzelm
Fri, 06 Sep 2019 19:44:54 +0200
changeset 70665 94442fce40a5
parent 69597 ff784d5a5bfb
permissions -rw-r--r--
prefer commands_accepted: fewer protocol messages;

theory ToyList_Test
imports Main
begin

ML \<open>
  let val text =
    map (File.read o Path.append \<^master_dir>) [\<^path>\<open>ToyList1.txt\<close>, \<^path>\<open>ToyList2.txt\<close>]
    |> implode
  in Thy_Info.script_thy Position.start text \<^theory> end
\<close>

end