checks/236.improved_f

   1 dnl @ ../doc/m4.texinfo:8642: Origin of test
   2 dnl @ expected status: 1
   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 define(`fatal_error',
  11   `errprint(ifdef(`__program__', `__program__', ``m4'')'dnl
  12 `:ifelse(__line__, `0', `',
  13     `__file__:__line__:')` fatal error: $*
  14 ')m4exit(`1')')
  15 dnl @result{}
  16 m4wrap(`divnum(`demo of internal message')
  17 fatal_error(`inside wrapped text')')
  18 dnl @result{}
  19 dnl @error{}m4:stdin:6: Warning: excess arguments to builtin `divnum' ignored
  20 dnl @result{}0
  21 dnl @error{}m4:stdin:6: fatal error: inside wrapped text