gcc/testsuite/gcc.target/arm/cmse/mainline/8_1m/soft/cmse-13.c

   1 /* { dg-do compile } */
   2 /* { dg-options "-mcmse -mfloat-abi=soft" }  */
   3 /* { dg-skip-if "Incompatible float ABI" { *-*-* } { "-mfloat-abi=*" } { "-mfloat-abi=soft" } } */
   4
   5 #include "../../../cmse-13.x"
   6
   7 /* Checks for saving and clearing prior to function call.  */
   8 /* Shift on the same register as blxns.  */
   9 /* { dg-final { scan-assembler "lsrs\t(r\[1,4-9\]|r10|fp|ip), \\1, #1.*blxns\t\\1" } } */
  10 /* { dg-final { scan-assembler "lsls\t(r\[1,4-9\]|r10|fp|ip), \\1, #1.*blxns\t\\1" } } */
  11 /* { dg-final { scan-assembler-not "mov\tr0, r4" } } */
  12 /* { dg-final { scan-assembler-not "mov\tr2, r4" } } */
  13 /* { dg-final { scan-assembler-not "mov\tr3, r4" } } */
  14 /* { dg-final { scan-assembler "push\t\{r4, r5, r6, r7, r8, r9, r10, fp\}" } } */
  15 /* { dg-final { scan-assembler "vlstm\tsp" } } */
  16 /* Check the right registers are cleared and none appears twice.  */
  17 /* { dg-final { scan-assembler "clrm\t\{(r1, )?(r4, )?(r5, )?(r6, )?(r7, )?(r8, )?(r9, )?(r10, )?(fp, )?(ip, )?APSR\}" } } */
  18 /* Check that the right number of registers is cleared and thus only one
  19    register is missing.  */
  20 /* { dg-final { scan-assembler "clrm\t\{((r\[1,4-9\]|r10|fp|ip), ){9}APSR\}" } } */
  21 /* Check that no cleared register is used for blxns.  */
  22 /* { dg-final { scan-assembler-not "clrm\t\{\[^\}\]\+(r\[1,4-9\]|r10|fp|ip),\[^\}\]\+\}.*blxns\t\\1" } } */
  23 /* { dg-final { scan-assembler "vlldm\tsp" } } */
  24 /* { dg-final { scan-assembler "pop\t\{r4, r5, r6, r7, r8, r9, r10, fp\}" } } */
  25 /* { dg-final { scan-assembler-not "vmov" } } */
  26 /* { dg-final { scan-assembler-not "vmsr" } } */
  27
  28 /* Now we check that we use the correct intrinsic to call.  */
  29 /* { dg-final { scan-assembler "blxns" } } */