diff options
author | aspiwack <aspiwack@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2007-12-18 12:19:12 +0000 |
---|---|---|
committer | aspiwack <aspiwack@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2007-12-18 12:19:12 +0000 |
commit | f3eaf2869e84c942d56a7fe0cc459d9943e4b059 (patch) | |
tree | 4a67e700f35e74324cece25f50325758e43dcb03 /kernel/cbytecodes.ml | |
parent | 0e1b31da1546b7ac0dd3664e73ba05127320bed9 (diff) |
Nettoyage de code en vue de la release. Plus de Warning: Unused
Variable, et plus de trucs useless qui traƮnaient par ma faute (y
compris dans le noyau, la honte).
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@10388 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'kernel/cbytecodes.ml')
-rw-r--r-- | kernel/cbytecodes.ml | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/kernel/cbytecodes.ml b/kernel/cbytecodes.ml index 84d04d67e..ceba6e82a 100644 --- a/kernel/cbytecodes.ml +++ b/kernel/cbytecodes.ml @@ -235,7 +235,3 @@ type block = let draw_instr c = fprintf std_formatter "@[<v 0>%a@]" instruction_list c - -let string_of_instr c = - fprintf str_formatter "@[<v 0>%a@]" instruction_list c; - flush_str_formatter () |