author | haftmann |
Thu, 12 Nov 2009 15:48:44 +0100 | |
changeset 33632 | 6ea8a4cce9e7 |
parent 33630 | 68e058d061f5 |
child 33633 | 9f7280e0c231 |
--- a/src/HOL/Code_Evaluation.thy Thu Nov 12 09:11:46 2009 +0100 +++ b/src/HOL/Code_Evaluation.thy Thu Nov 12 15:48:44 2009 +0100 @@ -145,7 +145,7 @@ (Eval "Term.Const/ ((_), (_))" and "Term.$/ ((_), (_))") code_const "term_of \<Colon> String.literal \<Rightarrow> term" - (Eval "HOLogic.mk'_message'_string") + (Eval "HOLogic.mk'_literal") code_reserved Eval HOLogic