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