aboutsummaryrefslogtreecommitdiff
path: root/contrib/extraction/extract_env.ml
diff options
context:
space:
mode:
authorletouzey2008-11-06 12:19:41 +0000
committerletouzey2008-11-06 12:19:41 +0000
commitb626be96132d2dc65be5acb054d343a9eeffc826 (patch)
treec55b521fbd9f615e9fca4a9a05a0bcf2f6d0cae0 /contrib/extraction/extract_env.ml
parent80881f5f94597fc31734f5e439d5fda01a834fc4 (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.ml4
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') ->