Mercurial Mercurial > repos > isabelle / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | gz | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
renamed check_fact to defined_fact;
authorwenzelm
Wed, 16 Apr 2008 21:53:01 +0200
changeset 26693 90d0b86644ac
parent 26692 3f48d4f4229f
child 26694 29f5c1a296bc
renamed check_fact to defined_fact;
src/Pure/pure_thy.ML file | annotate | diff | comparison | revisions 
--- a/src/Pure/pure_thy.ML	Wed Apr 16 21:53:00 2008 +0200
+++ b/src/Pure/pure_thy.ML	Wed Apr 16 21:53:01 2008 +0200
@@ -25,7 +25,7 @@
   val has_internal: Markup.property list -> bool
   val is_internal: thm -> bool
   val intern_fact: theory -> xstring -> string
-  val check_fact: theory -> string -> bool
+  val defined_fact: theory -> string -> bool
   val get_fact: Context.generic -> theory -> Facts.ref -> thm list
   val get_thms: theory -> xstring -> thm list
   val get_thm: theory -> xstring -> thm
@@ -149,7 +149,7 @@
 val facts_of = #all_facts o get_theorems;
 
 val intern_fact = Facts.intern o facts_of;
-fun check_fact thy name = is_some (Facts.lookup (Context.Theory thy) (facts_of thy) name);
+val defined_fact = Facts.defined o facts_of;
isabelle