aboutsummaryrefslogtreecommitdiffstats
path: root/cfrontend/SimplExprspec.v
diff options
context:
space:
mode:
authorXavier Leroy <xavier.leroy@inria.fr>2015-01-23 09:33:59 +0100
committerXavier Leroy <xavier.leroy@inria.fr>2015-01-23 09:33:59 +0100
commitd594c5da5e11fb10775c2b772961b8a2383887c7 (patch)
tree750ed5d4a0829519a258f3c12f7d518e53504487 /cfrontend/SimplExprspec.v
parent1e97bb4f6297b6fa7949684e522a592aab754d99 (diff)
parent2dd864217cc864d44e828a4d14dd45668e4ab095 (diff)
downloadcompcert-d594c5da5e11fb10775c2b772961b8a2383887c7.tar.gz
compcert-d594c5da5e11fb10775c2b772961b8a2383887c7.zip
Merge branch 'named-structs'
- Switch CompCert C / Clight AST of composite types (structs and unions) from a structural representation to a nominal representation, closer to concrete syntax. - This avoids algorithmic inefficiencies due to the structural representation. - Closes PR#4. - Smallstep: make small-step semantics more polymorphic in the type of the global environment. - Globalenvs: introduce Senv.t (symbol environments) as a restricted view on Genv.t (full global environments). - Events, Smallstep: use Senv instead of Genv to talk about global names.
Diffstat (limited to 'cfrontend/SimplExprspec.v')
-rw-r--r--cfrontend/SimplExprspec.v4
1 files changed, 2 insertions, 2 deletions
diff --git a/cfrontend/SimplExprspec.v b/cfrontend/SimplExprspec.v
index 83ddd1f4..9f9fb450 100644
--- a/cfrontend/SimplExprspec.v
+++ b/cfrontend/SimplExprspec.v
@@ -1144,10 +1144,10 @@ Qed.
Theorem transl_program_spec:
forall p tp,
transl_program p = OK tp ->
- match_program tr_fundef (fun v1 v2 => v1 = v2) nil p.(prog_main) p tp.
+ match_program tr_fundef (fun v1 v2 => v1 = v2) nil (Csyntax.prog_main p) p tp.
Proof.
unfold transl_program; intros.
- destruct (transl_globdefs (prog_defs p) (initial_generator tt)) eqn:E; simpl in H; inv H.
+ destruct (transl_globdefs (Csyntax.prog_defs p) (initial_generator tt)) eqn:E; simpl in H; inv H.
split; auto. exists l; split. eapply transl_globdefs_spec; eauto.
rewrite <- app_nil_end; auto.
Qed.