restored print translation from a1141fb798ff, to prevent a printing misfit observable using "thm divmod_nat_if" in theory "Divides", with a meagure indication in the comment
(* Author: Florian Haftmann, TU Muenchen *)
section {* Pervasive test of code generator *}
theory Generate_Target_Nat
imports
Candidates
"~~/src/HOL/Library/AList_Mapping"
"~~/src/HOL/Library/Finite_Lattice"
"~~/src/HOL/Library/Code_Target_Numeral"
begin
text {*
If any of the checks fails, inspect the code generated
by a corresponding @{text export_code} command.
*}
export_code _ checking SML OCaml? Haskell? Scala
end