src/HOL/Codegenerator_Test/Code_Test_Scala.thy
author wenzelm
Fri, 07 Dec 2018 14:58:32 +0100
changeset 69419 8985ee17bfd2
parent 68155 8b50f29a1992
child 69597 ff784d5a5bfb
permissions -rw-r--r--
updated to stack-1.9.3; proper settings for Windows;

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

Test case for test_code on Scala
*)

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

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

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

test_code \<comment> \<open>Tests for the serialisation of @{const gcd} on @{typ integer}\<close>
  "gcd 15 10 = (5 :: integer)"
  "gcd 15 (- 10) = (5 :: integer)"
  "gcd (- 10) 15 = (5 :: integer)"
  "gcd (- 10) (- 15) = (5 :: integer)"
  "gcd 0 (- 10) = (10 :: integer)"
  "gcd (- 10) 0 = (10 :: integer)"
  "gcd 0 0 = (0 :: integer)"
in Scala

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

end