diff options
author | Xavier Leroy <xavier.leroy@inria.fr> | 2017-02-13 16:27:43 +0100 |
---|---|---|
committer | Xavier Leroy <xavier.leroy@inria.fr> | 2017-02-13 16:27:43 +0100 |
commit | d8b75dc0f11fe725bcbe8eb4bd893c608c05dd91 (patch) | |
tree | 9242480a2943cc26e8279b3822f9969fa134d4be /arm | |
parent | 8e7de2a327b202130192a784f921699f70e707cb (diff) | |
download | compcert-d8b75dc0f11fe725bcbe8eb4bd893c608c05dd91.tar.gz compcert-d8b75dc0f11fe725bcbe8eb4bd893c608c05dd91.zip |
Give explicit scopes to notations a#b and a##b and a#b<-c
Without scopes Coq 8.6 warns, probably rightly so.
Diffstat (limited to 'arm')
-rw-r--r-- | arm/Asm.v | 10 |
1 files changed, 6 insertions, 4 deletions
@@ -84,8 +84,8 @@ Module Pregmap := EMap(PregEq). (** Conventional names for stack pointer ([SP]) and return address ([RA]) *) -Notation "'SP'" := IR13 (only parsing). -Notation "'RA'" := IR14 (only parsing). +Notation "'SP'" := IR13 (only parsing) : asm. +Notation "'RA'" := IR14 (only parsing) : asm. (** The instruction set. Most instructions correspond exactly to actual instructions of the ARM processor. See the ARM @@ -294,8 +294,10 @@ Definition program := AST.program fundef unit. Definition regset := Pregmap.t val. Definition genv := Genv.t fundef unit. -Notation "a # b" := (a b) (at level 1, only parsing). -Notation "a # b <- c" := (Pregmap.set b c a) (at level 1, b at next level). +Notation "a # b" := (a b) (at level 1, only parsing) : asm. +Notation "a # b <- c" := (Pregmap.set b c a) (at level 1, b at next level) : asm. + +Open Scope asm. (** Undefining some registers *) |