minor : Adding comment

3c5580d0 · Sylvain Dailler · 83b74fbd · 3c5580d0
Commit 3c5580d0 authored Jul 25, 2016 by Sylvain Dailler
Hide whitespace changes
Inline Side-by-side

Showing with 3 additions and 0 deletions

src/transform/introduction.ml src/transform/introduction.ml +3 -0

No files found.
--- a/src/transform/introduction.ml
+++ b/src/transform/introduction.ml
@@ -20,6 +20,9 @@ open Ty
 open Term
 open Decl

+(* This label is used to stop the introduction transformation to introduce
+variables past it. It is generated by software that uses why3 as a backend
+such as SPARK (for counterexamples) *)
 let stop_intro = Ident.create_label "stop_intro"

 let rec intros pr f =