| 193 | } |
| 194 | |
| 195 | static expr list_expr(exprl::const_iterator it, exprl::const_iterator end) |
| 196 | { |
| 197 | if (it == end) |
| 198 | return expr::nil(); |
| 199 | else { |
| 200 | expr x = *it; |
| 201 | return expr::cons(x, list_expr(++it, end)); |
| 202 | } |
| 203 | } |
| 204 | |
| 205 | expr expr::list(const exprl& xs) |
| 206 | { |