44a45 > integer 59a61 > integer 61c63 < integer s_wsli(a) icilist *a; --- > s_wsli(a) icilist *a; 63c65 < integer s_wsli(icilist *a) --- > s_wsli(icilist *a)