src/HOL/Codegenerator_Test/Code_Test_PolyML.thy
author nipkow
Tue, 17 Jun 2025 14:11:40 +0200
changeset 82733 8b537e1af2ec
parent 81815 0b31f0909060
permissions -rw-r--r--
reinstated intersection of lists as inter_list_set

(*  Title:      HOL/Codegenerator_Test/Code_Test_PolyML.thy
    Author:     Andreas Lochbihler, ETH Zurich
*)

theory Code_Test_PolyML
imports 
  "HOL-Library.Code_Test"
  Code_Lazy_Test
begin

text \<open>Test cases for \<^text>\<open>test_code\<close>\<close>

test_code "14 + 7 * -12 = (140 div -2 :: integer)" in PolyML

value [PolyML] "14 + 7 * -12 :: integer"

test_code "stake 10 (cycle ''ab'') = ''ababababab''" in PolyML

end