ml_store_thm: no warning for "";
authorwenzelm
Wed Sep 22 20:58:23 1999 +0200 (1999-09-22 ago)
changeset 7573aa87cf5a15f5
parent 7572 6e6dafacbc28
child 7574 5bcb7fc31caa
ml_store_thm: no warning for "";
src/Pure/Thy/thm_database.ML
     1.1 --- a/src/Pure/Thy/thm_database.ML	Wed Sep 22 20:57:51 1999 +0200
     1.2 +++ b/src/Pure/Thy/thm_database.ML	Wed Sep 22 20:58:23 1999 +0200
     1.3 @@ -64,6 +64,7 @@
     1.4  
     1.5  fun warn_ml name =
     1.6    if is_ml_identifier name then false
     1.7 +  else if name = "" then true
     1.8    else (warning ("Cannot bind theorem(s) " ^ quote name ^ " as ML value"); true);
     1.9  
    1.10  fun ml_store_thm (name, thm) =