diff options
| author | Bernhard Schommer <bernhardschommer@gmail.com> | 2020-04-29 15:12:54 +0200 |
|---|---|---|
| committer | Xavier Leroy <xavierleroy@users.noreply.github.com> | 2020-06-28 10:07:02 +0200 |
| commit | ad2ea9c2e701dd82c26e6cd3e8a777be9bdef2a2 (patch) | |
| tree | 128b7e26ed98c6035331adfd880103e89e25200b /cparser | |
| parent | faa1d7fbfd7c9d5aa333d9b353a6118e105c4428 (diff) | |
| download | compcert-kvx-ad2ea9c2e701dd82c26e6cd3e8a777be9bdef2a2.tar.gz compcert-kvx-ad2ea9c2e701dd82c26e6cd3e8a777be9bdef2a2.zip | |
Move shared code in new file.
The name_of_register and register_of_name function are shared between
all architectures and can be moved in a common file.
Diffstat (limited to 'cparser')
| -rw-r--r-- | cparser/ExtendedAsm.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/cparser/ExtendedAsm.ml b/cparser/ExtendedAsm.ml index 257e9cf7..df2da2a2 100644 --- a/cparser/ExtendedAsm.ml +++ b/cparser/ExtendedAsm.ml @@ -156,7 +156,7 @@ let transf_outputs loc env = function let check_clobbers loc clob = List.iter (fun c -> - if Machregsaux.register_by_name c <> None + if Machregsnames.register_by_name c <> None || Machregsaux.is_scratch_register c || c = "memory" || c = "cc" (* GCC does not accept MEMORY or CC *) then () |