From 58045010316833fe838e8fa52bea1220126b760b Mon Sep 17 00:00:00 2001 From: xleroy Date: Thu, 28 Aug 2014 09:21:22 +0000 Subject: Cold feet: suppress builtins for load with reservation/store conditional, use case is unclear. git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@2622 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e --- arm/PrintAsm.ml | 17 ----------------- 1 file changed, 17 deletions(-) (limited to 'arm/PrintAsm.ml') diff --git a/arm/PrintAsm.ml b/arm/PrintAsm.ml index 01ec716..e9b20d4 100644 --- a/arm/PrintAsm.ml +++ b/arm/PrintAsm.ml @@ -603,23 +603,6 @@ let print_builtin_inline oc name args res = fprintf oc " dsb\n"; 1 | "__builtin_isb", [], _ -> fprintf oc " isb\n"; 1 - | "__builtin_ldrex", [IR addr], [IR dst] -> - fprintf oc " ldrex %a, [%a]\n" ireg dst ireg addr; 1 - | "__builtin_ldrexb", [IR addr], [IR dst] -> - fprintf oc " ldrexb %a, [%a]\n" ireg dst ireg addr; 1 - | "__builtin_ldrexd", [IR addr], [IR dsth; IR dstl] -> - fprintf oc " ldrexd %a, %a, [%a]\n" ireg dstl ireg dsth ireg addr; 1 - | "__builtin_ldrexh", [IR addr], [IR dst] -> - fprintf oc " ldrexh %a, [%a]\n" ireg dst ireg addr; 1 - | "__builtin_strex", [IR addr; IR src], [IR res] -> - fprintf oc " strex %a, %a, [%a]\n" ireg res ireg src ireg addr; 1 - | "__builtin_strexb", [IR addr; IR src], [IR res] -> - fprintf oc " strexb %a, %a, [%a]\n" ireg res ireg src ireg addr; 1 - | "__builtin_strexd", [IR addr; IR srch; IR srcl], [IR res] -> - fprintf oc " strexd %a, %a, %a, [%a]\n" ireg res ireg srcl ireg srch ireg addr; 1 - | "__builtin_strexh", [IR addr; IR src], [IR res] -> - fprintf oc " strexh %a, %a, [%a]\n" ireg res ireg src ireg addr; 1 - (* Vararg stuff *) | "__builtin_va_start", [IR a], _ -> -- cgit v1.2.3