| author | wenzelm | 
| Tue, 22 Aug 2023 13:27:53 +0200 | |
| changeset 78566 | a04277e3b313 | 
| 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  |