Theory Generate_Target_String_Literals

(* Author: Florian Haftmann, TU Muenchen *)

section ‹Test of target-language string literal operations›

theory Generate_Target_String_Literals
imports
  "HOL-Library.Code_Test"
begin

context
begin

qualified definition computations where
  ‹computations = (
    STR ''abc'' + STR 0x20 + STR ''def'',
    String.implode ''abc'',
    String.explode STR ''abc'',
    String.literal_of_asciis [10, 20, 30, 40, 1111, 2222, 3333],
    size (STR ''abc''),
    STR ''def'' ≤ STR ''abc'',
    STR ''abc'' < STR ''def''
  )›

qualified definition results where
  ‹results = (
    STR ''abc def'',
    STR ''abc'',
    ''abc'',
    STR ''⏎'' + STR 0x14 + STR 0x1E + STR ''(W.'' + STR 0x05,
    3,
    False,
    True
  )›

qualified definition check where
  ‹check ⟷ computations = results›

lemma check
  by code_simp

lemma check
  by normalization

lemma check
  by eval

test_code check in Scala

end

end