(perm4-list-p x) recognizes lists where every element satisfies perm4p.
(perm4-list-p x) → *
This is an ordinary deflist. It is "loose" in that it does not care whether x is nil-terminated.