/* Demonstrate varargs */
proc addNums()
{
var
i, n, result;
n = oadl::nargs();
result = 0;
for( i = 0; i < n; i += 1 ) {
result += oadl::arg( i );
}
return result;
}
proc main()
{
say( addNums( 1, 2, 3, 4, 5, 6, 7, 8, 9 ), "\n" );
}