...
The open and close parenthesis objects (not the symbols '( and ')) clearly play a critical role in token streams because they delimit general lists.
Examples:
| Code Block |
|---|
(check-expect (listify empty) |
...
empty) (check-expect (listify (list (make-open) (make-close))) |
...
(list empty) |
...
) (check-expect (listify (list (make-open) 'a (make-close)) |
...
) (list '(a))) |
...
(check-expect (listify (list (make-open) 'a 'b (make-close))) |
...
(list '(a b))) |
...
(check-expect (listify (list (make-open) (make-open) 'a (make-close) 'b (make-close)) |
...
) (list '((a) b))) |
You will probably want to define the following predicate
...