Mercurial Mercurial > repos > isabelle / file revision
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
src/HOL/Library/Code_Char_ord.thy
author wenzelm
Wed, 13 Jul 2011 21:44:15 +0200
changeset 43795 ca5896a836ba
parent 42857 1e1b74448f6b
permissions -rw-r--r--
recovered some runtime sharing from d6b6c74a8bcf, without the global memory bottleneck;

(*  Title:      HOL/Library/Code_Char_ord.thy
    Author:     Lukas Bulwahn, Florian Haftmann, Rene Thiemann
*)

header {* Code generation of orderings for pretty characters *}

theory Code_Char_ord
imports Code_Char Char_ord
begin
  
code_const "Orderings.less_eq \<Colon> char \<Rightarrow> char \<Rightarrow> bool"
  (SML "!((_ : char) <= _)")
  (OCaml "!((_ : char) <= _)")
  (Haskell infix 4 "<=")
  (Scala infixl 4 "<=")
  (Eval infixl 6 "<=")

code_const "Orderings.less \<Colon> char \<Rightarrow> char \<Rightarrow> bool"
  (SML "!((_ : char) < _)")
  (OCaml "!((_ : char) < _)")
  (Haskell infix 4 "<")
  (Scala infixl 4 "<")
  (Eval infixl 6 "<")

end
isabelle