src/HOL/String.thy
changeset 38808 89ae86205739
parent 37743 0a3fa8fbcdc5
child 38858 1920158cfa17
     1.1 --- a/src/HOL/String.thy	Fri Aug 27 17:23:57 2010 +0200
     1.2 +++ b/src/HOL/String.thy	Fri Aug 27 17:59:40 2010 +0200
     1.3 @@ -53,7 +53,7 @@
     1.4     (fn n => fn m => Drule.instantiate' [] [SOME n, SOME m] @{thm nibble_pair_of_char.simps})
     1.5        nibbles nibbles;
     1.6  in
     1.7 -  PureThy.note_thmss Thm.definitionK [((Binding.name "nibble_pair_of_char_simps", []), [(thms, [])])]
     1.8 +  PureThy.note_thmss Thm.definitionK [((@{binding nibble_pair_of_char_simps}, []), [(thms, [])])]
     1.9    #-> (fn [(_, thms)] => fold_rev Code.add_eqn thms)
    1.10  end
    1.11  *}