changeset 30969 | fd9c89419358 |
parent 30743 | 2c83f7eaf1a4 |
child 31386 | 8624b75a7784 |
--- a/src/HOL/Library/reflection.ML Thu Apr 23 12:17:51 2009 +0200 +++ b/src/HOL/Library/reflection.ML Fri Apr 24 08:24:52 2009 +0200 @@ -314,5 +314,6 @@ in (rtac th i THEN TRY(rtac TrueI i)) st end); fun reflection_tac ctxt = gen_reflection_tac ctxt Codegen.evaluation_conv; + (*FIXME why Codegen.evaluation_conv? very specific...*) end