# HG changeset patch
# User kuncar
# Date 1393261960 -3600
# Node ID b6ed5f896ce95f3e1d5df92c239d5ce9c5f3459e
# Parent  1c2cfc06c96acd9a10031128a54664d641f1f279
publish a useful function

diff -r 1c2cfc06c96a -r b6ed5f896ce9 src/Pure/Isar/code.ML
--- a/src/Pure/Isar/code.ML	Mon Feb 24 18:12:39 2014 +0100
+++ b/src/Pure/Isar/code.ML	Mon Feb 24 18:12:40 2014 +0100
@@ -24,6 +24,7 @@
   val mk_eqn: theory -> thm * bool -> thm * bool
   val mk_eqn_liberal: theory -> thm -> (thm * bool) option
   val assert_eqn: theory -> thm * bool -> thm * bool
+  val assert_abs_eqn: theory -> string option -> thm -> thm * string
   val const_typ_eqn: theory -> thm -> string * typ
   val expand_eta: theory -> int -> thm -> thm
   type cert