Infix list to s-expression ($1747132) · Snippets · GitLab

Michael Babich @mbabich · Aug 21, 2018
Output:

(+ 1 1) (+ 1 2 3) (+ (+ 1 2) (+ 3 4) (+ 5 6))

Output: ``` (+ 1 1) (+ 1 2 3) (+ (+ 1 2) (+ 3 4) (+ 5 6)) ```
Michael Babich @mbabich · Aug 21, 2018
Example usage in a macro:

(defmacro foo (&rest forms) (parse-infix-list forms))

Example use of the macro:

(foo 1 + 2) 3 CL-USER> (foo 1 + 2 + (3 - 4)) 2

Example usage in a macro: ``` (defmacro foo (&rest forms) (parse-infix-list forms)) ``` Example use of the macro: ``` (foo 1 + 2) 3 CL-USER> (foo 1 + 2 + (3 - 4)) 2 ```

Please register or to comment