gas/testsuite/gasp/sfunc.asm

   1
   2         .MACRO  RESERVE_STR P1=0 P2
   3         .SDATA  .SUBSTR("ABCDEFG",\P1,\P2)
   4         .ENDM
   5
   6         RESERVE_STR     2,2
   7         RESERVE_STR     ,3
   8
   9
  10         .MACRO FIND_STR P1
  11         .DATA.W .INSTR("ABCDEFG","\P1", 0)
  12         .ENDM
  13
  14         FIND_STR        CDE
  15         FIND_STR        H
  16
  17         .MACRO  RESERVE_LENGTH P1
  18         .ALIGN  4
  19         .SRES   .LEN("\P1")
  20         .ENDM
  21
  22         RESERVE_LENGTH  ABCDEF
  23         RESERVE_LENGTH  ABC
  24
  25         .END
  26