| author | wenzelm |
| Thu, 20 Sep 2007 20:56:33 +0200 | |
| changeset 24665 | e5bea50b9b89 |
| parent 24432 | d555d941f983 |
| child 24718 | 16b11ba36350 |
| permissions | -rw-r--r-- |
|
19281
b411f25fff25
added example for operational classes and code generator
haftmann
parents:
diff
changeset
|
1 |
(* ID: $Id$ |
|
b411f25fff25
added example for operational classes and code generator
haftmann
parents:
diff
changeset
|
2 |
Author: Florian Haftmann, TU Muenchen |
|
b411f25fff25
added example for operational classes and code generator
haftmann
parents:
diff
changeset
|
3 |
*) |
|
b411f25fff25
added example for operational classes and code generator
haftmann
parents:
diff
changeset
|
4 |
|
|
21877
e871f57b1adb
now testing executable content of nearly all HOL
haftmann
parents:
21545
diff
changeset
|
5 |
header {* Tests and examples for code generator *}
|
|
19281
b411f25fff25
added example for operational classes and code generator
haftmann
parents:
diff
changeset
|
6 |
|
|
b411f25fff25
added example for operational classes and code generator
haftmann
parents:
diff
changeset
|
7 |
theory Codegenerator |
|
21911
e29bcab0c81c
added OCaml code generation (without dictionaries)
haftmann
parents:
21898
diff
changeset
|
8 |
imports ExecutableContent |
|
19281
b411f25fff25
added example for operational classes and code generator
haftmann
parents:
diff
changeset
|
9 |
begin |
|
b411f25fff25
added example for operational classes and code generator
haftmann
parents:
diff
changeset
|
10 |
|
| 24432 | 11 |
ML {* (*FIXME get rid of this*)
|
| 24430 | 12 |
nonfix union; |
13 |
nonfix inter; |
|
14 |
*} |
|
15 |
||
|
24423
ae9cd0e92423
overloaded definitions accompanied by explicit constants
haftmann
parents:
24348
diff
changeset
|
16 |
export_code * in SML module_name CodegenTest |
| 23811 | 17 |
in OCaml file - |
18 |
in Haskell file - |
|
|
19281
b411f25fff25
added example for operational classes and code generator
haftmann
parents:
diff
changeset
|
19 |
|
| 24432 | 20 |
ML {*
|
21 |
infix union; |
|
22 |
infix inter; |
|
23 |
*} |
|
24 |
||
| 23266 | 25 |
end |