diff options
| -rw-r--r-- | parsing/pptactic.ml | 1 | ||||
| -rw-r--r-- | translate/ppvernacnew.ml | 1 |
2 files changed, 0 insertions, 2 deletions
diff --git a/parsing/pptactic.ml b/parsing/pptactic.ml index 41f7ba954..fc44758be 100644 --- a/parsing/pptactic.ml +++ b/parsing/pptactic.ml @@ -406,7 +406,6 @@ let pr_extend_gen prgen s l = let tags = List.map genarg_tag l in (* Hack pour les syntaxes changeant non uniformément en passant a la V8 *) let s = - print_string s; flush stdout; let n = String.length s in if Options.do_translate() & n > 2 & String.sub s (n-2) 2 = "v7" then String.sub s 0 (n-2) ^ "v8" diff --git a/translate/ppvernacnew.ml b/translate/ppvernacnew.ml index c7b7acf57..9c80e0afe 100644 --- a/translate/ppvernacnew.ml +++ b/translate/ppvernacnew.ml @@ -1059,7 +1059,6 @@ and pr_extend s cl = try (* Hack pour les syntaxes changeant non uniformément en passant a la V8 *) let s = - print_string s; flush stdout; let n = String.length s in if Options.do_translate() & n > 2 & String.sub s (n-2) 2 = "V7" then String.sub s 0 (n-2) ^ "V8" |