diff options
Diffstat (limited to 'asmcomp/amd64')
| -rw-r--r-- | asmcomp/amd64/selection.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/asmcomp/amd64/selection.ml b/asmcomp/amd64/selection.ml index 857a481dcb..d4907c05b7 100644 --- a/asmcomp/amd64/selection.ml +++ b/asmcomp/amd64/selection.ml @@ -196,7 +196,7 @@ method! select_operation op args = assert false end (* Recognize store instructions *) - | Cstore (Word_int|Word_val as chunk) -> + | Cstore ((Word_int|Word_val as chunk), _init) -> begin match args with [loc; Cop(Caddi, [Cop(Cload _, [loc']); Cconst_int n])] when loc = loc' && self#is_immediate n -> |