equal
deleted
inserted
replaced
1 (* Title: Tools/Code_Generator.thy |
1 (* Title: Tools/Code_Generator.thy |
2 Author: Florian Haftmann, TU Muenchen |
2 Author: Florian Haftmann, TU Muenchen |
3 *) |
3 *) |
4 |
4 |
5 header {* Loading the code generator modules *} |
5 header {* Loading the code generator and related modules *} |
6 |
6 |
7 theory Code_Generator |
7 theory Code_Generator |
8 imports Pure |
8 imports Pure |
9 uses |
9 uses |
10 "~~/src/Tools/cache_io.ML" |
10 "~~/src/Tools/cache_io.ML" |
19 "~~/src/Tools/Code/code_target.ML" |
19 "~~/src/Tools/Code/code_target.ML" |
20 "~~/src/Tools/Code/code_namespace.ML" |
20 "~~/src/Tools/Code/code_namespace.ML" |
21 "~~/src/Tools/Code/code_ml.ML" |
21 "~~/src/Tools/Code/code_ml.ML" |
22 "~~/src/Tools/Code/code_haskell.ML" |
22 "~~/src/Tools/Code/code_haskell.ML" |
23 "~~/src/Tools/Code/code_scala.ML" |
23 "~~/src/Tools/Code/code_scala.ML" |
24 "~~/src/Tools/nbe.ML" |
|
25 ("~~/src/Tools/Code/code_runtime.ML") |
24 ("~~/src/Tools/Code/code_runtime.ML") |
|
25 ("~~/src/Tools/nbe.ML") |
26 begin |
26 begin |
27 |
27 |
28 setup {* |
28 setup {* |
29 Auto_Solve.setup |
29 Auto_Solve.setup |
30 #> Code_Preproc.setup |
30 #> Code_Preproc.setup |
31 #> Code_Simp.setup |
31 #> Code_Simp.setup |
32 #> Code_ML.setup |
32 #> Code_ML.setup |
33 #> Code_Haskell.setup |
33 #> Code_Haskell.setup |
34 #> Code_Scala.setup |
34 #> Code_Scala.setup |
35 #> Nbe.setup |
|
36 #> Quickcheck.setup |
35 #> Quickcheck.setup |
37 *} |
36 *} |
38 |
37 |
39 code_datatype "TYPE('a\<Colon>{})" |
38 code_datatype "TYPE('a\<Colon>{})" |
40 |
39 |
62 show "(PROP P \<Longrightarrow> PROP holds) \<equiv> PROP holds" |
61 show "(PROP P \<Longrightarrow> PROP holds) \<equiv> PROP holds" |
63 by rule (rule holds)+ |
62 by rule (rule holds)+ |
64 qed |
63 qed |
65 |
64 |
66 use "~~/src/Tools/Code/code_runtime.ML" |
65 use "~~/src/Tools/Code/code_runtime.ML" |
|
66 use "~~/src/Tools/nbe.ML" |
|
67 |
|
68 setup Nbe.setup |
67 |
69 |
68 hide_const (open) holds |
70 hide_const (open) holds |
69 |
71 |
70 end |
72 end |