Recursive defsyntax expands infinitely

[noprompt]

Consider

(m/defsyntax static
  ([]
   `(m/or ('quote _)
          (m/pred number?)
          (m/pred keyword?)
          [(static) ...])))

This syntax extension will be expanded to point of a StackOverflowError, however, it should be possible to avoid this. Since m/with allows for recursive definitions we should be able to rewrite the body of the syntax extension in terms of m/with such that the recursive semantics are preserved and without causing a StackOverflowError at compile time.