author | wenzelm |
Sun, 31 Dec 2023 19:24:37 +0100 | |
changeset 79409 | e1895596e1b9 |
parent 68155 | 8b50f29a1992 |
permissions | -rw-r--r-- |
59720 | 1 |
(* Title: HOL/Codegenerator_Test/Code_Test_PolyML.thy |
58039 | 2 |
Author: Andreas Lochbihler, ETH Zurich |
3 |
||
4 |
Test case for test_code on PolyML |
|
5 |
*) |
|
6 |
||
68155 | 7 |
theory Code_Test_PolyML imports "HOL-Library.Code_Test" Code_Lazy_Test begin |
58039 | 8 |
|
9 |
test_code "14 + 7 * -12 = (140 div -2 :: integer)" in PolyML |
|
10 |
||
58348
2d47c7d10b62
add target language evaluators for the value command;
Andreas Lochbihler
parents:
58039
diff
changeset
|
11 |
value [PolyML] "14 + 7 * -12 :: integer" |
58039 | 12 |
|
68155 | 13 |
test_code "stake 10 (cycle ''ab'') = ''ababababab''" in PolyML |
14 |
||
58039 | 15 |
end |