author | wenzelm |
Wed, 07 Aug 2019 09:28:32 +0200 | |
changeset 70477 | 90acc6ce5beb |
parent 68155 | 8b50f29a1992 |
permissions | -rw-r--r-- |
59720 | 1 |
(* Title: HOL/Codegenerator_Test/Code_Test_SMLNJ.thy |
58039 | 2 |
Author: Andreas Lochbihler, ETH Zurich |
3 |
||
4 |
Test case for test_code on SMLNJ |
|
5 |
*) |
|
6 |
||
68155 | 7 |
theory Code_Test_SMLNJ imports "HOL-Library.Code_Test" Code_Lazy_Test begin |
58039 | 8 |
|
9 |
test_code "14 + 7 * -12 = (140 div -2 :: integer)" in SMLNJ |
|
10 |
||
58348
2d47c7d10b62
add target language evaluators for the value command;
Andreas Lochbihler
parents:
58039
diff
changeset
|
11 |
value [SMLNJ] "14 + 7 * -12 :: integer" |
58039 | 12 |
|
68155 | 13 |
test_code "stake 10 (cycle ''ab'') = ''ababababab''" in SMLNJ |
14 |
||
58039 | 15 |
end |