--- a/src/HOL/Library/Code_Char.thy Thu Aug 28 22:08:11 2008 +0200
+++ b/src/HOL/Library/Code_Char.thy Thu Aug 28 22:09:20 2008 +0200
@@ -36,9 +36,9 @@
@{const_name NibbleC}, @{const_name NibbleD},
@{const_name NibbleE}, @{const_name NibbleF}];
in
- fold (fn target => CodeTarget.add_pretty_char target charr nibbles)
+ fold (fn target => Code_Target.add_pretty_char target charr nibbles)
["SML", "OCaml", "Haskell"]
- #> CodeTarget.add_pretty_list_string "Haskell"
+ #> Code_Target.add_pretty_list_string "Haskell"
@{const_name Nil} @{const_name Cons} charr nibbles
end
*}