diff options
| author |  barras <barras@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2005-11-23 15:10:16 +0000 |
|---|---|---|
| committer | barras <barras@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2005-11-23 15:10:16 +0000 |
| commit | fd9eb182a5a45d04c634ea17e2225dddbf667033 (patch) | |
| tree | a29dd14f575b518231d72d395999966425ca33eb /library/global.ml | |
| parent | e5f90d8f6b7db4d63b3d21afabff1d6879d53a34 (diff) | |
bug #909: Top n'est cree que si le contexte est vide
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@7602 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'library/global.ml')
| -rw-r--r-- | library/global.ml | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/library/global.ml b/library/global.ml index 660620086..b8bc364b0 100644 --- a/library/global.ml +++ b/library/global.ml @@ -25,6 +25,8 @@ let safe_env () = !global_env let env () = env_of_safe_env !global_env +let env_is_empty () = is_empty !global_env + let _ = declare_summary "Global environment" { freeze_function = (fun () -> !global_env); |