1
dnl @ ../doc/m4.texinfo:1673: Origin of test
2
dnl @ expected status: 0
4
dnl @ Copyright (C) 2006, 2007 Free Software Foundation
5
dnl @ This file is free software; the Free Software Foundation
6
dnl @ gives unlimited permission to copy and/or distribute it
7
dnl @ with or without modifications, as long as this notice
9
define(`array', `defn(format(``array[%d]'', `$1'))')
11
define(`array_set', `define(format(``array[%d]'', `$1'), `$2')')
13
array_set(`4', `array element no. 4')
15
array_set(`17', `array element no. 17')
18
dnl @result{}array element no. 4
20
dnl @result{}array element no. 17