diff options
| author | herbelin | 2000-10-01 13:18:11 +0000 |
|---|---|---|
| committer | herbelin | 2000-10-01 13:18:11 +0000 |
| commit | 402679a57beec382cf90cbcddfc00d3f702cba74 (patch) | |
| tree | 4dcabc4b32bfff9aa4127fe9086f6e4e6a826dbb /toplevel/command.ml | |
| parent | 5b8198526d519f547d33c693bba69ebcda340cba (diff) | |
Code mort
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@618 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'toplevel/command.ml')
| -rw-r--r-- | toplevel/command.ml | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/toplevel/command.ml b/toplevel/command.ml index d9193a8ff4..14381b7d7d 100644 --- a/toplevel/command.ml +++ b/toplevel/command.ml @@ -248,7 +248,6 @@ let build_recursive lnameargsardef = (mkFix ((Array.of_list nvrec,i), (varrec,List.map (fun id -> Name id) lnamerec, recvec))); - (* (mkFixDlam (Array.of_list nvrec) i varrec recvec); *) const_entry_type = None } in declare_constant fi (ce, n); |