Search
3:16:27
moon-child
is there a standard cl function like constant-form-p? Would do something like (or (atom x) (eq (car x 'quote')))
3:19:22
moon-child
err add a (and (not (symbolp x))) in there
4:24:56
jackdaniel
(constantp form)
4:25:28
jackdaniel
why atom is excluded in your definition?
4:26:04
jackdaniel
(and (constantp x) (listp x))
4:26:40
moon-child
jackdaniel: when did I exclude atom?
4:26:48
moon-child
I certainly didn't mean to
4:27:45
moon-child
(and (not (symbolp x)) (or (atom x) (eq (car x 'quote)))) should return true for atoms
4:28:35
moon-child
regardless ty for constantp