aboutsummaryrefslogtreecommitdiff
path: root/toplevel
diff options
context:
space:
mode:
authormohring2000-11-23 07:55:58 +0000
committermohring2000-11-23 07:55:58 +0000
commit3c22073b7a03391cb8a88bf5ec6cfb0f4ba2318d (patch)
tree0725f7ac05cb800f19b248833ca4fdb75b1ddd80 /toplevel
parent937ca7a6dbc1a031b7c4540c665b8774440c1bb9 (diff)
Reparation IsMutConstruct + Transparent
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@920 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'toplevel')
-rw-r--r--toplevel/vernacentries.ml3
1 files changed, 2 insertions, 1 deletions
diff --git a/toplevel/vernacentries.ml b/toplevel/vernacentries.ml
index 6363decfe1..b72aa80e1f 100644
--- a/toplevel/vernacentries.ml
+++ b/toplevel/vernacentries.ml
@@ -488,7 +488,8 @@ let _ =
(fun id_list () ->
List.iter
(function
- | VARG_CONSTANT sp -> Global.set_transparent sp
+(* | VARG_CONSTANT sp -> Global.set_transparent sp *)
+ | VARG_QUALID sp -> Global.set_transparent sp
| _ -> bad_vernac_args "TRANSPARENT")
id_list)