From: Enrico Tassi <enrico.tassi@inria.fr>
Date: Mon, 19 Jun 2006 15:51:24 +0000 (+0000)
Subject: typo cpying the formal semantic
X-Git-Tag: make_still_working~7158
X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=commitdiff_plain;h=17974f325b94010f784b745d481bbd343ba59bb1;p=helm.git

typo cpying the formal semantic
---

diff --git a/helm/software/components/tactics/continuationals.ml b/helm/software/components/tactics/continuationals.ml
index 7ea357e89..eeff9f9bf 100644
--- a/helm/software/components/tactics/continuationals.ml
+++ b/helm/software/components/tactics/continuationals.ml
@@ -302,7 +302,7 @@ struct
           debug_print (lazy ("closed: "
             ^ String.concat " " (List.map string_of_int gcn)));
           let stack =
-            (zero_pos gon, t @~- gcn, k @~- gon, tag) :: deep_close gcn s
+            (zero_pos gon, t @~- gcn, k @~- gcn, tag) :: deep_close gcn s
           in
           sn, stack
       | Dot, ([], _, [], _) :: _ ->