while ("im in s-expr");

 | 
 |