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.
Improved error message in "require_thy"
authorpaulson
Thu, 15 May 1997 12:54:30 +0200
changeset 3197 16b840e02899
parent 3196 c522bc46aea7
child 3198 295287618e30
Improved error message in "require_thy"
src/HOL/datatype.ML file | annotate | diff | comparison | revisions 
--- a/src/HOL/datatype.ML	Thu May 15 12:54:02 1997 +0200
+++ b/src/HOL/datatype.ML	Thu May 15 12:54:30 1997 +0200
@@ -139,7 +139,7 @@
   fun add_datatype (typevars, tname, cons_list') thy = 
     let
       val dummy = if length cons_list' < dtK then ()
-                  else require_thy thy "Nat" "datatype";
+                  else require_thy thy "Nat" "datatype definitions";
       
       fun typid(dtRek(_,id)) = id
         | typid(dtVar s) = implode (tl (explode s))
isabelle