s-lang is a programming language created in 1992 by John E. Davis.
| #2617on PLDB | 32Years Old |
define init_array (a)
{
variable i, imax;
imax = length (a);
for (i = 0; i < imax; i++)
{
a[i] = 7;
}
}
variable A = Int_Type [10];
init_array (A);