aboutsummaryrefslogtreecommitdiffstats
path: root/cparser
diff options
context:
space:
mode:
authorBernhard Schommer <bernhardschommer@gmail.com>2016-03-31 10:56:42 +0200
committerBernhard Schommer <bernhardschommer@gmail.com>2016-03-31 10:56:42 +0200
commit8b0d5a0d291c66f05869c15f92539bd1d7082d3a (patch)
tree37f92cddae9cfa155d10d6f41edf8c1f9f8ba0a0 /cparser
parentccd59f7fc19ffe2347724b532d6ce13c8580c2ab (diff)
downloadcompcert-kvx-8b0d5a0d291c66f05869c15f92539bd1d7082d3a.tar.gz
compcert-kvx-8b0d5a0d291c66f05869c15f92539bd1d7082d3a.zip
Compatibility with newer ocaml versions. Bug 18313.
Diffstat (limited to 'cparser')
-rw-r--r--cparser/pre_parser.mly2
-rw-r--r--cparser/validator/Alphabet.v4
2 files changed, 3 insertions, 3 deletions
diff --git a/cparser/pre_parser.mly b/cparser/pre_parser.mly
index 21008f1c..27502a3b 100644
--- a/cparser/pre_parser.mly
+++ b/cparser/pre_parser.mly
@@ -23,7 +23,7 @@
*)
%{
- open Pre_parser_aux
+ open !Pre_parser_aux
let set_id_type (_,r,_) t =
r := t
diff --git a/cparser/validator/Alphabet.v b/cparser/validator/Alphabet.v
index 13718cd5..db850860 100644
--- a/cparser/validator/Alphabet.v
+++ b/cparser/validator/Alphabet.v
@@ -199,8 +199,8 @@ Next Obligation. apply Zcompare_antisym. Qed.
Next Obligation.
destruct c. unfold compare31 in *.
rewrite Z.compare_eq_iff in *. congruence.
-eapply Zcompare_Lt_trans; eauto.
-eapply Zcompare_Gt_trans; eauto.
+eapply Zcompare_Lt_trans. apply H. apply H0.
+eapply Zcompare_Gt_trans. apply H. apply H0.
Qed.
Next Obligation.
intros x y H. unfold compare, compare31 in H.