20:11:49Josh_2I just had to use eval to get rid of a ' so that I get consistent output between a list generated like `( ..) and a list generated like `'(.. )
20:12:47aeth''(foo) is just sugar for (quote (quote foo))
20:13:04aethSo you can parse it like a list, you don't need to eval it
20:13:31Josh_2well I tried just using (rest list) as the arg but the returned results werent consistent
20:15:50Josh_2https://plaster.tymoon.eu/view/2330#2330 here
20:17:14Josh_2when I get rid of eval I get varying results between the `( ) and `'( ) lists, I tried using something like (rest list) when (first list) was eql to 'quote
20:18:09Josh_2I'm basically tryna write a compiler-macro to automatically compile templates when they are constants ie `'( ) lists
20:18:10jackdanielwhen you have ''(a b c) it is equivalent to (quote (quote (a b c))
20:21:15aethI think this is the test for quoted and you then separately have to test the cadr if you want its contents to be something specific: (defun quoted-p (form) (and (listp form) (eql (car form) 'quote) (endp (cddr form))))
20:21:29jackdanielits late, I might have forgot some parenthesis, but I hope you will figure this out
20:21:47aethNote, though that (quoted-p ''a) and (quoted-p `'a) would be T but (quoted-p 'a) would not because the REPL is evaluating the 'a input once
20:27:35aethI personally tend to use the CXRs for syntax where DESTRUCTURING-BIND isn't desirable (it usually is, since errors are good, but in this case, it would error instead of returning NIL)
20:28:24aethMainly because working with syntax tends to have you wind up with cadr, cddr, etc.
20:28:50Josh_2Now my compiler-macro should automatically compile templates when they start with '