aboutsummaryrefslogtreecommitdiff
path: root/toplevel/command.ml
diff options
context:
space:
mode:
authorherbelin2000-10-01 15:37:50 +0000
committerherbelin2000-10-01 15:37:50 +0000
commitea4ead6ad589e4dab02244c1fa655bddd45a9610 (patch)
tree140844b488e0a10db8054efb17368e1a5f7338e6 /toplevel/command.ml
parent2f0c35cfcbab959bad20f436849c74ec63910f51 (diff)
Renommage AppL en App
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@635 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'toplevel/command.ml')
-rw-r--r--toplevel/command.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/toplevel/command.ml b/toplevel/command.ml
index 14381b7d7d..1fd4fc4034 100644
--- a/toplevel/command.ml
+++ b/toplevel/command.ml
@@ -223,7 +223,7 @@ let build_recursive lnameargsardef =
with e ->
States.unfreeze fs; raise e
in
- let recdef =
+ let recdef = (* TODO: remplacer mkCast par un appel à interp_casted_constr *)
try
List.map (fun (_,lparams,arityc,def) ->
interp_constr sigma rec_sign