src/Tools/Haskell/Test.thy
changeset 69677 a06b204527e6
parent 69473 f71598c11fae
child 70047 96fe857a7a6f
equal deleted inserted replaced
69661:a03a63b81f44 69677:a06b204527e6
    12     let
    12     let
    13       val src_dir = Path.append tmp_dir (Path.explode "src");
    13       val src_dir = Path.append tmp_dir (Path.explode "src");
    14       val files = Generated_Files.write_files \<^theory>\<open>Haskell\<close> src_dir;
    14       val files = Generated_Files.write_files \<^theory>\<open>Haskell\<close> src_dir;
    15 
    15 
    16       val modules = files
    16       val modules = files
    17         |> map (Path.implode #> unsuffix ".hs" #> space_explode "/" #> space_implode ".");
    17         |> map (#1 #> Path.implode #> unsuffix ".hs" #> space_explode "/" #> space_implode ".");
    18       val _ =
    18       val _ =
    19         GHC.new_project tmp_dir
    19         GHC.new_project tmp_dir
    20           {name = "isabelle",
    20           {name = "isabelle",
    21            depends =
    21            depends =
    22             ["bytestring", "containers", "network", "split", "threads", "utf8-string", "uuid"],
    22             ["bytestring", "containers", "network", "split", "threads", "utf8-string", "uuid"],