diff options
| author | letouzey | 2008-11-06 12:19:41 +0000 |
|---|---|---|
| committer | letouzey | 2008-11-06 12:19:41 +0000 |
| commit | b626be96132d2dc65be5acb054d343a9eeffc826 (patch) | |
| tree | c55b521fbd9f615e9fca4a9a05a0bcf2f6d0cae0 /contrib/extraction/extract_env.ml | |
| parent | 80881f5f94597fc31734f5e439d5fda01a834fc4 (diff) | |
Cosmetic: no more whitespace at end of lines in extraction files
(diff says it's a big commit, whereas diff -w says it's an empty one ;-)
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@11547 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'contrib/extraction/extract_env.ml')
| -rw-r--r-- | contrib/extraction/extract_env.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/contrib/extraction/extract_env.ml b/contrib/extraction/extract_env.ml index 6d2b332ab2..034d07c0e3 100644 --- a/contrib/extraction/extract_env.ml +++ b/contrib/extraction/extract_env.ml @@ -201,8 +201,8 @@ and extract_seb_spec env = function MTwith(extract_seb_spec env mtb', ML_With_module(idl,mp)) (* TODO: On pourrait peut-etre oter certaines eta-expansion, du genre: - | SEBfunctor(mbid,_,SEBapply(m,SEBident (MPbound mbid2),_)) - when mbid = mbid2 -> extract_seb_spec env m + | SEBfunctor(mbid,_,SEBapply(m,SEBident (MPbound mbid2),_)) + when mbid = mbid2 -> extract_seb_spec env m (* faudrait alors ajouter un test de non-apparition de mbid dans mb *) *) | SEBfunctor (mbid, mtb, mtb') -> |
