| author | paulson <lp15@cam.ac.uk> | 
| Wed, 25 Mar 2020 12:37:57 +0000 | |
| changeset 71591 | 8e4d542f041b | 
| 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  |