src/HOL/Datatype.thy
changeset 28346 b8390cd56b8f
parent 27981 feb0c01cf0fb
child 28524 644b62cf678f
     1.1 --- a/src/HOL/Datatype.thy	Wed Sep 24 19:39:25 2008 +0200
     1.2 +++ b/src/HOL/Datatype.thy	Thu Sep 25 09:28:03 2008 +0200
     1.3 @@ -686,7 +686,7 @@
     1.4  code_instance option :: eq
     1.5    (Haskell -)
     1.6  
     1.7 -code_const "op = \<Colon> 'a\<Colon>eq option \<Rightarrow> 'a option \<Rightarrow> bool"
     1.8 +code_const "eq_class.eq \<Colon> 'a\<Colon>eq option \<Rightarrow> 'a option \<Rightarrow> bool"
     1.9    (Haskell infixl 4 "==")
    1.10  
    1.11  code_reserved SML