\input texinfo @c -*-texinfo-*-
@c  texinfo version of 99 bottles of beer
@c  Laurent Vogel,  http://lvogel.free.fr
@c  run as: makeinfo --no-headers -o - THIS_FILE
@macro e @end macro
@macro p{c} @value{i} bottle@value{s} of beer\c\ 
@end macro
@set i 99
@set s s
@macro a{i,s}
@noindent @p{@e on the wall\\,}@*@p{.}@*@set s \s\
Take one down, pass it around