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