checks/128.changeword

   1 dnl @ ../doc/m4.texi:4732: Origin of test
   2 dnl @ expected status: 0
   3 dnl @ extra options:
   4 dnl @ Copyright (C) 2006, 2007, 2008, 2009 Free Software
   5 dnl @ Foundation, Inc.
   6 dnl @ This file is free software; the Free Software Foundation
   7 dnl @ gives unlimited permission to copy and/or distribute it
   8 dnl @ with or without modifications, as long as this notice
   9 dnl @ is preserved.
  10 ifdef(`changeword', `', `errprint(` skipping: no changeword support
  11 ')m4exit(`77')')dnl
  12 define(`bar
  13 ', defn(`dnl'))dnl
  14 define(`baz', `dnl
  15 include(`foo') ignored
  16 dnl')dnl
  17 changeword(`\([_a-zA-Z][_a-zA-Z0-9]*\|bar
  18 \)')
  19 dnl @result{}
  20 __file__:__line__
  21 dnl @result{}stdin:10
  22 include(`foo') ignored
  23 __file__:__line__
  24 dnl @result{}stdin:12
  25 baz ignored
  26 __file__:__line__
  27 dnl @result{}stdin:14
  28 define(`bar
  29 ', defn(`__file__'))
  30 dnl @result{}
  31 include(`foo')
  32 dnl @result{}examples/foo
  33 define(`bar
  34 ', defn(`__line__'))
  35 dnl @result{}
  36 include(`foo')
  37 dnl @result{}1
  38 __file__:__line__
  39 dnl @result{}stdin:21